Checkbox?? will etwas damit enablen
Hallo ich würde gerne folgendes programieren.
Ich habe eine checkbox, und eine Combobox Beim systemstart ist dei Combobox disabled wenn jetzt jemand den hacken bei der Checkbox setzt dann soll die Combobox aktiviert werden... Soweit alles klar. Doch es gibt kein Ereigniss, was z. auftritt wenn die Checkbox gecheckt wird.... das heist ich müsste das OnClick ereignis nehmen und dann
Delphi-Quellcode:
wenn ich das mache dann kommt das hier:
procedure Tneulokerstell.CheckBox1Click(Sender: TObject);
begin if Checkbox1.checked:= true then Combobox1.enabled:= true; end; Zitat:
MfG snow |
Re: Checkbox?? will etwas damit enablen
Delphi-Quellcode:
Schaus dir mal genau an. Da ist ein : zu viel drin :zwinker:
if Checkbox1.checked:= true then Combobox1.enabled:= true;
Besser ists so:
Delphi-Quellcode:
Bei ersterem handelt es sich ja um einen Vergleich (Vergleichsoperator ist das =) und nicht um eine Zuweisung (:=).
if Checkbox1.checked = true then Combobox1.enabled:= true;
|
Re: Checkbox?? will etwas damit enablen
Am besten du machst das gleich so:
Delphi-Quellcode:
Dann sparst du dir die if Abfrage!
ComboBox.enabled := checkbox.checked;
|
Re: Checkbox?? will etwas damit enablen
Hallo, mal abgesehen davon, dass sich dein Code nicht kompilieren lassen würde, funktioniert das bei mir so:
Delphi-Quellcode:
Edit: Da war wohl einer schneller. Überprüfe übrigens nie auf = true. Wieso?
procedure TForm1.CheckBox1Click(Sender: TObject);
begin Combobox1.Enabled := CheckBox1.Checked; end; Edit 2: Ähm da waren ja sogar 2 schneller. *g* |
Re: Checkbox?? will etwas damit enablen
Und Überleg mal: Boolean ist ja auch nur ein Variablentyp, der 2 Zustände haben kann, true und false. anstatt if dingsda=true then dasunddas:=true zu schreiben, könntest du auch einfach dasunddas:=dingsda schreiben ;)
|
Re: Checkbox?? will etwas damit enablen
@Matze: Tröste Dich, ich hatte auch bereits einen halben Roman getippselt, und dann waren gleich 3 Leute schneller :mrgreen:
|
Re: Checkbox?? will etwas damit enablen
Danke habs jetzt hinbekommen.... Muss mich noch an delphi gewöhnen... komme aus der qbasic-welt
MfG snow |
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:20 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz