ListView-Hint ausschalten wenn Mauszeiger über den Item ist?

[ralfi]

Hallo!
Ich habe ein TlistView auf meiner Form mit folgenden Eigenschaften:

Delphi-Quellcode:

ViewStyle := vsReport; 
RowSelect := true;

Immer wenn der Inhalt eines Items länger ist, als die visuelle länge des Items, wird ein Hint mit dem ganzen Inhalt des Items angezeigt, wenn mann mit dem Mauszeiger auf einen Item zeigt.

Frage 1:

Wie komme ich auf diesen ListView-Hint, um ihn zu manipulieren oder ausschalten?

Frage 2:

Ich habe vor, einen formatierten mehrzeiligen Hint für ListView-Items zu erstellen, die Komponente dafür habe ich auch schon. Wie kann ich der Standart-Hint auf meinen eigenen austauschen?

Danke!

[chris]

hi,

ausschalten sollte so klappen:

application.cancelhint

so könntest du ihn setzen:

Delphi-Quellcode:

procedure TForm1.ListView1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  with ListView1 do
    if GetItemAt(x, y) <> nil then
      Hint := GetItemAt(x, y).Caption
    else
      Hint := '';
end;