怎么把一个文本文件，输入到memo或是richedit里呢？(20分)

J

johnrain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-01

• #1

memo和richedit有什么不同？

 

P

pt_email

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-01

• #2

RichEdit可录入RTF格式文件
Memo只能是文本

 

C

c_yihai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-01

• #3

可以通过剪贴板来实现。memo.pastefromclipboard.....

 

J

johnrain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-01

• #4

可你没没有回答我的问题呀，如何将文本文件输入到我说的控件里呢？

 

S

suwle

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-01

• #5

memo1.Lines.LoadFromFile(filename);应该是这样吧

 

P

pt_email

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-01

• #6

RichEdit1.Lines.LoadFromFile( 文本文件名 );

 

W

wei815

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-01

• #7

用memo1.lines.loadfromfile(你的文本文件名).

 

K

kthy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-01

• #8

memo1.lines.loadfromfile(filename);

 

C

cdjsf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-04

• #9

memo1.lines.loadfile('000.txt')
RichEdit1.Lines.LoadFromFile('000.txt')

 

J

johnrain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-11

• #10

多人接受答案了。

 

H

hyzzhxia

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-10

• #11

这是我的代码，没有丝毫改动，可以行
procedure TForm1.Button1Click(Sender: TObject);
var
F:Textfile;
//定义文本文件变量
s:string;
begin
if OpenDialog1.Execute then
{ Display Open dialog box }
begin
AssignFile(F,OpenDialog1.FileName);
{$I-}
Reset(F);
{$I+}
While Not EOF(F)do
begin
Readln(F, S);
memo1.lines.add(s) ;
{ Read first line of file }
end;
CloseFile(F);
end;
end;