全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:866
推到 Plurk!
推到 Facebook!

tfilestream

尚未結案
BorlandUser
中階會員


發表:148
回覆:217
積分:73
註冊:2004-02-19

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-05-15 00:56:00 IP:203.218.xxx.xxx 未訂閱
var sFileName: String; sBufferString: String; WriteStream:TFileStream; begin sFileName := 'F:\Testing\Delphi\My Delphi Sample\Trading System\Program\abc.txt'; if FileExists(sFileName) then DeleteFile(sFileName); WriteStream := TFileStream.Create(sFileName, fmCreate); sBufferString := 'adfsafdsfdsfdsfdsfdsfdsfdsfsfdsfdfbc'; WriteStream.Write(sBufferString, SizeOf(sBufferString)); WriteStream.Free; 錯了嗎?為何總是寫入的只有'('呢?
lijenyun
一般會員


發表:3
回覆:19
積分:9
註冊:2003-06-22

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-05-16 08:55:25 IP:210.244.xxx.xxx 未訂閱
要傳字元陣列才行 WriteStream.Write(pchar(sBufferString)^, Length(sBufferString)); 發表人 - lijenyun 於 2004/05/16 09:06:01
系統時間:2024-05-13 8:30:36
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!