各位高手,小弟現有一關於CXGRID的問題不明白.望指點迷津
在CXGRID中如果要新增一倏空記錄的話,用adoquery1.append;
就可以新增一倏空記錄
但同時也會將前倏記錄上傳到服務器
可現在能否實現新增一倏空記錄時,而不把原有記錄上傳,而是在觸發CLICK事件時,才上傳到服務器
在CXGRID中如果要新增一倏空記錄的話,用adoquery1.append;
就可以新增一倏空記錄
但同時也會將前倏記錄上傳到服務器
可現在能否實現新增一倏空記錄時,而不把原有記錄上傳,而是在觸發CLICK事件時,才上傳到服務器
解决方案 »
- 在Delphi中调用WinRAR命令时如何知道RAR压缩完成???
- 在线升级数据的问题!
- 有关于GraphicEx的大问题哦~~~
- 请问:能否在delphi 中使用水晶报表,如何使用?
- 有关属性(property)的一个小问题。
- 共同讨论!WIN32 PE 文件格式判定?
- 谁有动态打印的例子,急用
- win95支持ADO吗?
- Delphi中出现([Fatal Error] Internal error: BC2241)!!!!
- Hook???Hook???Hook???Hook???Hook???
- 两个FORM,如何使一个Form总在另外一个FORM的前面?鼠标点后面的Form也不能让前面的跑后面去。
- 求助!文件切割与传输
建议LZ:使用动态机制
ClientDataSet有缓存机制
//前提是将adotable和adoquery Cursor Type :ctstatic和LockType:ltBatchOptimistic
1.adotable+dbgrid demo:unit Unit1;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, DBGrids, DB, ADODB, StdCtrls;type
TForm1 = class(TForm)
ADOTable1: TADOTable;
DataSource1: TDataSource;
ADOConnection1: TADOConnection;
DBGrid1: TDBGrid;
Button1: TButton; procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
ADOTable1.UpdateBatch(arAllChapters);
end;end.2.1.ADOQuery+cxgrid demo:unit Unit1;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
cxDataStorage, cxEdit, DB, cxDBData, cxGridLevel, cxClasses, cxControls,
cxGridCustomView, cxGridCustomTableView, cxGridTableView,
cxGridDBTableView, cxGrid, ADODB, StdCtrls;type
TForm1 = class(TForm)
ADOConnection1: TADOConnection;
ADOQuery1: TADOQuery;
cxGrid1DBTableView1: TcxGridDBTableView;
cxGrid1Level1: TcxGridLevel;
cxGrid1: TcxGrid;
DataSource1: TDataSource;
cxGrid1DBTableView1Column1: TcxGridDBColumn;
cxGrid1DBTableView1Column2: TcxGridDBColumn;
cxGrid1DBTableView1Column3: TcxGridDBColumn;
Button1: TButton;
Button2: TButton;
procedure Button2Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button2Click(Sender: TObject);
begin
ADOQuery1.Append;
//AppendRecord([nil,'aaa','bbb']);
//ADOQuery1.AppendRecord(['123','234','bbb']);
end;procedure TForm1.Button1Click(Sender: TObject);
begin
ADOQuery1.UpdateBatch(arAllChapters);
end;end.
将 adoquery 的 locktype 设置 ltbatch.. 缓存下。