Glyph-Änderung im SpeedButton

[Jansteger]

Hallo,

Ich habe auf meinem Formular einen Speedbutton. Wenn ich ihn drücke soll sich das Symbol ändern. wie kann ich das machen. Wäre gut, wqenn das ohne Stream funktionieren würde. Ich hoffe, dass ihr mir helfen könnt.

MfG

[lbccaleb]

Delphi-Quellcode:

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
  SpeedButton1.Glyph := 'DeinBitmapHier.bmp';
end;

[Aviator]

Du könntest im OnMouseDown oder im OnClick Ereignis das Bild ändern. Schau mal nach

Delphi-Quellcode:

SpeedButton.Glyph.LoadFrom...

. Dort hast du mehrere Dinge zur Auswahl. Vielleicht kannst du ja mit einer Methode etwas anfangen.

[Volker Z.]

Hallo,

Du kannst auch das Bitmap entsprechend basteln - also bis zu vier Einzelbilder in die Bitmap packen. Setze anschließend die Eigenschaft NumGlyphs (Anzahl der Einzelbilder) des SpeedButtons. Dann wird je nach Zustand eines der Einzelbilder angezeigt.

Das kannst Du alles in der OH nachlesen - oder hier

Gruß