Campo clave y campo valor en un ComboBox

[ecfisa]

Hola santiago14.

Empezado por santiago14

...
La cosa es así, en un TComboBox no puedo traer ambos valores, mostrar uno y guardarme el otro para usarlo cuando quiera. En un TDBComboBox si es posible (keyValue, KeyField, KeyValue)
...

No es complicado hacer lo que queres usando un TComboBox:

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
  while not IBQuery.Eof do
  begin
    ComboBox1.AddItem(IBQuery.FieldByName('NOMBRE_CLIENTE').AsString,
      TObject(IBQuery.FieldByName('COD_CLIENTE').AsInteger));
    IBQuery.Next;
  end;
end;

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
  with ComboBox1 do
    ShowMessage(Format('%s %d',[Items[ItemIndex], // NOMBRE_CLIENTE
      Integer(Items.Objects[ItemIndex])]));       // COD_CLIENTE
end;

(Creo haber contestado esto en un hilo anterior pero no pude encontrarlo. )

Saludos