widestringtoasscii.dpr

delphi 编码转换工具 很不错的东西

program WideStringToAsscii;

uses
  Forms,
  Ascii in 'Ascii.pas' {Form1};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.