{$codepage utf8} program project1; var test: String; begin writeln(UTF8ToAnsi('Hello, World!让程序兼容中文!')); ReadLn; end.