2
내 응용 프로그램에 test.bpl 패키지가 있고 이름이 myPackageForm 인 양식이 있습니다. myPackageForm을 닫을 때 내 패키지를로드 한 후 응용 프로그램이 종료됩니다.Delphi XE4 : 내부 패키지 양식을 닫으면 응용 프로그램이 종료됩니다.
주 프로젝트 초기화 :
Application.Initialize;
Application.CreateForm(TMainForm,MainForm);
Application.Run;
MainForm FormCreate :
aPackage := LoadPackage('my bpl path'+test.bpl);
@P_ItemClick := GetProcAddress(aPackage,'ItemClickExcecute');
MainForm ButtonClick :
P_ItemClick(Sender);
testPackage CommandsUnit :
Class Procedure TmyPackagForm.ShowForm;
begin
if not Assigned(myPackagForm)
myPackagForm := Application.CreateForm(TmyPackagForm ,myPackagForm);
myPackagForm.Show;
end;
그리고으로 onClose 절차에
이있다 : 솔루션으로Release;
내가 다른 명령 시도 :
myPackagForm := TmyPackagForm.Create(Application);
에를
Procedure ItemClickExecute(Sender : TObject)
begin
TmyPackageForm.ShowForm();
end;
exports
ItemClickExecute;
end.
myPackagForm 그것을 보여줄 수있는 클래스 프로 시저가 myPackagForm 생성;
누구나 무슨 일이 있었는지 알 수 있습니까? 패키지에서 CreateForm 명령을 사용하여 Delphi XE4을 사용할 수 있습니까?
변경된 사항이 없습니다. CreateForm으로 만든 첫 번째 폼이 주요 폼입니다. –
@David Heffernan 네 말이 맞아. 하지만 내 패키지에서 Application.CreateForm 명령을 사용할 때 Delphi7에서 Package Forms를 닫는 데 아무런 문제가 없었습니까? –
나는 무슨 일이 일어나고 있는지 잘 알고있다. 나는 대답을 쓸 것이다. –