在MDI程序中,于TMDIChildForm上放置DHTMLEdit控件,新建多个子窗口,对其中任一窗口进行保存后,在关闭此窗口时便会弹出类似"Access violati

Question

在MDI程序中,于TMDIChildForm上放置DHTMLEdit控件,新建多个子窗口,对其中任一窗口进行保存后,在关闭此窗口时便会弹出类似"Access violation at address 5B008225 in module "DHTMLED.OCX".Read of address 00000080"的对话框；若只开一个子窗口，则进行任何操作都无碍。不知何故，盼高手指点。

Answer 1

请问netlib(河外孤星)作何指定？

Answer 2

procedure TMainForm.menuFileNewClick(Sender: TObject);
var
    Child:TChildForm;
begin
    Child:=TChildForm.Create(Application);
    Child.Caption:='NewPage'+IntToStr(MDIChildCount);
end;

Answer 3

试试!!
procedure TMainForm.menuFileNewClick(Sender: TObject);
var
    Child:TChildForm;
begin
    Child:=TChildForm.Create(self);
    Child.Caption:='NewPage'+IntToStr(MDIChildCount);
end;你的代码没有问题!!!

Answer 4

到这里下一个http://www.csdn.net/cnshare/soft/12/12234.shtm软件侃侃!!是用Delphi 5编写的!!!

Answer 5

打开delphi生成的DHTMLEDLib_TLB.pas文件，把：
  procedure TDHTMLEdit.CreateControl;    procedure DoCreate;
    begin
      FIntf := IUnknown(OleObject) as IDHTMLEdit;
    end;  begin
    if FIntf = nil then DoCreate;
  end;  改为  procedure TDHTMLEdit.CreateControl;    procedure DoCreate;
    begin
      FIntf := IUnknown(OleObject) as IDHTMLEdit;
      FIntf._AddRef;   <--------------增加此行
    end;  begin
    if FIntf = nil then DoCreate;
  end;即可