Viktor1703
AutoIT Гуру
- Сообщения
- 1,535
- Репутация
- 413
Подскажите,что не так сделал? не сохраняет ресурс в exe, или процесс должен сначала завершиться?
Код:
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>
#include <Process.au3>
$hInstance = _WinAPI_GetModuleHandle(0)
$hForm = GUICreate("Res",120,100)
$Label = GUICtrlCreateLabel(_WinAPI_LoadString($hInstance, 6021),10,10,100,20)
$Input = GUICtrlCreateInput("",10,40,100,20)
$Enter = GUICtrlCreateButton("Save",10,70,100,20)
GUISetState()
While 1
Switch GUIGetMsg()
Case -3
Exit
Case $Enter
$Read = GUICtrlRead($Input)
If $Read <> "" Then
FileWrite("String.rc","STRINGTABLE" & @CRLF & _
"LANGUAGE 25, 1" & @CRLF & _
"{" & @CRLF & _
'6021, "' & $Read & '"' & @CRLF & _
"}")
_RunDos("ResHacker.exe -add %out% %out% String.rc STRINGTABLE Русский")
EndIf
EndSwitch
WEnd