DBGridEh的问题! 我想让DBGridEh不管有没有数据源都显示网格出来,应该怎么做?? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 但是设置FooterRowCount后只有出现一个大的网格,我想显示根有数据时一样的效果! 这个问题以前我也遇到过,但是没有彻底解决!footerrowcount=1这个办法只是让表格的尾部多一个行罢了。如果这个表你是用来打印,和浏览到可以实现,但是就不可以再对表格进行修改了! 呵,我也遇到,没有解决,关注,同时CxGrid即DxGrid这个控件,我找到现在与没有搞定顶 有办法,记得给分 需要注意的是 ADODATASET 的ltBatchOptimistic应该解决你的问题了吧.unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, ADODB, StdCtrls, Grids, DBGridEh;type TForm1 = class(TForm) dbgrd_Main: TDBGridEh; Button1: TButton; ads: TADODataSet; ds: TDataSource; acn: TADOConnection; procedure Button1Click(Sender: TObject); procedure FormCreate(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);begin ads.Append(); ads.Post();end;procedure TForm1.FormCreate(Sender: TObject);beginads.LockType :=ltBatchOptimistic;ads.Open ();end;end. ????这个和网格有关么?只是改变了ADO的类型啊! 如果你用的是query或adoquery的话,可以写sql语句,例如:sql.text:='select*from table where 1=0';这是一个常用的技巧 tanyun1111兄,sql.text:='select*from table where 1=0中1=0是什么意思?请指教! 问个语法问题 请sanguomi,wellnj来接点分。 皮肤控件中的SkinData是什么作用? 关于回调函数的用法 怎样限定用户输入的EMAIL是合法的? 如何去除TTable组件的登录提示? 测试 Delphi xe2 如何实现电脑重启,这里找到的代码似乎都不行,老版本的行不通!!!!!! 编写一个数据库软件,是不是成为一名程序员的必经之路? 怎样捕捉窗口被大小化的事件? 30元钱买李维的《Delphi 5.x分布式多层应用系统篇〉》 如何知道一个字符串是不是一个数字?88分相送,在线....急!
footerrowcount=1这个办法只是让表格的尾部多一个行罢了。
如果这个表你是用来打印,和浏览到可以实现,但是就不可以再对表格进行修改了!
同时CxGrid即DxGrid这个控件,我找到现在与没有搞定
顶
应该解决你的问题了吧.
unit Unit1;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, ADODB, StdCtrls, Grids, DBGridEh;type
TForm1 = class(TForm)
dbgrd_Main: TDBGridEh;
Button1: TButton;
ads: TADODataSet;
ds: TDataSource;
acn: TADOConnection;
procedure Button1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
ads.Append();
ads.Post();
end;procedure TForm1.FormCreate(Sender: TObject);
begin
ads.LockType :=ltBatchOptimistic;
ads.Open ();end;end.
例如:sql.text:='select*from table where 1=0';
这是一个常用的技巧