W
WenSoft
Unregistered / Unconfirmed
GUEST, unregistred user!
因为用户登陆的时候，在主程序里取得当前用户的ID值，然后传到DLL子窗子中，DLL子窗中根据ID值判断权限的 ！
希望能有个给我做一个小例子，
1、在主程序里自己定义一个变量：
private
USERID:string;//////////要传递的参数
{ Private declarations }
public
.
.
.
procedure TForm1.FormShow(Sender: TObject);
begin
// 在此调和DLL窗体，并将 USERID 传递给DLL中
end;
2、在DLL窗体中，（在这个地方我就不会了，请各位帮我解决）
在窗体Form_Zi中，上面有一个Label控件，当显示时，
procedure TForm_Zi.FormShow(Sender: TObject);
begin
Label1.Caption:=从主程序里面传过来的USERID的值
end;
3、DLL子窗体如何响应主程序里的点击事件？
如主程序里面有一个按钮，点一下就弹出“关于”窗体，在DLL窗体上也有这么一个按钮，点一下就弹出“关于”窗体!
希望能有个给我做一个小例子，
1、在主程序里自己定义一个变量：
private
USERID:string;//////////要传递的参数
{ Private declarations }
public
.
.
.
procedure TForm1.FormShow(Sender: TObject);
begin
// 在此调和DLL窗体，并将 USERID 传递给DLL中
end;
2、在DLL窗体中，（在这个地方我就不会了，请各位帮我解决）
在窗体Form_Zi中，上面有一个Label控件，当显示时，
procedure TForm_Zi.FormShow(Sender: TObject);
begin
Label1.Caption:=从主程序里面传过来的USERID的值
end;
3、DLL子窗体如何响应主程序里的点击事件？
如主程序里面有一个按钮，点一下就弹出“关于”窗体，在DLL窗体上也有这么一个按钮，点一下就弹出“关于”窗体!
app:Thandle;pUid
char):integer;stdcall;