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?
0
0
- zamienić text na varchar
- zamienić TDBGrid na np. SMDBGrid
- napisać własną obsługę pól typu blob
0
Ż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