Mostrar resultado de query en tLabel o tmemo

[ecfisa]

Empezado por @-Soft

...lo unico es que quiero mostrar solo el resultado de una sola columna de las 3 que devuelve el quiery. ej.

del resultado del query:

codigo-nombres-cargo
1-ivan lora-analista
2-manuel cocepcion-programador
3-heydy burgos-secretaria

de este resultado solo quiero mostrar el campo NOMBRES y lo demas campos no quiero que salgan en la carga del resultado.

Hola @-Soft.

Entonces tomando como base el código de ElKurgan, una forma sería:

Código Delphi [-]
procedure MostrarDatos(Consulta: TDataset; Lista: Tstrings);
begin
  Consulta.First;
  While not Consulta.Eof do
  begin
    Lista.Add(Consulta.FieldByName('NOMBRES').AsString);
    Consulta.Next;
  end;
end;

Ejemplo de llamada:

Código Delphi [-]
  MostrarDatos(Tu_Query, Memo1.Lines);

Saludos.