rem -- Character-Encoding: Shift_JIS -- rem -- This is startfp.bat -- rem (コマンドプロンプトを開いて) FreePascal IDE を起動する @echo off title %COMSPEC% %SYSTEMROOT%\system32\chcp.com 932 echo コードページを850に切り替えて Free Pascal IDE を起動します pause set _OLDPATH=%PATH% set PATH=%PATH%;C:\FPC\2.2.0\bin\i386-win32 rem switch to code page 850 (Multilingual Latin-1 character set) %SYSTEMROOT%\system32\chcp.com 850 rem start FreePascal IDE title FreePascal IDE C:\FPC\2.2.0\bin\i386-win32\fp.exe set PATH=%_OLDPATH% set _OLDPATH= rem switch back to code page 932 (Japanese Shift-JIS character set) %SYSTEMROOT%\system32\chcp.com 932 title %COMSPEC% cls