DLL中的Forms问题，大家来看一下啊！！

关注

转载最新推荐文章于 2025-09-30 15:28:58 发布 177 阅读 AI 写同款· GEO 优化 ›

DLL中的Forms问题，大家来看一下啊！！ Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiAPI/html/delphi_20061208104302104.html
我在窗口的panel中调用了一个dll文件中的窗口，调用是一切正常的，但要加
Panel1.updatecontrolstate窗口才能正常的显示出来。如果我的dll窗体中用了pagecontrol，问题就出现了，当按上面的tab切换时， panel的显示不会发生变化，除非再次调用Panel1.updatecontrolstate。关键是这个语句怎么加，加在什么地方?大家可以尝试一下。

你跟踪以下就知道了，Panel1.updatecontrolstate,实际上是给vcl发送消息，
updatecontrolstate发送的是cm_base+25;

所以要么你在本地窗口切换的时候sendmessage，要么在dll窗口中的onpaint事件里
写入.

//不知道对不对，楼主看看

我的子窗口代码：
function CreateDLLForm(myAPP:TApplication;myScr:TScreen):TForm;
begin
Application:=myApp;
Screen:=myScr;
application.CreateForm(TfrmDllForm,frmDllForm);
result:=frmDllForm;
end;

我的主窗口代码：
myHandle:=LoadLibrary('dllproj.dll');
if myHandle<>0 then
begin
@myProc:=GetProcAddress(myHandle,'CreateDLLForm');
if assigned(myProc) then
begin
DLLForm:=myProc(Application,Screen);
DllForm.Parent:=Panel1;
DLLform.Show;
Panel1.UpdateControlState;
end;
end;

我尝试过了，dll窗口的pagecontrol发生变化的时候，主窗口好像无法感知。