Hallo erstma, ist schon ne weile her seit ich hier vorbeigeschaut habe
Folgendes kleines Problem:
Ich möchte ganz simpel rollovergrafikwechsel für glyphen auf speedbuttons erreichen.
Da ich rumgetüftelt habe, hab ich es zwar schon irgendwie hinbekommen (mit ´mousmove´ etc),
aber dabei flackern die grafiken ziemlich hässlich....
Delphi-Quellcode:
procedure TForm4.SpeedButton3MouseMove(Sender: TObject; Shift: TShiftState;
X, Y: Integer);
begin
if neubutton=false then begin
speedbutton3.glyph.loadfromfile(ExtractFilePath(ParamStr(0)) + 'data\img\btn\neuesspiel2.bmp');
neubutton:=true;
end;
end;
und für die wiederherstellung dasselbe in grün für mousemove über der Form....
Delphi-Quellcode:
if neubutton=true then begin
speedbutton3.glyph.loadfromfile(ExtractFilePath(ParamStr(0)) + 'data\img\btn\neuesspiel1.bmp');
neubutton:=false;
end;
Geht doch sicher auch einfacher, oder?
