Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Speedbutton ? (https://www.delphipraxis.net/54551-speedbutton.html)

Vader 6. Okt 2005 13:06


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

padavan 6. Okt 2005 13:12

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

Thorben77 6. Okt 2005 13:18

Re: Speedbutton ?
 
Zitat:

Zitat von Vader
aber mit denen komme ich nicht zurecht ?

Was soll man da antworten - ja oder nein? :zwinker:

---

Machen könntest du das z.B. so:

Delphi-Quellcode:
// 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;
MfG

Edit: Wieder kein roter Kasten :? - aber so, wie es padavan auch vorgeschlagen hat.

Luckie 6. Okt 2005 13:19

Re: Speedbutton ?
 
So geht es: http://www.delphipraxis.net/internal...=270233#270233

Vader 6. Okt 2005 13:29

Re: Speedbutton ?
 
hallo


danke luckie, hab das einfachste genommen (dein erster vorschlag )

mfg vader

Luckie 6. Okt 2005 13:30

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