TO YESKERT1:首先感谢你的热心帮助,我也是用的d7+iw7.0.11,我试过别的电脑上也一样!
下面我举出出错的例子: UNIT3 是出错的单元 unit2是建立的FRAME UNIT1是基类表单将UNIT2建立的FRAME放入UNIT1中,UNIT3是继承UNIT1的!保存退出后再打开项目就会出错!!!
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, IWExtCtrls, IWVCLBaseControl, IWBaseControl, IWBaseHTMLControl,
IWControl, IWHTMLControls;
type
TFrame2 = class(TFrame)
IWLink1: TIWLink;
IWLink2: TIWLink;
IWLink3: TIWLink;
IWImage1: TIWImage;
IWLink4: TIWLink;
IWLink5: TIWLink;
IWLink6: TIWLink;
IWLink7: TIWLink;
private
{ Private declarations }
public
{ Public declarations }
end;
implementation
{$R *.dfm}
end.
unit Unit1;
interface
uses
Classes, SysUtils, IWAppForm, IWApplication, IWColor, IWTypes,
IWVCLBaseControl, IWBaseControl, IWBaseHTMLControl, IWControl,
IWExtCtrls, Controls, Forms, Unit2;
type
TIWForm1 = class(TIWAppForm)
IWImage1: TIWImage;
Frame21: TFrame2;
public
end;
implementation
{$R *.dfm}
end.
unit Unit3;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Unit1, IWCompCheckbox, IWCompButton, IWVCLBaseControl,
IWBaseControl, IWBaseHTMLControl, IWControl, IWExtCtrls;
type
TIWForm3 = class(TIWForm1)
IWButton1: TIWButton;
IWButton2: TIWButton;
IWCheckBox1: TIWCheckBox;
private
{ Private declarations }
public
{ Public declarations }
end;
var
IWForm3: TIWForm3;
implementation
{$R *.dfm}
initialization
TIWForm3.SetAsMainForm;
end.