请教关于一个dll的问题 我的主程序调用dll后,dll中如果有窗体调用的话,最后调出的窗体总是跑到后面去,请问高手怎样解决此问题。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 SetWindowLong(Handle, GWL_EXSTYLE, GetWindowLong(Handle, GWL_EXSTYLE) or WS_EX_TOOLWINDOW); 我刚才没有说清楚,如果没有传句柄时dll中如果有窗体调用的话,最后调出的窗体总是跑到后面去,如果传句柄,dll关闭时,主窗体最小化,并且看不到。帮帮忙好吗 刚刚给另外一个贴子写了一个, 一并发给你吧library Project2;uses SysUtils, Classes, Forms, WIndows;var FhPrevApp: HWND:{$R *.RES}procedure DllHandler(AReason: Longint);begin case AReason of DLL_PROCESS_ATTACH: FhPrevApp := Application.Handle; DLL_PROCESS_DETACH: Application.Handle := FhPrevApp; end;end;procedure CreateChild(AhApp: HWND; AhParent: HWND; AIndex: Integer); stdcall;var f: TForm;begin Application.Handle := AhApp; case AIndex of begin 0: begin f := TForm1.Create(Application); SetParent(f, AhParent); f.Show; end; 1: begin f := TForm2.Create(Application); SetParent(f, AhParent); f.Show; end; end;end;exports CreateChild;begin @DllProc := DllHanlder;end. 还是没怎么听懂,用showmodal在dll中显示模式窗体不就在前面吗? delphi 存储过程 数据库插入 请教各位老师,关于delphi 编写 连接HTTPS服务器提交和接收返回信息 请问这种数据操作如何做效率比较高 请问怎样关闭MDI子窗口? 如何判断网络是否连接? 如何得到调用窗体的返回植? 请教各位一个问题! 父窗体与子窗体的DBgrid鼠标中轴滚动问题 急急急!如何实现整型与二进制的转换?(给50分) 小弟刚学DELPHI,请问各位大虾一个问题 两个小问题. 诚征考勤系统的排班设计方案
or WS_EX_TOOLWINDOW);
library Project2;uses
SysUtils,
Classes,
Forms,
WIndows;var
FhPrevApp: HWND:
{$R *.RES}
procedure DllHandler(AReason: Longint);
begin
case AReason of
DLL_PROCESS_ATTACH: FhPrevApp := Application.Handle;
DLL_PROCESS_DETACH: Application.Handle := FhPrevApp;
end;
end;procedure CreateChild(AhApp: HWND; AhParent: HWND; AIndex: Integer); stdcall;
var
f: TForm;
begin
Application.Handle := AhApp;
case AIndex of
begin
0:
begin
f := TForm1.Create(Application);
SetParent(f, AhParent);
f.Show;
end;
1:
begin
f := TForm2.Create(Application);
SetParent(f, AhParent);
f.Show;
end;
end;
end;exports
CreateChild;begin
@DllProc := DllHanlder;
end.