Delphi BitBtn Button effekt

Thema durchsuchen

Ansicht

Themen-Optionen

BitBtn Button effekt

Ein Thema von Delphiturbo · begonnen am 23. Mai 2008 · letzter Beitrag vom 24. Mai 2008

Thema geschlossen

Matze

(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge

Turbo Delphi für Win32

Re: BitBtn Button effekt

23. Mai 2008, 21:03

Oder nimm eine TImageList. Damit geht's auch einwandfrei:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm1.BitBtn1MouseEnter(Sender: TObject);

begin

  BitBtn1.Glyph := nil;

  ImageList1.GetBitmap(0, BitBtn1.Glyph);

end;

procedure TForm1.BitBtn1MouseLeave(Sender: TObject);

begin

  BitBtn1.Glyph := nil;

  ImageList1.GetBitmap(1, BitBtn1.Glyph);

end;