Проверь, вот так работает?
Add(MainForm,188594,168,196)
{
Width=765
Height=275
Caption="EasyWIM"
BorderStyle=1
}
Add(Label,199530,504,147)
{
Left=10
Top=10
Width=59
Height=17
Caption="Файл WIM"
}
Add(Label,15284519,497,140)
{
Left=10
Top=60
Width=120
Height=17
Caption="Папка для распаковки"
}
Add(Edit,9602735,406,133)
{
Left=10
Top=30
Width=255
Text=""
}
Add(Edit,6448763,413,196)
{
Left=10
Top=80
Width=255
Text=""
}
Add(Button,10166825,280,133)
{
Left=280
Top=30
Width=20
Caption="..."
link(onClick,3214129:doExecute,[])
}
Add(Button,15887377,280,196)
{
Left=280
Top=80
Width=20
Caption="..."
link(onClick,4020917:doBrowse,[])
}
Add(ODialog,3214129,350,133)
{
Filter="*.wim"
Title="Выберите файл WIM"
FileName="*.wim"
link(onExecute,9602735:doText,[])
}
Add(Browse,4020917,357,196)
{
Title="Укажите папку для распаковки файла WIM"
NewStyle=0
link(onBrowse,6448763:doText,[])
}
Add(Button,8158137,280,266)
{
Left=10
Top=170
Width=75
Height=40
Caption="Распаковка"
link(onClick,11355605:doString,[])
}
Add(WinExec,6803986,567,245)
{
FileName="dism.exe"
Point(onConsoleResult)
Point(doConsoleInput)
Point(doConsoleExec)
link(onConsoleResult,8723266:doCharset,[])
}
Add(FormatStr,11355605,406,266)
{
Mask=" /mount-wim /index:1 /wimfile:%1 /mountdir:%2"
Point(FString)
link(onFString,14960546:doWork2,[])
link(Str1,9602735:Text,[])
link(Str2,5814553:Var2,[])
}
Add(FormatStr,5534339,441,301)
{
DataCount=1
Mask="/unmount-wim /mountdir:%1 /discard"
Point(FString)
link(onFString,7117672:doWork2,[])
link(Str1,14469128:Var2,[])
}
Add(FormatStr,15589987,441,392)
{
Mask="/image:%2 /add-driver /driver:%1 /recurse /forceunsigned"
Point(FString)
link(onFString,7117672:doWork3,[(529,398)])
link(Str1,14730865:Text,[])
link(Str2,14469128:Var3,[(454,383)(482,383)(482,250)])
}
Add(Button,16473098,280,392)
{
Left=210
Top=170
Width=75
Height=40
Caption="Добавление драйверов"
link(onClick,15589987:doString,[])
}
Add(Button,4467391,280,301)
{
Left=110
Top=170
Width=75
Height=40
Caption="Запаковка"
link(onClick,5534339:doString,[])
}
Add(Edit,14730865,441,343)
{
Left=10
Top=130
Width=255
Text=""
}
Add(Button,9774882,280,343)
{
Left=280
Top=130
Width=20
Caption="..."
link(onClick,15145513:doBrowse,[])
}
Add(Label,15331021,490,133)
{
Left=10
Top=110
Width=110
Height=17
Caption="Папка с драйверами"
}
Add(Browse,15145513,357,343)
{
Title="Укажите папку с драйверами"
link(onBrowse,14730865:doText,[])
}
Add(Memo,15792275,679,252)
{
Left=310
Top=40
Width=440
Height=200
Font=[Arial,8,0,0,204]
ParentFont=0
KeyPreview=1
ScrollBars=3
ReadOnly=0
}
Add(Charset,8723266,616,252)
{
link(onCharset,15792275:doAdd,[])
}
Add(HubEx,14960546,525,266)
{
link(onEvent,6803986:doConsoleExec,[])
}
Add(HubEx,7117672,525,301)
{
Angle=3
link(onEvent,14960546:doWork3,[])
}
Add(GetDataEx,5814553,413,245)
{
link(Data,6448763:Text,[])
}
Add(GetDataEx,14469128,441,245)
{
Angle=3
link(Data,5814553:Var3,[])
}