Delphi调用DLL文件里的窗体
在我们写程序时候,有些窗体要重复使用,最好就是把这些窗体写到一个DLL文件里去,这样就比较方便调用,下面的演示如何调用DLL文件里的窗体。
DLL文件
{*******************************************************}
{ }
{ 测试调用Dll里的窗体 }
{ }
{ }
{*******************************************************}
library TestDll;
uses
SysUtils, Classes, U_Login in 'U_Login.pas' {Frm_Login};
{$R *.res}
procedure showlogin(); stdcall;
//起动登录窗体
beginFrm_Login := TFrm_Login.Create(nil);
try
Frm_Login.ShowModal;
except
Frm_Login.Free;
end;
end;
exports //导出函数和过程名
showlogin;
begin
end.
主程序源码
{*******************************************************}
{ }
{ 测试调用Dll里的窗体