delphi乱码问题

Posted

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了delphi乱码问题相关的知识,希望对你有一定的参考价值。

procedure TForm2.Button2Click(Sender: TObject);
type
intfile=file of integer;
var
intf:intfile;
str:string;
i:integer;
begin
str:='c:\intfile.txt';
assignfile(intf,str);
rewrite(intf);
for i:=1 to 100 do
if (i mod 2)=0 then
write(intf,i);
closefile(intf);
end;
执行后打开文件出现的都是乱码,为什么呢?

参考技术A var
intf:TextFile;

这句这么改即可

以上是关于delphi乱码问题的主要内容,如果未能解决你的问题,请参考以下文章

delphi 换版本乱码 问题

Delphi 编写的软件,文字乱码

如何解决Delphi连接Mysql5.0出现乱码的问题

delphi7 PChar 转为 String 弹出乱码

delphi请求http接口中文乱码问题

delphi软件打开文件全是乱码