文本文件(50分)

K

kevin8093

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-20

• #1

如和保存memo到文本文件

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-20

• #2

Memo1.Lines.SaveToFile

 

卷

卷起千堆雪tyn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-20

• #3

Memo1.Lines.SaveToFile('c:/asdf.txt');

 

A

apower

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-20

• #4

memo.lines.savetofile('c:/file.txt');
memo.lines.loadfromfile('c:/file.txt');

 

冰

冰冰

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-20

• #5

同意楼上的方法

 

R

regitchan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-05

• #6

把数据存入文本文件 memo.lines.savetofile('filename.txt');
从文本文件中取出数据 memo.lines.loadfromfile('filename.txt');
OK???

 

A

another_benlei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-05

• #7

大家好像忽略了一个问题，万一楼主需要已经存在的文本文件中，或者说追加呢？
如果是这种情况的话，需要用到文件流:
procedure TForm1.Button1Click(Sender: TObject);
var
F: TFileStream;
begin
F := TFileStream.Create('d:/1.txt',fmOpenWrite);
try
F.Position := F.Size;
Memo1.Lines.SaveToStream(F);
finally
F.Free;
end;
end;