先谢谢诸位了，我的问题是这样，看下面这段程序：procedure TForm1.Button1Click(Sender: TObject);
var
str1:tstringlist;
str,stt:string;
i:integer;
begin
if opendialog1.Execute then
begin
str1:=tstringlist.Create;
str1.LoadFromFile(opendialog1.filename);
for i:=0 to str1.Count-1 do
begin
str:=str1.Strings;
stt:=copy(str,length(str),1);
if stt=#13 then
showmessage('回车！');
end
end
end;
程序执行后，文本中明明有回车，可就是无showmessage提示，是什么原因？
