KEITAさん、こんにちは。

＞一つ教えてください。
＞INIファイル等に書き出すようにするにはどうすればよいでしょうか？
＞例のような形で教えていただけると大変助かります。

SystemErrorイベントはアプリケーションオブジェクトのイベントなのは知ってますよね？
そこに下記のように記述します。
ただし、このスクリプトはVer6.5までのもで、Ver7になるとSystemErrorイベントの
引数にエラーが起きたオブジェクトや行番号などが入ってきますので、そちらを利用します。

*********************
//変数宣言
String errwin
String errobj
String erreve
Integer errline
Integer errnum
String errtxt
Integer m

/* エラー内容の取得 */
errwin = Error.WindowMenu
errobj = Error.Object
erreve = Error.ObjectEvent
errline = Error.Line
errnum = Error.Number
errtxt = Error.Text

/* .INIファイルへ書込む */
SetProfileString(g_inifile, \"SystemErr\", \"GamenID\", errwin)
SetProfileString(g_inifile, \"SystemErr\", \"ObjectID\", errobj)
SetProfileString(g_inifile, \"SystemErr\", \"EventID\", erreve)
SetProfileString(g_inifile, \"SystemErr\", \"LineNO\", String(errline))
SetProfileString(g_inifile, \"SystemErr\", \"ErrNO\", String(errnum))
SetProfileString(g_inifile, \"SystemErr\", \"ErrTXT\", errtxt)

//メッセージ
m = MessageBox(\"エラー発生\",\"SYSTEMエラーが発生しました。INIファイルで確認してください。\" &
               StopSign!,RetryCancel!,1)
Choose Case m
Case 1
Return
Case 2
HALT Close
End Choose