Copiar el valor de vario campo en un ComboBox

[ecfisa]

Empezado por NISOTO

Lo que necesito es copiar el valor de cada campo en un ComboBox

Empezado por NISOTO

quiero que me muetre en 1 solo Combobox el contenido de cada columna, de un registro que yo selecccione.

Hola NISOTO.

De acuerdo a lo que entiendo de tus mensajes, sería:

Código Delphi [-]
...
procedure TForm1.FormCreate(Sender: TObject);
const
  SEP = ', ';
var
  i: Integer;
  s: string;
begin
  DataSet.Open;
  ComboBox1.Items.Clear;
  while not DataSet.Eof do
  begin
    s:= '';
    for i:= 0 to DataSet.FieldCount-1 do
      s:= s + DataSet.Fields[i].AsString + SEP;
    SetLength(s,Length(s)-Length(SEP));
    DataSet.Next;
    ComboBox1.Items.Add(s);
  end;
  ComboBox1.ItemIndex:= 0;
end;

...

(* Código de respuesta a la selección *)
procedure TForm1.DBGrid1CellClick(Column: TColumn);
const
  SEP = ', ';
var
  i: Integer;
  s: string;
begin
  s:='';
  for i:= 0 to DataSet.FieldCount-1 do
    s:= s + DataSet.Fields[i].AsString + SEP;
  SetLength(s,Length(s)-Length(SEP));
  ComboBox1.ItemIndex:= ComboBox1.Items.IndexOf(s);
end;
...

Saludos.