Código Delphi [-]procedure TForm1.ComboBox1Exit(Sender: TObject); begin if ComboBox1.ItemIndex = -1 then ComboBox1.Text := ''; end;
procedure TForm1.ComboBox1Exit(Sender: TObject); begin if ComboBox1.ItemIndex = -1 then ComboBox1.Text := ''; end;