ynbIpb
Advanced Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Ну это уж я сообразил (не первый день с автоитом  ). подкоректировал строки. скрипт у меня запускается. только прогресс бар без натянутой картинки. Я даже сам генерировал бинарный текст этим скриптом:
Код: $VarName = StringStripWS(InputBox("MemoryDllGen", "Select a name of variable:", "DllBinary"), 3)
If $VarName = "" Then Exit
$DllName = FileOpenDialog("Open dll file", @ScriptDir, "All files (*.*)")
If $DllName = "" Then Exit
$Handle = FileOpen($DllName, 16)
$DllBinary = FileRead($Handle)
FileClose($Handle)
$LineLen = 2050
$DllString = String($DllBinary)
$Script = "Dim $" & $VarName & " = '" & StringLeft($DllString, $LineLen) & "'" & @CRLF
$DllString = StringTrimLeft($DllString, $LineLen)
While StringLen($DllString) > $LineLen
$Script &= " $" & $VarName & " &= '" & StringLeft($DllString, $LineLen) & "'" & @CRLF
$DllString = StringTrimLeft($DllString, $LineLen)
WEnd
If StringLen($DllString) <> 0 Then $Script &= " $" & $VarName & " &= '" & $DllString & "'" & @CRLF
ClipPut($Script)
MsgBox(64, 'MemoryDll Generator', 'The result is in the clipboard, you can paste it to your script.')
Exit |
example_progandy.rar
----------------
vicbox777, Спасибо что проверил, запостил в теме афтора с прозьбой выложить его пример в архиве.
--------
Проблема найдена. УДФ, которая была у меня немного старее чем его последняя. и различия в них как раз в функции _ProgressSetHBitmaps |
Всего записей: 1645 | Зарегистр. 01-05-2006 | Отправлено: 17:59 30-04-2009 | Исправлено: ynbIpb, 18:15 01-05-2009 |
|
. 
.
