Hint anzeigen bei OnClick

[BlueStarHH]

Wie kann ich bei einem Klick auf z.B. ein TPanel ein Hint an einer beliebigen Stelle (X, Y) mit einem beliebigen Text anzeigen?

[SirThornberry]

erstelle einfach eine Instanz von THintWindow und das kannst du dann auch plazieren.

[ConstantGardener]

Hallo Blue_StarHH,

die Anzeige sollte auch so gelingen...

Delphi-Quellcode:

procedure TForm1.Panel1Click(Sender: TObject);
var p : TPoint;
begin
 Panel1.Hint:='Hint anzeigen';
 p:=Mouse.CursorPos;
 p.x:=p.x+8;
 Application.ActivateHint (p);
end;

[FrankReiss]

endlich mal ne einfache Antwort, die auch funktioniert :P

[haentschman]

Hallo Frank...
herzlich willkommen in der DP. :dp:

Zitat:

endlich mal ne einfache Antwort, die auch funktioniert

... und wie du siehst schon seit 7 Jahren. 8-)