读取文本文件中的换页符,怎么判断?(50分)

我从notes中导出的数据，是一个文本文件，数据一行行的，其中有换页符作为一行，
我读取行字符串（S：STIRNG），怎么判断它是换页符一行？

普通的txt没有换页符吧? 如果是打印机的换页符,好象是^P (ctrl+p) 你可以用ascii码找找.
如果是notes自认的换页符,你可以把那个换页符COPY下来把它当做一个常量.

var
F: TextFile;
s:string;
-------------------
Readln(F, S);
s := trim(s);
if s行属于换页符 then
begin
end
================
关键是如何判断，由字符串形式到换页符，换页符是个“”，显示的是个小方框

同意 楼上.

因不知你的 换页符是 以 什么 为标志 .

所以. 也 只好 这样了. 你 把你的 换页符的 标志 写上就可以了.

该换页符在文本文件中显示的是个小黑框，（复制到这里不显示！）单独作为一行！
是从lotus notes软件导出来的，
读出的字符串，在其是换页符是，用showmessage(s)显示为空
如何把s字符串向换页符的转换，再做两者的比较，我认为是关键，请大家帮忙！
to:山猫
你的楼上就是我自己！

Borrow: 0
Disposegross: 0
Stocks: 0
Class: 备件库
Cmain: 备件(车床)
Materiel: 外摩擦片
Csub: C336-1
Code: BJ401001
Standard:
Gauge: C336-1
Unit:
$UpdatedBy: CN=9000/O=system,CN=ck/O=system


Borrow: 0
Disposegross: 0
Stocks: 0
Class: 备件库
Cmain: 备件(车床)
Materiel: 内摩擦片
Csub: C336-1
Code: BJ401002
Standard:
Gauge: C336-1
Unit:
$UpdatedBy: CN=9000/O=system,CN=ck/O=system
$Revisions: 2002-03-06 15:07:48,2002-03-06 15:09:25

 ----此处为一小黑框，两个小黑框之间为一条纪录，所以要判断！
Borrow: 0
Disposegross: 0
Stocks: 0
Class: 备件库
Cmain: 备件(车床)
Materiel: 轴
Csub: C336-1
Code: BJ401021
Standard:
Gauge: C336-1 2-111D-25
Unit:
$UpdatedBy: CN=9000/O=system,CN=ck/O=system

是不是 chr(10)chr(13)

你用 HexEditor(eg.UltraEdit) 打开看看 hex值不就知道了么！
然后判断s = chr(?) ? 是你看到的HEX值

查看那个换页符的16进制代码.

s:string[100];//定义了长度
if s[1]='' then //引号内是复制的换页符号，通过！
//原来主要是对s:sting 和s:string[]没有区别，导致s[1]通不过
begin
end
//谢谢各位，尤其谢谢“淡淡的笑”的热诚帮助！

解决了，看楼上