使用DBGRIDEH  和adoquery  我怎么不能显示出数据来呢 .dbgrid就可以,还有使用DBGRIDEH 进行数据输入,怎么做,包括增加\ 修改和删除
步骤 越详细越好

解决方案 »

  1.   

    DBGRIDEH可以直接連DBNavigator進行新增修改刪除的動作﹗如果要自己加BUTTON進行﹐見代碼(把相關dataset修改一下即可)﹕
    不知道是不是樓主要的﹐如果會錯意﹐請見諒﹗
    procedure TPMMtInfo.BtnAddClick(Sender: TObject);
    begin //新增
     Table1.Edit;
     Table1.Insert;
     DBGrideh1.ReadOnly:=false;
    end;procedure TPMMtInfo.BtnModifyClick(Sender: TObject);
    begin //修改
      DBGridEh1.ReadOnly:=false;
      table1.Edit;
    end;procedure TPMMtInfo.BtnDelClick(Sender: TObject);
    begin //刪除
     if application.MessageBox('Confirm Delete?','Delete Information',mb_okcancel+mb_defbutton1) =idok then
        if table1.RecordCount>0 then
          begin
            table1.Delete;
         end
        else
          application.MessageBox('No data to delete!','Information',mb_okcancel+mb_defbutton1);
    end;
    procedure TPMMtInfo.BtnSaveClick(Sender: TObject);
    begin //保存
     table1.edit;
     try
      table1.Post;
      DBGridEh1.ReadOnly:=true;
     except
         showmessage('數据不能保存!');
         DBGridEh1.SetFocus;
      end;
        btnadd.SetFocus;
    end;procedure TPMMtInfo.BtnCancelClick(Sender: TObject);
    begin //取消
    table1.Cancel;
    btnAdd.Enabled:=true;
    btnDel.Enabled:=true;
    btnFind.Enabled:=true;
    btnModify.Enabled:=true;
    btnSave.Enabled:=true;
    btnCancel.Enabled:=true;
    btnExp.Enabled:=true;
    btnPrint.Enabled:=true;
    end;procedure TPMMtInfo.BtnPrintClick(Sender: TObject);
    begin //打印
      printDBGridEh1.Preview;
    end;
      

  2.   

    andyzhou1101(〆.赱 極端(http://lovelcy.blogcn.com)) 好像說得我神出鬼沒似的
      

  3.   

    to   空谷幽兰 
      你的非的使用table1 吗 使用adoquery 不可以吗