三层结构，在客户端的登录窗口中当打开数据集后就会报错。

Question

procedure Tclientlogin.ComboBox1Enter(Sender: TObject);
  var
  i:integer;
begin
  combobox1.items.clear;
  with clientdm.c_cam_sys_user do
    begin
      close;
      commandtext:='select * from cam_sys_user';
      open;
     // first;
      //for i:=1 to recordcount do
       // begin
        //  combobox1.items.add(trim(fieldbyname('name').asstring));
        //  next;
       // end;
    end;
end;
只要open c_cam_sys_user，application.Terminate运行就会出错，显示："access violation at address 00486bb2 in module 'client.exe'...."
难道做登录窗口时的用户名是让用户自已输入吗。

Answer 1

我觉得应该没有问题，是不是你得clientdataset的属性设置的问题？

Answer 2

： idilent(说错了别怪我) ( ) 信誉：100  2003-02-13 12:53:00  得分:0 
 
 
  我觉得应该没有问题，是不是你得clientdataset的属性设置的问题？
--------------------------------------------------------- 
 
c_cam_sys_user: TClientDataSet;
c_cam_sys_user.remoteserver 为SocketConnection1
c_cam_sys_user.providername 为p_cam_sys_user
其它都是默认值
在中间层
    q_cam_sys_user: TADOQuery;
    p_cam_sys_user: TDataSetProvider;