如何实现单据输入,不用DBGrid行吗?,能否不用服务器上的表?输入完后再送往服务器.(100分)

  • 主题发起人 主题发起人 yifawu
  • 开始时间 开始时间
如果你连临时表都不想用,就使用和表结构一致的动态数组.
Type Record=TMyRec
Id:integer;
sName:String;
...
...
end;
Var
MyTableArr =Array of TMyRec;
其后自己解决.
 
可以的,用 TStringGrid 也行,但是得自己控制数据的显示。
 
用三层结构就可以了。
 
在html里输入单据,提交到后台数据库更新。
 
用什么代替 Dbgrid 呢,要象DBgrid一 样方便

我用了一个扩展的Tdataset 控件,利用内存保存数据,无需BDE,
和DBgrid一起 使用工作得比较好.
 
我看还是用 VI 去开发算了。
 
以下方法指用tadoconnection,tadoquery
先在本地建立一个临时表tabel1,然后建立一个连接conn1,query1
建立一个输入单据的窗口(将它设计得与你的单据外观相同),每输入一张单据就将其插入
到临时表中:conn1.execute(insert into tabel1 values(...))
需要向服务器发送数据时建立conn2与服务器连接,然后用execute的方法将临时表中的数据
导入到服务器中
quey1.sql.text:='select * from tabel1'
query1.open;
conn1.begintrans;
while not eof query1 do
try
conn1.execute(insert into table2 values(...);
query1.next;
except
conn1.rollbacktrans;
...
end;
conn1.committrans;
...
 
同意tanglu的看法
不用Dbgrid就只好自己写代码控制数据输入了。
 
多人接受答案了。
 
后退
顶部