[StartKill]

Holas,

Este es un pequeño ejemplo, en lo personal trabajo con query's pero debe ser lo mismo.

Código Delphi [-]
procedure TForm1.IBQuery1FCOD_PROFGetText(Sender: TField; var Text: String;
  DisplayText: Boolean);
begin
  //  text:=ibquery1FCOD_PROF.AsString+'-'+ibquery1FDES_PROF.AsString;
  text:=sender.asString+'-'+ibquery1FDES_PROF.AsString;
end;

Espero te sirva,

your Friend

StartKill
Lima-Perú