Doppelklick auf die Table-(
Query-) Komponente zum Öffnen des Feldeditors. Dann darin rechte Maustaste | Alle Felder hinzufügen. Wähle in der Liste das Memo-Feld aus, gehe im Objektinspektor auf Ereignisse und Doppelklicke auf OnGetText. Dort schreibst Du dann, was angezeigt werden soll.
Beispiel für statischen Text:
Delphi-Quellcode:
procedure TForm1.AdsTable1mGetText(Sender: TField; var Text: string;
DisplayText: Boolean);
begin
Text := 'hallo welt';
end;
oder für dynamischen Text, 10 Zeichen des Memo anzeigen:
Delphi-Quellcode:
procedure TForm1.AdsTable1mGetText(Sender: TField; var Text: string;
DisplayText: Boolean);
begin
Text := Copy(Sender.AsString, 1, 10)+'...';
end;