主窗口(Form1)用的是 SkinManager,子窗口(Fomr2)用的是SkinProvider。
用代码创建MDI子窗口时
procedure TForm1.FormShow(Sender: TObject);
begin
if Form2 = nil then
Application.CreateForm(TForm2,Form2);
Form2.show;
end;
报以下错误---------------------------
Debugger Exception Notification
---------------------------
Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 0050E1EB in module 'Project1.exe'. Read of address 0000022C'. Process stopped. Use Step or Run to continue.
---------------------------
OK Help
---------------------------用的皮肤控件的版本为(AlphaControls V7.26)。
请问一下这是什么原因导致的了?
用代码创建MDI子窗口时
procedure TForm1.FormShow(Sender: TObject);
begin
if Form2 = nil then
Application.CreateForm(TForm2,Form2);
Form2.show;
end;
报以下错误---------------------------
Debugger Exception Notification
---------------------------
Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 0050E1EB in module 'Project1.exe'. Read of address 0000022C'. Process stopped. Use Step or Run to continue.
---------------------------
OK Help
---------------------------用的皮肤控件的版本为(AlphaControls V7.26)。
请问一下这是什么原因导致的了?
var form2:Tform2;
begin
form2:=Tform2.create(self);
...
end
if assign(Form2) then Form2:=nil;
Application.CreateForm(TForm2,Form2);
Form2.show;