Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  AW: Vereinfachung gesucht

    Delphi
    by himitsu, 2. Sep 2010
  PS: Noch was zu den CheckBoxen (falls sowas nicht schon eingebaut ist).
  
  So kann man nur eine CheckBox anklicken und vorallem sieht man auch gleich, daß die andere dann nicht mehr geht.
  // ins OnClick beider CheckBoxen
  procedure TForm9.CheckBox1Click(Sender: TObject);
  begin
  CheckBox2.Enabled := not CheckBox1.Checked;
  CheckBox1.Enabled := not CheckBox2.Checked;
  end;
• Forum: Object-Pascal / Delphi-Language

  AW: Vereinfachung gesucht

    Delphi
    by himitsu, 2. Sep 2010
  @blackfin: wenn, dann doch eher so: (diese CASE würden es nicht grad vereinfachen)
  if RadioButton1.Checked then begin
  if CheckBox1.Checked then mode := 1
  else if CheckBox2.Checked then mode := 2 else mode := 0;
  if mode in then SQL.Add('abc');
  if mode in then SQL.Add('def');
  end;
• Forum: Object-Pascal / Delphi-Language

  AW: Vereinfachung gesucht

    Delphi
    by himitsu, 2. Sep 2010
  Können beide CheckBoxen gleichzeitig markiert sein?
  
  wenn nicht:
  if RadioButton1.Checked then
  begin
  if not CheckBox1.Checked then SQL.Add('def');
  if not CheckBox2.Checked then SQL.Add('abc');
  end;
  
  PS: