OleContainer и поток

← →
TNT (2008-08-04 08:57) [0]

Пытаюсь загрузить данные в OleContainer из потока :

Mem_St := TMemoryStream.Create;
IBQuery1DOK_N.SaveToStream(Mem_St);
with TMDIChild.Create(Application) do begin
try
OleContainer1.LoadFromStream(Mem_St);
// OleContainer1.DoVerb(ovPrimary);
except
Release;
Free;
end;
end;

На строке -
OleContainer1.LoadFromStream(Mem_St);
дает сообщение - ошибка чтения потока .
В чем причина ?
Спасибо .

← →
Плохиш © (2008-08-04 10:15) [1]

Mem_St.Position := 0;

← →
Плохиш © (2008-08-04 10:16) [2]

И не забуть Mem_St уничтожить после использования.

← →
jack128_ (2008-08-04 13:23) [3]

> except
> Release;
> Free;
> end;

круто.

Надо еще добавить ControlShut

OleContainer и поток Найти похожие ветки