Question

delphi读文本文件的问题~高手都来下~

请高手帮个忙!
怎么读取文本文件的或memo中的指定内容!
具体要求就是 比如C盘下有一个文件或是MEMO中有片文章
怎么读出内容的前20个非空字符!?
高手们谢谢啦 在线等```

Answer 1

var
MyList: TStringList;
Line : String;
begin
MyList := TStringList.Create;
MyList.LoadFromFile('c:/file.txt');
Line := MyList.Strings[1];

Answer 2

var
F:TFileStream;
begin
F:=TFileStream.Create('D:\gg.txt',fmOpenRead);
Memo1.Lines.LoadFromStream(F);