Combobox ItemIndex=-1; Text ändern im Event

[StTüff]

Gerne:

Delphi-Quellcode:

procedure TForm1.CoBo_VersionChange(Sender: TObject);
begin
  if MessageDlg('Soll die Konvertierung durchgeführt werden?', mtConfirmation,
    [mbyes, mbCancel], 0)=mrYes
  then
  begin
    ...Konvertierung...
  end else
  begin
    CoBo_Version.ItemIndex :=-1;
    CoBo_Version.Text:='Test';
  end;
end;

Gruß,

StTüff