关于全局变量传到另外一个FORM无值的问题?急!!急!!急!!急!!急!! 各窗体的创建顺序??不要放到 form里放到var里companyid:string; 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 我想你的TuserloginForm.FormCreate(Sender: TObject);在 2.给变量赋值procedure TCompanyForm.DBGrid1CellClick(Column: TColumn);varmyvariant:variant;beginmyvariant:=column.field.Value;companyid:=vartostr(myvariant);SeSkinButton1.Enabled:=True;end;前已经建立了,所以没有值了。改为:TuserloginForm.FormActive(Sender: TObject);试试。。 procedure TuserloginForm.FormCreate(Sender: TObject);这句语句有问题,改为 FormActive 试试,仔细想想你就会明白的哦 强人,高手进。关于打印的问题 怎么实现在form1上用鼠标点击下,出现个红点。 怎样用Delphi开发Asp调用的ActiveX(在线等待) 求助关于tdxdbgrid的列的统计问题 模糊查询 一个关于窗口的小问题!!!小弟初学DELPHI请多多指教!! QuickRep中打印的问题?及等!!! 关闭子窗体的时候,子窗体是最小化,怎样关闭? 廉价的小问题:看看不妨! 通过ODBC访问Excel时的用户名和口令是什么 为什么我的 FoxMail 3.11 在 Windows 2000 下发信失败?? fontdialog如何使用???
我想你的TuserloginForm.FormCreate(Sender: TObject);
在 2.给变量赋值
procedure TCompanyForm.DBGrid1CellClick(Column: TColumn);
var
myvariant:variant;
begin
myvariant:=column.field.Value;
companyid:=vartostr(myvariant);
SeSkinButton1.Enabled:=True;
end;前已经建立了,所以没有值了。改为:TuserloginForm.FormActive(Sender: TObject);试试。。
procedure TuserloginForm.FormCreate(Sender: TObject);这句语句有问题,改为 FormActive 试试,仔细想想你就会明白的哦