| 322 |
ja.msg_language_german=ドイツ語(&G) |
ja.msg_language_german=ドイツ語(&G) |
| 323 |
en.msg_del_confirm=Are you sure that you want to delete %s ? |
en.msg_del_confirm=Are you sure that you want to delete %s ? |
| 324 |
ja.msg_del_confirm=%s を削除しますか？ |
ja.msg_del_confirm=%s を削除しますか？ |
| 325 |
en.msg_uninstall_confirm=It seems installed prev version. We advise uninstall first. Are you sure uninstall prev version ? |
en.msg_uninstall_confirm=It seems a former version is installed. You are recommended to uninstall it previously. Do you uninstall former version ? |
| 326 |
ja.msg_uninstall_confirm=以前のバージョンがインストールされているようです。インストールの前にアンインストールすることをお勧めします。アンインストールしますか？ |
ja.msg_uninstall_confirm=以前のバージョンがインストールされているようです。先にアンインストールすることをお勧めします。アンインストールしますか？ |
| 327 |
|
|
| 328 |
[Code] |
[Code] |
| 329 |
var |
var |
| 555 |
if MsgBox(CustomMessage('msg_uninstall_confirm'), mbInformation, MB_YESNO) = IDYES then |
if MsgBox(CustomMessage('msg_uninstall_confirm'), mbInformation, MB_YESNO) = IDYES then |
| 556 |
begin |
begin |
| 557 |
// ユーザがアンインストールを選択した |
// ユーザがアンインストールを選択した |
| 558 |
|
|
| 559 |
|
// 両端の " を削る |
| 560 |
uninstaller2 := Copy(uninstaller, 2, Length(uninstaller) - 2); |
uninstaller2 := Copy(uninstaller, 2, Length(uninstaller) - 2); |
| 561 |
|
|
| 562 |
if not Exec(uninstaller2, '', '', SW_SHOW, |
if not Exec(uninstaller2, '', '', SW_SHOW, |
| 563 |
ewWaitUntilTerminated, ResultCode) then |
ewWaitUntilTerminated, ResultCode) then |
| 564 |
begin |
begin |
| 565 |
|
// 実行に失敗 |
| 566 |
MsgBox(SysErrorMessage(ResultCode), mbError, MB_OK); |
MsgBox(SysErrorMessage(ResultCode), mbError, MB_OK); |
| 567 |
end; |
end; |
| 568 |
end; |
end; |
Tera Term
Parent Directory
Revision Log
Patch