高手莫笑！！

Question

我用adotable连接一个叫ip的表，表中字段、内容如下
id  pass
12   1
23   2
在form里加入两个edit1、edit2和一个button1
当我在edit1中写入12的时候在button1按钮触发的时候，现在edit2中显示pass字段的对应内容！既是1
当我在edit1中写入23的时候在button1按钮触发的时候，现在edit2中显示pass字段的对应内容！既是2
我做得是用户密码验证，不知道用adotable怎么写！

Answer 1

adoquery1.sql.clear;
  adoquery1.sql ;= 'SELECT * FROM IP';
  adoquery1.active := true;
  if ADOQuery1.FieldByName('PASS').asstring = Edit2.Text then
    ShowMessage('OK~')
  else
    ShowMessage('ERROR~')

Answer 2

最简单的可以两个EDIT框，一个BUTTON按钮，在两个EDIT中分别输入Id和Password，然后以些作为条件到库里查一下varif AdoQuery1.Active then
  AdoQuery1.Close;
AdoQuery1.Sql.Clear;
AdoQuery1.Sql.Add(' select Id from ip where Id = ' + QuotedStr(Edit1.Text) + ' and );

Answer 3

最简单的在界面上放两个EDIT和一个BUTTON，EDIT分别输入Id和Password，然后点BUTTON到库里查一下procedure TForm1.Button1Click(Sender: TObject);
var
  sSql: string;
begin
  sSql := ' select Id from ip'
    + ' where Id = ' + QuotedStr(Edit1.Text)
    + ' and pass = ' + QuotedStr(Edit2.Text);
  if ADOQuery1.Active then
    ADOQuery1.Close;
  ADOQuery1.SQL.Clear;
  ADOQuery1.SQL.Add(sSql);
  ADOQuery1.Open;
  if not ADOQuery1.Eof then
    ShowMessage('Pass');
end;