Thema: Delphi Zwei Combobox

Einzelnen Beitrag anzeigen

Benutzerbild von idontwantaname
idontwantaname

Registriert seit: 31. Aug 2004
Ort: Traiskirchen
575 Beiträge
 
Turbo Delphi für Win32
 
#4

Re: Zwei Combobox

  Alt 6. Sep 2004, 10:18
Hier ein Beispiel. Wenn Checkbox1 geändert wird, dann wird cb1 auf True gesetzt, genau das selbe bei Checkbox2. Noch dazu wird gefragt, ob schon beide geändert wurden.

Delphi-Quellcode:
var
  Form1: TForm1;
  cb1: Boolean = False;
  cb2: Boolean = False;

implementation

{$R *.dfm}

procedure TForm1.CheckBox1Click(Sender: TObject);
begin
   cb1 := True;
   if (cb1) and (cb2) then Button1.Enabled := True;
end;

procedure TForm1.CheckBox2Click(Sender: TObject);
begin
   cb2 := True;
   if (cb1) and (cb2) then Button1.Enabled := True;
end;
Oliver Hanappi
Besucht meine neue Homepage: http://oli.hux.de
  Mit Zitat antworten Zitat