select a.UserName AUserName,b.UserName BUserName from Table1 a,Table2 b where...Query1.FieldByName('AUserName').
Query1.FieldByName('BUserName'). 

解决方案 »

  1.   

    办法一:
    select a.username as 姓名一,
      b.username as 姓名二
    from table1,table2.fieldbyname('姓名一')
    fieldbyname('姓名二')办法二:
    select a.UserName,
      b.UserName 
    from Table1 a,Table2 b where fields[0].value 就是a.username
    fields[1].value 就是b.username办法一一般是用来对付可视的查询
    办法二是用来对付不需要可视的查询,方便,简介。如:
    with Tquery.create(nil) do begin
      databasename :='server';
      sql.add('select a.UserName,b.UserName from Table1 a,Table2 b where ...');
      open;
      var1 :=fields[0].asstring;
      var2 :=fields[1].asstring;
      free;
    end;