var AQuery : TADOQuery;
begin
   AQuery:=TADOQuery.create(nil);
   with AQuery do begin 
      ConnectionString:='.................'; // 自己編吧，或者用adoconnection建好再用
      Connection:=ADOConnection1;            // 如果你用adoconnection連接的話
      SQL.CLEAR;
      SQL.add('SELECT * FROM TABLE1 WHERE NO=''' EDIT1.TEXT '''');
      execsql;
      open;
      if recordcount>0 then begin 
         Showmessage('耶！這個table裡有我要的東西');  // 請別照抄，自己看著辦，想辦啥就辦啥
      end;
      close;          SQL.CLEAR;
      SQL.add('SELECT * FROM TABLE2 WHERE NO=''' EDIT1.TEXT '''');
      execsql;
      open;
      if recordcount>0 then begin 
         Showmessage('耶！這個table裡有我要的東西'); 
      end;
      close;
      // 以此類推，每在一個table里找到資料，就如此辦下去就好了！
   end;
   freeandnil(AQuery);  // 因為AQuery是create(nil)，所以在這里一定要free掉，freeandnil會做的更徹底
end;