K kevin3000 Unregistered / Unconfirmed GUEST, unregistred user! 2006-08-16 #1 现有数据库文件e:/guanli/hetong.mdb，以及二维数组BeiJian[1..20,1..50]，该如何把它们分别写成文本文件？文本文件的后缀为*.c*(后缀以c打头)
Z zywcd Unregistered / Unconfirmed GUEST, unregistred user! 2006-08-16 #2 你直接输出不就可以吗？ var fp:textfile; var i,j:integer; assignfile(fp,'*.c*'); rewrite(fp); for i:=1 to 20do for j:=1 to 50do writeln(fp,inttostr(BeiJian[i,j])); closefile(fp); 对于数据库，你也可以打开表以后循环写入文本文件吧。 主要看你需要使用什么方式写入文件，你需要在写入的时候按照自己的要求调整的。
你直接输出不就可以吗？ var fp:textfile; var i,j:integer; assignfile(fp,'*.c*'); rewrite(fp); for i:=1 to 20do for j:=1 to 50do writeln(fp,inttostr(BeiJian[i,j])); closefile(fp); 对于数据库，你也可以打开表以后循环写入文本文件吧。 主要看你需要使用什么方式写入文件，你需要在写入的时候按照自己的要求调整的。
K kevin3000 Unregistered / Unconfirmed GUEST, unregistred user! 2006-08-16 #3 TO zywcd： 谢谢你关注。 上述数组写成文本文件，是以“，”作为fp中字节的分隔号吗？ （因为之后还要将该文本文件读出到别的数组。）
Z zywcd Unregistered / Unconfirmed GUEST, unregistred user! 2006-08-16 #4 那你这样， for i:=1 to 20do for j:=1 to 50do write(fp,inttostr(BeiJian[i,j])+','); closefile(fp);
K kevin3000 Unregistered / Unconfirmed GUEST, unregistred user! 2006-08-16 #5 assignfile(fp,'*.c*')，文本文件名的后缀"c"后，如果要跟一个全局变量str1，怎么写？
K kevin3000 Unregistered / Unconfirmed GUEST, unregistred user! 2006-08-16 #7 TO zywcd,： 谢谢你。可以加你QQ吗？ ( ~_~ ) 我试试数据库转为文本文件。
