首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

delphi dbgrideh的checkbox如何就点不上呢

2012-02-24 
delphi dbgrideh的checkbox怎么就点不上呢我设置了相关的checkboxestrue这个好了,复选框是有了,可是就是

delphi dbgrideh的checkbox怎么就点不上呢
我设置了相关的checkboxes=true
这个好了,复选框是有了,可是就是点不了。我的数据库是oracle的,据说里面是没有布尔类型的。所以我设置是char(1)默认是'0'
然后keylist '1','0'.可是为什么就是点不了呢?要编写什么事件啊?我用的是ehlib的,他的那个demo我也看了,好像是用了tdbcheckbox。但是没有看懂。
尤其郁闷的是,我有个好使的源代码,也没有照demo那么设置,就是好使,不解。
我的不可点击的源代码如下:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Grids, DBGrids, RzDBGrid, DBGridEh, DB, ADODB;

type
  TForm1 = class(TForm)
  DBGridEh1: TDBGridEh;
  ADOConnection1: TADOConnection;
  ADOQuery1: TADOQuery;
  DataSource1: TDataSource;
  procedure DBGridEh1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumnEh; State: TGridDrawState);
  private
  { Private declarations }
  public
  { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.DBGridEh1DrawColumnCell(Sender: TObject;
  const Rect: TRect; DataCol: Integer; Column: TColumnEh;
  State: TGridDrawState);
begin
  DBGridEh1.DefaultDrawColumnCell(Rect,DataCol,Column,State);
end;

end.


[解决办法]
你连接的是oracle数据库,我这儿没有,改成sql后可以啊

热点排行