[marcoszorrilla]

Prueba con este código y el evento exit:

Código Delphi [-]
procedure TForm1.ComboBox1Exit(Sender: TObject);
begin
  if combobox1.ItemIndex = -1 then
  ShowMessage('No ha elegido nada.')
  else
  ShowMessage('Eligió algo');
end;

Un Saludo.