用Clidentdataset组件,而不用Table組件,怎樣實現將SQL數據表中的文件通過按鈕(一個button組件)生成*.txt文件?希望各位大蝦能詳細講解一下,謝謝!
解决方案 »
- 如何判断dbgrideh中上下相邻2行的某个字段记录是否相同? 急急急
- 通过TSocketConnection 连接老是报个错....
- 这段操作XML代码有什么问题?
- 请问如何响应TabControl上的按钮点击事件!如:OnDoubleClick!
- 救救他吧,他需要大家的援助之手!
- 请问怎么卸载后装的acitvex控件?
- Tmediaplayer放.dat的时候怎么让显示区域变大一点呢?
- 关于两表之间复制的问题
- 数据库的联接问题
- 关于API的中文帮助文件(CHM)!
- ◆Delphi控制台的清屏命令是什么?
- 在delphi中有没有哪个函数可以直接得到一个子文件夹中文件的个数。请高手们不吝赐教!
SL: TStringlist;
lp: integer;
StrTmp: string;
begin
SL := TStringlist.Create;
try
Clidentdataset1.first;
while not Clidentdataset1.eof do
bgin
StrTmp := '';
for lp := 0 to Clidentdataset1.Fields.Count - 1 do
StrTmp := StrTmp + Clidentdataset1.Fields[lp].Asstring + ' ';//间隔符可自己定
SL.Add(StrTmp);
Clidentdataset1.next;
end;
SL.SaveToFile('D:\aaaa.txt');
finally
SL.free;
end;
end;