Y yangtt Unregistered / Unconfirmed GUEST, unregistred user! 2000-08-22 #3 如下代码: BEGIN assignfile(f,savedialog1.filename); query1.first; rewrite(f); writeln(f,'files title'); while not query1.eof do begin write(f,'') for i:=0 to dbgrid1.fieldcount-1 do write(f,dbgrid1.fields.asstring); query1.next end; closefile(f); end;
如下代码: BEGIN assignfile(f,savedialog1.filename); query1.first; rewrite(f); writeln(f,'files title'); while not query1.eof do begin write(f,'') for i:=0 to dbgrid1.fieldcount-1 do write(f,dbgrid1.fields.asstring); query1.next end; closefile(f); end;
N netfan Unregistered / Unconfirmed GUEST, unregistred user! 2000-08-22 #4 与其花时间去找控件，还不如自己写一段代码 用个循环很容易就可以搞定，而且文件的格式也能按照自己喜欢的方式 应该不会超过100行的代码
P pisilly Unregistered / Unconfirmed GUEST, unregistred user! 2000-08-22 #5 何必用其它控件呢,直接用循环写不是挺好吗.而且,你可以自己定义文本的格式
R robertcool Unregistered / Unconfirmed GUEST, unregistred user! 2000-08-23 #8 有一个dbgrid控件可以让你把数据保存成excel或者htm格式 在Devexpress.com上
J jianl Unregistered / Unconfirmed GUEST, unregistred user! 2000-08-24 #10 在query1.next后增加一句writeln(f)好看一点。
