Вверх ↑
Ответов: 294
Рейтинг: 64
#1: 2018-07-04 20:42:35 ЛС | профиль | цитата
VitiaCat, как верно заметил Netspirit, в новых версиях Windows есть встроенные средства для монтирования образов.
Пример с WinExec:
[spoiler=]

Add(MainForm,12243380,147,63)
{
Width=457
Height=169
Caption="Mount-DiskImage"
Position=1
}
Add(Button,76930,245,119)
{
Left=10
Top=45
Caption="Mount"
Data=String(Mount)
link(onClick,612691:doWork2,[])
}
Add(Button,7199102,245,168)
{
Left=10
Top=75
Caption="Dismount"
Data=String(Dismount)
link(onClick,612691:doWork3,[(354,174)])
}
Add(FormatStr,4918976,385,119)
{
Mask="%1-DiskImage -ImagePath "%2"\r\n\r\n"
link(onFString,11401622:doConsoleExec,[])
link(Str2,12832343:Text,[])
}
Add(Edit,12832343,392,63)
{
Left=85
Top=15
Width=345
Text=""
}
Add(WinExec,11401622,448,105)
{
FileName="POWERSHELL"
Point(doConsoleExec)
Point(onConsoleError)
Point(onConsoleResult)
link(onConsoleError,16518800:doWork2,[])
link(onConsoleResult,16518800:doWork3,[(501,132)])
}
Add(Message,10195354,560,119)
{
Caption="Info"
Icon=4
}
Add(ODialog,2824419,315,63)
{
link(onExecute,12832343:doText,[])
}
Add(HubEx,612691,350,119)
{
link(onEvent,4918976:doString,[])
}
Add(Button,16242063,245,63)
{
Left=10
Top=15
Caption="File >>"
link(onClick,2824419:doExecute,[])
}
Add(HubEx,16518800,497,119)
{
link(onEvent,15753107:doCharset,[])
}
Add(Charset,15753107,518,119)
{
link(onCharset,10195354:doMessage,[])
}

[/spoiler]
карма: 0

0