通过DLL加载的窗口最小化或切换后会消失 的解决办法

    技术2022-05-13  15

    在DLL调用的时候要传入Application 

    例:

    procedure CreateForm(vApp:TApplication); begin Application.handle:= vapp.handle; Frm_1:= TFrm_TJJSQ.Create(Application); Frm_1.Showmodal; end; {创建窗口前要设置application.handle. 可以将handle或整个application传过去. 设置dll环境的application的handle后, 不管窗口是用create(application),create(nil),create(self) 都不会有问题.}


    最新回复(0)