Hola Huer,
Otra cosa mas, ¿por que haces referencia al campo por su nombre "real" cuando el procedimiento te lo da limpito? hazlo mejor asi:
Código:
procedure Tdm.md_publicaDOCGetText(Sender: TField; var Text: String;
DisplayText: Boolean);
begin
if not Sender.isNull then
Text:= Sender.asText;
end;
Ademas de hacerlos mas limpio, podrias reutilizar el procedimiento en todos y cada uno de los campos blob de texto que pretendas mostrar.
Saludos.