读取txt文件吗？当然可以var f:textfile;s:string; begin assignfile(f,'路径'）； reset(f);//rewrites重写 readln(f,s);//读一行是readln，一个是read可以用个简单的循环， while not eof(f) do ，读取文件所有内容，如果用了memo控件，比如memo等，则可以memo1.Lines.LoadFromFile('路径')
to lanlan0601() 加个简单的判断就可以了，比如你从一个文本中读数据：var f:textfile;s:string; begin assignfile(f,'路径'）； reset(f); while not eof(f) do begin readln(f,s); if (pos('姓名'，s)<>0)or(pos('学号',s)<>0) then memo1.lines.append(s); end;使用pos判断读取的一句里面有没有“学号”和“姓名”，有的话就加在memo1中。
begin
assignfile(f,'路径'）；
reset(f);//rewrites重写
readln(f,s);//读一行是readln，一个是read可以用个简单的循环， while not eof(f) do ，读取文件所有内容，如果用了memo控件，比如memo等，则可以memo1.Lines.LoadFromFile('路径')
文本内有学生姓名和学号两项;
文本里的内容为姓名: XXX
学号: XXXXXXXX姓名: XXX
学号: 姓名:XXX
学号:XXXXXX有的学生还没有上报自己的学号;
文本内学号为空;我现在想要把有学号的学生<姓名>和<学号>加入到MEMO控件内,没学号的不要.应该如何实现? 请高手不吝指教!
begin
assignfile(f,'路径'）；
reset(f);
while not eof(f) do
begin
readln(f,s);
if (pos('姓名'，s)<>0)or(pos('学号',s)<>0) then memo1.lines.append(s);
end;使用pos判断读取的一句里面有没有“学号”和“姓名”，有的话就加在memo1中。