Hallo
ich simuliere ein Klick auf das Speedbutton. Das SpeedButton wird gedrückt aber es passiert nichts !
Wenn ich aber das SpeedButton direkt mit der Maus drücke dann geht !
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
SpeedButton1.Click;
SpeedButton1.Down:=true;
end;
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
if SpeedButton1.Down then
caption:='xxx';
end;