Question

DELPHI中如何将执行SQL语句后的结果赋值给状态栏？？？

Answer 1

如不雅楼主是由form2调用上岸窗体，想让上岸窗体返回值的话，可以在上岸窗体单位中添加一个公共变量或在上岸窗体public中添加一个公共属性，上岸成功后大大表中掏出RY0102，赋给公共变量或添加的那个属性，返回form2后，在窗体释放前取得这个变量的值就保存，或直接写道form2的状况栏里去如楼上所说，

Answer 2

procedure TForm1.Button1Click(Sender: TObject);//登录按钮S : string;beginS := 'select * from RY001 where RY0101 ='+ QuotedStr(Edit1.Text) + ' and RY0105 ='+QuotedStr(Edit2.Text);with ADOQuery1 do begin Close; SQL.Clear; SQL.Add(S); Open; else end;var if ADOQuery1.RecordCount <> 0 then begin Form2.StatusBar1.Panels[0].Text := ADOQuery1.FieldByName('RY0102').AsString; end begin //做出其他断定，是否用户名、暗码缺点等 Form2.Show; end;end;前提：要双击StatusBar1，为其添加Panels，不然会报错。不知如许是否知足。一路进修……

Answer 3

那form2是主动创建的┞氛样手动创建的?如不蚜鲈动创建的就在判毕暗码的时刻,如不雅暗码对了,就一块把RY0102的值也掏出来,直接赋值给form2的状况栏就行了.如不雅是手动创建的,那就在form2创建后再赋值.

Answer 4

异常感激楼上的同慌绫乔！！！正在揣摩中。。。