Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Button hervorhebung in Lazarus (https://www.delphipraxis.net/187539-button-hervorhebung-lazarus.html)

LeonPP 7. Dez 2015 14:26

Delphi-Version: 5

Button hervorhebung in Lazarus
 
Liste der Anhänge anzeigen (Anzahl: 1)
Guten Tag,

ich wollte mal kurz fragen ob man wenn die maus über ein Button oder Bild kommt (nicht draufklickt) ein anderes Bild angezeigt wird
z.B. bei der Textverarbeitung, wenn man auf das 'Fett' Symbol seine maus drauf zieht wird dieses Symbol blau 'umeckt' :D.

Beim anhang. Also wenn man auf einen Button draufgeht wird der Button z.B. durch einen Schlagschatten hervorgehoben wenn ihr versteht was ich meine.

Mfg
LeonPP

stahli 7. Dez 2015 14:58

AW: Button hervorhebung in Lazarus
 
Du solltest nochmal genauer fragen.

Je nach Entwicklungsumgebung und Details treffen da wohl die Betriffe Hover, MouseEnter und MouseLeave zu.

Willst Du einen normalen Button benutzen oder ein Image?
Willst Du einen Schlagschatten oder ein anderes Bild oder einen Rahmen?
Rechteckig oder unregelmäßig?

LeonPP 7. Dez 2015 19:53

AW: Button hervorhebung in Lazarus
 
Liste der Anhänge anzeigen (Anzahl: 2)
Hey danke erstmal

MouseEnter hört sich doch richtig an haha :D Nur weiß ich nicht wie man das hinbekommt. Gibts dazu 'ne funktion zum auswählen in Lazarus oder muss man die selber hinschreiben? Ich wollte das so machen das wenn man auf das Image (funktion wie ein button) mit der maus draufkommt ein anderes Bild kommt und das Alte überdeckt wird.

Anhang:
Start.png = Normal
eeeeeeeeeee.png = Mouse Enter also wenn die maus darübe kommt :)

Mfg
LeonPP

hathor 7. Dez 2015 20:26

AW: Button hervorhebung in Lazarus
 
Mit Englischkenntnissen hättest Du weniger Probleme:
to hover = schweben
Delphi-Quellcode:
procedure TForm1.Button8Enter(Sender: TObject); // Click
begin
Windows.Beep(1500,100);
end;

procedure TForm1.Button8MouseEnter(Sender: TObject); // Cursor im Button-Bereich
begin
Windows.Beep(2000,100);
end;

procedure TForm1.Button8MouseLeave(Sender: TObject);  // Cursor verlässt Button-Bereich
begin
Windows.Beep(1500,100); Windows.Beep(1500,100);
end;
Die Unit ColorButton hat auch ein HoverColor:
http://delphi.about.com/library/code/ncaa061104a.htm


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:20 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