線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:681
推到 Plurk!
推到 Facebook!

怎么把多个变量值写在文本文件里?

尚未結案
coldcoffee
一般會員


發表:60
回覆:22
積分:16
註冊:2003-05-23

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-12-26 16:13:27 IP:61.51.xxx.xxx 未訂閱
怎么把多个变量值写在文本文件的一行里,之间用Tab分开?用那个函数直接就可以做到。
Leway
一般會員


發表:43
回覆:71
積分:22
註冊:2003-07-29

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-12-26 20:40:17 IP:218.80.xxx.xxx 未訂閱
引言: 怎么把多个变量值写在文本文件的一行里,之间用Tab分开?用那个函数直接就可以做到。
var i,j: integer; FS:TFileStream; CH: char; begin FS:=TFileStream.create('c:\test', fmOpenWrite); try FS.write(i,sizeof(integer)); CH:=#9; FS.write(CH,sizeof(Char)); finally FS.free; end; end;
Leway
一般會員


發表:43
回覆:71
積分:22
註冊:2003-07-29

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-12-26 20:40:52 IP:218.80.xxx.xxx 未訂閱
引言: 怎么把多个变量值写在文本文件的一行里,之间用Tab分开?用那个函数直接就可以做到。
var i,j: integer; FS:TFileStream; CH: char; begin FS:=TFileStream.create('c:\test', fmOpenWrite); try FS.write(i,sizeof(integer)); CH:=#9; FS.write(CH,sizeof(Char)); Fs.write(j,sizeof(integer)); finally FS.free; end; end;
系統時間:2024-06-29 5:34:47
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!