procedure TForm1.ComboBox1Change(Sender: TObject);begin
dcomconnection1.AppServer.sql('select name from users');
ClientDataSet1.close;
ClientDataSet1.open; while not ClientDataSet1.eof= true do
begin combobox1.AddItem(ClientDataSet1.Fields[0].AsString);//它说这里出错!!
ClientDataSet1.next;
end;
end;
错在那?请高人指点!!!
dcomconnection1.AppServer.sql('select name from users');
ClientDataSet1.close;
ClientDataSet1.open; while not ClientDataSet1.eof= true do
begin combobox1.AddItem(ClientDataSet1.Fields[0].AsString);//它说这里出错!!
ClientDataSet1.next;
end;
end;
错在那?请高人指点!!!
[Fatal Error] Pclient1.dpr(5): Could not compile used unit 'Unitclient1.pas'