[delphi] +[sql] Czemu nie wyswietla rekordow w DBgrif

mam w bazie pola VARCHAR i TEXT ale jak chche w DBGRID wyswietlic pola to
tam gdzie varchar wyswitlaja sie a tam gdzie text wyswietla sie (MEMO) w polach dbgrid co z tym zrobic?

1. zamienić text na varchar
2. zamienić TDBGrid na np. SMDBGrid
3. napisać własną obsługę pól typu blob

Żeby rozwiązać ten problem należy otworzyć Field Editor (kliknąć na komponencie klasy TTable lub pochodnych prawym klawiszem myszy i z menu kontekstowego wybrać opcję Field Editor) i dodać wszystkie atrybuty (kliknąć prawym klawiszem myszy na wolnym obszarze okna Field Editor i wybrać opcje Add all Fields). Następnie w otworzonym oknie Field Editor należy zaznaczyć atrybut, który odpowiada za wyświetlanie napisu "<Memo>" i przejść do Inspektora Obiektów w celu oprogramowania zdarzeń onGetText i onSetText w następujacy sposób:

procedure TForm1.Table1RECENZJAGetText(Sender: TField; var Text: String; DisplayText: Boolean);
begin
    Text:=Trim(Sender.AsString);
end;

procedure TForm1.Table1RECENZJASetText(Sender: TField; const Text: String);
begin
    Sender.AsString:=Text
end;

Funkcja Trim usuwa końcowe niedrukowane znaki