Einzelnen Beitrag anzeigen

Benutzerbild von Sharky
Sharky

Registriert seit: 29. Mai 2002
Ort: Frankfurt
8.252 Beiträge
 
Delphi 2006 Professional
 
#8

Re: Was und wie kann ich mit einer LMDMessageHint machen?

  Alt 8. Okt 2004, 10:08
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"