Combobox y tquery

[radge]

Buenas ,estoy intentando recoger los registros de una consulta SQL y añadirlos a un combobox , el codigo seria este que funciona correctamente , pero me gustaria poder pasarle 2 valores , uno el que se "muestre" y otro con el que trabajar , ya que dependiendo del valor que selecciones luego volveré a hacer otra consulta SQL.

  q := TQuery.Create (nil);
  q.DatabaseName := MIBD.DatabaseName;
  q.SQL.Clear;
  qCadena := 'SELECT * From tabla';
  q.SQL.Add(qCadena);
  q.open;

  while not q.eof do begin
      combobox1.items.Add(q.FieldByName('campo1').asstring);
      q.next;
  end;

gracias radge