ComboBox

[Kunoishi]

meine beiden Combobox felder initialesieren sich beim starten des Programms. das Geht schon mal.

Delphi-Quellcode:

procedure TSachverhaltForm.InitWindows;
begin
  Editdatum.Text := '';
  EditAnrede.Items.add('nicht ausgewählt');
  EditAnrede.Items.add('nicht bekannt');
  EditAnrede.Items.add('Herr');
  EditAnrede.Items.add('Frau');
  EditAnrede.Items.add('sonstige');
  EditAnrede.ItemIndex := 0;
  EditZeit.Text := '';
  EditTAnrede.Text := '';
  EditTName.Text := '';
  EditTVorname.Text := '';
  EditTGebName.Text := '';
  EditTGeschlecht.Items.add('nicht ausgewählt');
  EditTGeschlecht.Items.add('nicht bekannt');
  EditTGeschlecht.Items.add('männlich');
  EditTGeschlecht.Items.add('weiblich');
  EditTGeschlecht.ItemIndex := 0;
  EditTGebDatum.Text := '';
  EditTGeburtsort.Text := '';
  EditTStrasse.Text := '';
  EditTPLZ.Text := '';
  EditTOrt.Text := '';
  
end;

wie schaffe ich es, wenn ich in meiner Combobox "EditAnrede" die Anrede Herr auswähle, dass in der anderen Combobox "EditTGeschlecht" dort dann automatisch männlich erkannt wird (oder bei bedarf halt weiblich).