PHP DM Gate v0.9 » EmbeddedWB <span class="vd">[D7, WinXP]</span>

RGV © (21.04.11 05:05) [0]

Добрый день. Описываю ситуацию.
на форме2 кидаю этот самый EmbeddedWB обзываю wb
OnCreate пишу wb.navigate(ExtractFilePath(Paramstr(0))+'smiles.html');

Суть формы это выбор смайла.

procedure TSmilesFrm.wbBeforeNavigate2(ASender: TObject;
const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
Headers: OleVariant; var Cancel: WordBool);
begin
if (pos('smiles.htm',url)>0) then cancel:=false else
begin
cancel:=true;
if pos('.gif',url)>0 then
begin
smile:=url;
modalresult:=1;
end;
end;
end;

так вот после выбора смайла прога вылетает с ошибкой:
Project blablabla faulted with message 'access violation at 0x00ffblablabla write of address 0x00000000'. Process stoped. Use blablabla

в коде приведенном выше пробовал убирать modalresult:=1
Если я не щелкаю по смайлу , а просто форму закрываю, тогда проблем нет, как только я выбираю смайл, и закрываю форму - снова вылетает ошибка.

Пробовал использовать TWebBroser тоже самое.

Пробовал OnClose делать так Wb.loadFromString(''); не помогает.

Пробовал создавать форму динамически, т.е. убрал из Auto-create тоже самое.

Подскажите пожалуйста, как выдти из дурацкой ситуации.

<Цитата>
DimaBr © (21.04.11 08:26) [1]

Внимание! Здесь обсуждаются вопросы, связанные с разработкой компонентов, редакторов свойств, редакторов компонентов и экспертов IDE.
Вопросы по поиску и использованию готовых компонентов, редакторов или экспертов являются нарушением тематики и могут быть удалены.

<Цитата>
RGV © (22.04.11 10:56) [2]

Извиняюсь, ошибся веткой.

<Цитата>