delphi Text框怎么调用数据库值

Question

dm.qrylr.FieldByName('srscsxgm').AsFloat:=strtofloat(sr12.Text)+strtofloat(sr15.Text);    //Srscsxgm为SR17.Text输入的值,Sr15.Text值已知dm.qrylr.FieldByName('srssxgm').AsFloat:=strtofloat(sr17.Text)+strtofloat(sr20.Text);     //SR20.Text值已知
现要求Srssxgm的值,请问有谁知道怎么解决么?我在写VAR的时候,这样写可是提示是错误:   Var   sr17.Text = dm.qrylr.FieldByName('srscsxgm');

Answer 1

sr17.Text   =   dm.qrylr.FieldByName( 'srscsxgm ').asstring; 

Answer 2

edit1.Text:=adoquery1.FieldByName('srscsxgm').asstring;   

Answer 3

edit1.Text:=adoquery1.FieldByName('srscsxgm').asstring;