请问怎样读入包含有中英文字符串的文本文件并放入widestring？

[mygis]

var
tf:TextFile;
fn:string;
strw:widestring;
begin
fn:='E:\forian.txt';
AssignFile(tf,fn);
reset(tf);
readln(tf,strw);
closefile(tf);

编译时readln(tf,strw);出错，而把strw换成string类型就可以了。怎么解决我的问题？

[mygis]

谢谢！

[Crob]

先使用string类型把文件内容读出来

再使用
function StringToWideChar(const Source: string; Dest: PWideChar; DestSize: Integer): PWideChar;

将读出的内容转换成widestring，具体用法见help