Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

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

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

  Alt 11. Jun 2010, 11: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.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests

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