Speedbutton ?
hallo
hab da ein kleines problem ich möchte bei einen speedbutton wenn ich mit dem cursor mich über den speedbutton befinde das ein label sichtbar wird und wenn ich mit dem cursor mich wieder vom speedbutton entfernt habe dann soll das label wieder weg sein mir stehen ja nur die 3 eigenschaften zur verfügung: onmousedown onmousemove onmouseup aber mit denen komme ich nicht zurecht ? mfg vader |
Re: Speedbutton ?
Variante 1. (ins Blaue) Du könntest TSpeedbutton das Ereignis "onleave" hinzufügen.
Variante 2. bei "onMousemove" auf Speedbutton wird´s Label sichtbar und bei "onMousemove" auf der Form wird´s unsichtbar. Nicht elegant, geht aber |
Re: Speedbutton ?
Zitat:
--- Machen könntest du das z.B. so:
Delphi-Quellcode:
MfG
// Wenn du die Maus auf dem Formular bewegst und das Label sichtbar ist, wird es versteckt.
procedure TMyForm.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin if MyLabel.Visible then MyLabel.Visible := false; end; // Wenn du die Maus auf dem Label bewegst und es noch nicht sichtbar ist, wird es sichtbar gemacht. procedure TMyForm.MyLabelMouseMove((Sender: TObject; Shift: TShiftState; X, Y: Integer); begin if not MyLabel.Visible then MyLabel.Visible := true; end; Edit: Wieder kein roter Kasten :? - aber so, wie es padavan auch vorgeschlagen hat. |
Re: Speedbutton ?
|
Re: Speedbutton ?
hallo
danke luckie, hab das einfachste genommen (dein erster vorschlag ) mfg vader |
Re: Speedbutton ?
Hier gibt es keinen ersten Vorschlag von mir, da es genau genommen nur einen von mir gibt.
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:45 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz