难道没有人能告诉我答案吗？

Question

空格判断应该是
if ch = ' ' then // 或者 if ch = #32
回车有两个字符，应该是#13#10

Answer 1

如果读文件用TStrings最方便了。
a: Tstringsa := TstringList.Create;
a.LoadFromFile('a.txt');
// a[0]是第一行，a[1]是第二行....
// a.text是全部的文本

Answer 2

nngld(高兴)　:怎样用二进制方式打开一个文本文件
谢谢了chechy(chechy)　：我不是要将文件整个显示出来，我是要将一些东西读入数组，一点一点筛选出来，所以，我要存入数组来查询我要找的东西，并进行编辑

Answer 3

用TStringStream如何
我想漏不掉回车符吧。

Answer 4

var
  a, b: Integer;
  c: Char;a := Pos('i', strs.Text);
b := Pos('v', strs.Text);
c := strs.Text[a];
strs.Text[a] := strs.Text[b];
strs.Text[b] := c;