因为用户登陆的时候，在主程序里取得当前用户的ID值，然后传到DLL子窗子中，DLL子窗中根据ID值判断权限

因为用户登陆的时候，在主程序里取得当前用户的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;