DELPHI变量问题

显示全部楼层 · 2009-8-2 17:44:08

form1是mainform,用ADOQuery1检查用户.
成功后显示form2，在form2中提取ADOQery1中当前用户信息到状态栏上.
再关闭ADOQuery1.
这样写代码正确吗？
但这样就一直占用着ADOQuery1,再用作其他用途修改过SQL句有时会出错。
问题：有可以在form1登录成功后就创建用户信息的变量，供后面的form使用。而不用地直占用ADOQuery?

千问 · 2009-8-2 17:44:08

在LoginForm即登陆窗体中定义全局变量，在代码中public定义，如下所示： public
{ Public declarations }
uname,upassword:string;//定义全局变量end;登陆窗体中用户输入：procedure TLoginForm.FormCreate(Sender: TObject);beginuname := ComboBox1.text;//用户名pass := Edit1.Text; //密码end;状态栏显示登陆的用户名：（其中加Timer和tatusBar控件）procedure TBalanceForm...

千问 · 2009-8-2 17:44:08

你可以自己创建这个保存用户信息的变量，定义成全局变量就可以，也可以放在其他任何位置，只要form1和form2都能访问就行...