DBGrid и поля с типом MEMO

[doncova1]

А как сделать чтоб DBGrid отображал текст поля с типом MEMO

[mihali4]

Напрямую с Мемо не поработаешь.

В обработчике GetText TMemoField поместите следующую строку:

Text := GrabMemoAsString(TMemoField(Sender));

А это - сама функция:

f

unction GrabMemoAsString(TheField : TMemoField): String;
begin
if TheField.IsNull then

Result := '' else
with TBlobStream.Create(TheField, bmRead) do
begin
if Size >= 255 then
begin
Read(Result[2], 255);
Result[1] := #255;
end else
begin
Read(Result[2], Size);
Result[1] := Chr(Size);
end;
Free;
while Pos(#10, Result) > 0 do
Result[Pos(#10, Result)] := ' ';
while Pos(#13, Result) > 0 do
Result[Pos(#13, Result)] := ' ';
end;
end;

[Ma-Mi]

Извините пожалуйста, а Вы не могли бы подробнее написать? про отображение, а именно
> GetText (фнкц)
TMemoField в var'e объявляем?
Я прсото впервые сталкиваюсь с ДБ в Дэльфи. Извините за тупые вопросы

[Stilet]

Донцова, а зачем такой изврат? Кинь рядом DBMemo и наслаждайся.

[crc83]

TJvDBUltimGrid из JEDI VCL решит эту и многие другие интересные проблемы