So,
weil es mich einfach interessiert hat....
Nach dem ich die Komponente auf meine Form gezogen habe und F1 drückte erschien dies:
Zitat von
Hilfe:
Description
Use this component to display and hide hint windows manually from your sourcecode(as known from the TLMDShapeHint component)
Ich kann also einfach einen "Hint" anzeigen lassen.
Zum Beispiel so:
Delphi-Quellcode:
procedure TForm1.Label1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var
mousepos : TPoint;
begin
GetCursorPos(mousepos);
LMDMessageHint1.Style := hsNoseEllipse;
LMDMessageHint1.ShowMessage('blubb',mousepos.X,mousepos.Y);
end;
procedure TForm1.Label1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
LMDMessageHint1.HideMessage;
end;
Stephan B.
"Lasst den Gänsen ihre Füßchen"