Button gedrückt lassen

[bautschi]

Hallo allerseits !

Folgende Frage:
Wie kann ich einen Button nachdem ich ihn 1x gedrückt habe deaktivieren ? (gedrückt lassen)

lg thomas

[Alexander]

probier es mal so:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
Button1.Enabled := false;
end;

[r_kerber]

Wenn TSpeedButton verwendest, dann hast Du die Möglichkeit dies mit der Eigenschaft Down umzusetzeen. Mit TButton und TBitBtn geht das IMHO nicht.

[Alexander]

du kannst sie doch einfach deaktivieren, siehe mein posting

[Uncle Cracker]

Kannst ja auch damit was probieren

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Button1.Perform(WM_LButtonDown,0,0);
  Sleep(200);
  Button1.Perform(WM_LButtonUp,0,0);
end;

[r_kerber]

ich denke er möcht, dass er möcht, dass der Button so aussieht als wäre er gedrückt und eingerastet.

[Alexander]

naja dann müsste man das halt mit der API machen...so wie das Uncle Cracker gezeigt hat...wir werden ja sehen...;-)

[Sharky]

Zitat:

Zitat von alexander

naja dann müsste man das halt mit der API machen...so wie das Uncle Cracker gezeigt hat...wir werden ja sehen...;-)

Und wenn garnichts anderes geht kann man das ganze ja mit einem Panel machen :lol:

[r_kerber]

Wieso TPanel? TSpeedButton!