Wenn ich ganz viele Schnelle Klicks mache gibt es eine
Access Violation.
Hier der Code:
Delphi-Quellcode:
procedure TForm1.BtnMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
if (ssRight in Shift) then
if (TSpeedButton(Sender).Glyph.Empty = TRUE) then
TSpeedButton(Sender).Glyph.LoadFromFile('bild.bmp')
else
ShowMessage('hat schon ein bild!');
end;
ich hoffe ihr könnt mir sagen warum,
die procedure ist 1200 buttons zugeordnet.