Table1.First; while not Table1.Eof then begin ComboBox1.Items.Add(Table1.FieldByName('UserId').AsString); Table1.Next; end;如果使用query1 那把上面的Table全改成Query就可以了
var userid :string; ///////////////// with TempQuery do begin if Active then Close; SQL.Clear ; SQl.Add (' select username,userid,dwh from users where dwh='+QuotedStr('18')); open; userid:=query1.fieldbyname('userid').asstring; end;
取出所有用户名,放在下列表内: query1.First; while not query1.Eof then begin ComboBox1.Items.Add(query1.FieldByName('UserId').AsString); query1.Next; end;fieldbyName是肯定有的, 你编译下就知道了
userid:=adoquery1.fieldbyname('userid').asstring
userid:=query1.fieldbyname('userid').asstring
或fieldvalue
while not Table1.Eof then
begin
ComboBox1.Items.Add(Table1.FieldByName('UserId').AsString);
Table1.Next;
end;如果使用query1 那把上面的Table全改成Query就可以了
/////////////////
with TempQuery do
begin
if Active then Close;
SQL.Clear ;
SQl.Add (' select username,userid,dwh from users where dwh='+QuotedStr('18'));
open;
userid:=query1.fieldbyname('userid').asstring;
end;
query1.fields[1].asstring//0是username 1是userid 依此类推
query1.First;
while not query1.Eof then
begin
ComboBox1.Items.Add(query1.FieldByName('UserId').AsString);
query1.Next;
end;fieldbyName是肯定有的, 你编译下就知道了
虽然打个.后不能弹出来
你可以直接输入