如何将ANSI字符串文件名转换为Windows文件名

Question

我已经编写了此功能来在系统（Windows XP）上创建文件：

procedure TGrammar.AddFile(var filename: string);
var
newFile : TextFile;
begin
  if not fileexists(filename) then
    begin
      System.AssignFile(newFile, filename);
      System.Rewrite(newFile);
      WriteLn(newFile, '');
      System.CloseFile(newFile);
    end;
end;

我传递的字符串是： 与utf8 "a:/7/40/pěkný"相对应的"a:/7/40/pěkný"。 在我的文件系统上创建文件后，它看起来像这样："pěkný"代替"pěkný"。

我不清楚如何转换字符串，以便将其正确写入系统。如何解决该问题？

注意：我使用的是Delphi 7