[ecfisa]

Hola jocaro.

No me queda muy la situación, pero creo que te refieres a esto:

Código Delphi [-]
// OnKeyPress
procedure TForm1.ComboBox1KeyPress(Sender: TObject; var Key: Char);
var
  msg: TMsg;
begin
  if Key = #13 then
  begin
    Key:= #0;
    ShowMessage('Seleccionado');
  end;
end;

// OnCloseUp
procedure TForm1.ComboBox1CloseUp(Sender: TObject);
begin
  ShowMessage('Seleccionado');
end;

Saludos