Thema: Delphi Checkbox.Checked Problem

Einzelnen Beitrag anzeigen

Benutzerbild von Uncle Cracker
Uncle Cracker

Registriert seit: 30. Mär 2003
Ort: Freital
694 Beiträge
 
#1

Checkbox.Checked Problem

  Alt 23. Dez 2003, 19:09
Ich habe das Problem, dass ich, wenn man auf eine Checkbox klickt und es auf Checked:=true stellen will, dass eine Inputbox sich öffnen soll. Das geht schon, nur wenn die Checkbox schon markiert ist, soll einfach nur auf Checked:=false gestellt werden.

Mein Code sieht so aus:

Code:
var Input: String;
begin
if CheckBox1.Checked then
CheckBox1.Checked:=false
else begin Input:=Inputbox('Titel','Text','Diese Maustaste ist deaktiviert...');
CheckBox1.Checked:=true; exit
end;
end;
Doch leider öffnet sich die Inputbox immerwieder
Eigentlich dürfte das doch kein großes Problem sein, nur irgendwie bekomme ich das nicht hin.

Vielleicht hatte jemand schonmal das selbe Problem wie ich und kann mir helfen.


Danke UC
I wish it was legal to marry software because I'm madly in love with Delphi...
  Mit Zitat antworten Zitat