关于EDIT控件的问题

[zl1215]

请教EDIT.TEXT中的值是什麽格式的,是STRING型的吗?
下面三句话要在哪里改一下:
adoquery1.FieldByName('userpok').AsString=edit1.Text
adoquery1.FieldByName('id').AsString=edit2.Text
adoquery1.SQL.Add('select * from loginpok where userpok='+edit1.text)
user为字符型
ID为整型

[sysu]

第三句：
adoquery1.SQL.Add('select * from loginpok where userpok='''+edit1.text+'''')

[yzdiyu]

adoquery1.FieldByName('userpok').AsString=edit1.Text
adoquery1.FieldByName('userpok').AsString:=edit1.Text?

adoquery1.FieldByName('id').AsString=edit2.Text
adoquery1.FieldByName('id').AsString:=edit2.Text?

adoquery1.SQL.Add('select * from loginpok where userpok='+edit1.text)
adoquery1.SQL.Add('select * from loginpok where userpok='''+edit1.text+'''')

[zl1215]

adoquery1.FieldByName('id').AsString=edit2.Text
adoquery1.FieldByName('userpok').AsString=edit1.Text
两句不是赋值，是比较它们的值是否相同

[windy2000]

这是更改当前记录字段值
adoquery1.edit;
adoquery1.FieldByName('userpok').AsString=trim(edit1.Text);
adoquery1.FieldByName('id').Asinteger=strtoint(trim(edit2.Text));
adoquery1.post;

这是查询记录集
adoquery1.close;
adoquery1.sql.clear;
adoquery1.SQL.Add('select * from loginpok where userpok='+
''''+trim(edit1.text)+'''');
adoquery1.open;

[darkhorsedba]

搞不懂你，既然id为整形，你还用String;

adoquery1.FieldByName('userpok').AsString=edit1.Text;
adoquery1.FieldByName('id').AsInteger=StrToInt(edit2.Text);
adoquery1.SQL.Add('select * from loginpok where userpok=:user');
adoquery1.sql.ParamByName('user').asstring:=Edit1.text;

[darkhorsedba]

奥，
adoquery1.FieldByName('id').AsInteger=StrToInt(edit2.Text)

[Comer]

adoquery1['userpok'] := edit1.Text;
adoquery1['id'] := StrToInt(edit2.Text);
adoquery1.SQL.Add('select * from loginpok where userpok='''+edit1.text+'''')

我觉得用Parameters比较好