Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.071 Beiträge
 
Delphi 12 Athens
 
#4

AW: Wie wird verhindert das bei SetFocus der RadioButton gecheckt wird

  Alt 11. Jun 2010, 12:05
Der gesamten Liste/Gruppe vielleicht (hier kann man ja über ein Label oder den hint einen Hinweis auf diese Eigenart geben), aber nicht der einzelnen Komponente.

Hier eine Variante für "maximal eine CheckBox gewählt":
Delphi-Quellcode:
procedure TForm1.CheckBox1Click(Sender: TObject);
var B: Boolean;
begin
  if CheckBox1.Tag <> 0 then Exit;
  CheckBox1.Tag := 1;
  B := CheckBox1.Checked or CheckBox2.Checked or CheckBox3.Checked {...};
  CheckBox1.Enabled := CheckBox1.Checked or not B;
  CheckBox2.Enabled := CheckBox2.Checked or not B;
  CheckBox3.Enabled := CheckBox3.Checked or not B;
  {...}
  CheckBox1.Tag := 0;
end;
Und ich würde mal sagen, dieses Verhalten wäre so sehr bekannt.
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.

Geändert von himitsu (11. Jun 2010 um 12:10 Uhr)
  Mit Zitat antworten Zitat