WYLEK.RU

Программы от Auslogics

Программы от AuslogicsПоследняя серия програм от Auslogics идет уже без русского языка. Неизвестно, когда появится
  1. Оффлайн

    vaka61

    Звание: Бывалый

    Знаток

    Сообщений: 157

    Создано тем: 16

    Рейтинг: 4

    Репа: (12|12|0)

    Баллы: 126

    Страна: не указана!

    Был: 2025-03-27 05:10

    Лайков: 4

    Nexus Вот первая. На снимках, чего не нашел.
    Сообщение отредактировал WYLEK 4 ноября 2024 - 13:51
    5 марта 2014 - 23:59 / #11
  2. Оффлайн

    Автор темы

    Nexus

    Забанен

    Сообщений: 611

    Создано тем: 20

    Репа: 0

    Баллы: 0

    Был: 2022-07-03 23:07

    Лайков: 8

    Цитата: vaka61
    Вот первая. На снимках, чего не нашел.


    Остальные строки находятся в ресурсах исполняемых файлов. Вот строки этого примера находятся в Дельфи-ресурсах файла RescueCenter.exe Они отлично переводятся:
     Показать / Скрыть текст

    По поводу текста для SendDebugLog, то он находится в ЖЗС, в виде строк Pascal.

    Есть пару багов. Первая это:
     Показать / Скрыть текст

    Просто нечаяно продублировал строки.
    Вторая это баги в окошках "О программе" - там строка с твоим ником глючно записана.
    Сообщение отредактировал 24 января 2023 - 20:36
    5 марта 2014 - 23:59 / #12
  3. Оффлайн

    vaka61

    Звание: Бывалый

    Знаток

    Сообщений: 157

    Создано тем: 16

    Рейтинг: 4

    Репа: (12|12|0)

    Баллы: 126

    Страна: не указана!

    Был: 2025-03-27 05:10

    Лайков: 4

    Цитата: Nexus
    По поводу текста для SendDebugLog, то он находится в ЖЗС, в виде строк Pascal.


    Здесь никак. А может ну его, этот журнал. WinHex и Radialix пробовал так и нифига не нашел. Остальное поправил.
    Ну а с ником казус из за того что с цветом текста эксперементировал, а вернуть наместо забыл. Видать не всё так просто как мне казалось.
    5 марта 2014 - 23:59 / #13
  4. Оффлайн

    Автор темы

    Nexus

    Забанен

    Сообщений: 611

    Создано тем: 20

    Репа: 0

    Баллы: 0

    Был: 2022-07-03 23:07

    Лайков: 8

    Цитата: vaka61
    Здесь никак. А может ну его, этот журнал. WinHex и Radialix пробовал так и нифига не нашел. Остальное поправил.


    Я для Disk Defrag его перевел. Все строки для него находятся в DebugHelper.dll. Через Радиаликс, без анализа в IDA, просто нашел все жестко-закодированные строки Pascal и перевел. Могу подкинуть в личку уже переведенный. Хотя он вроде и нафиг никому не нужен, как и лицензионное соглашение biggrin Мне бы еще с установщиком разобраться dry ...
    5 марта 2014 - 23:59 / #14
  5. Оффлайн

    vaka61

    Звание: Бывалый

    Знаток

    Сообщений: 157

    Создано тем: 16

    Рейтинг: 4

    Репа: (12|12|0)

    Баллы: 126

    Страна: не указана!

    Был: 2025-03-27 05:10

    Лайков: 4

    Nexus Слушай, что имено с устаноащиком разобраться ? Самое простое я телаю так.
    5 марта 2014 - 23:59 / #15
  6. Оффлайн

    Автор темы

    Nexus

    Забанен

    Сообщений: 611

    Создано тем: 20

    Репа: 0

    Баллы: 0

    Был: 2022-07-03 23:07

    Лайков: 8

    Цитата: vaka61
    Nexus Слушай, что имено с устаноащиком разобраться ? Самое простое я телаю так.


    Я это уже понял, просто еще не знаю что впихнуть в секцию [Code] скрипта установщика, чтобы установщик мог проверять наличие уже установелнной программы, пока рою-не нарою, но, скорее всего, пролистаю этот момент до лучших времен.
    И что это за хрень CompiledCode.bin, которая появляется после распаковки установщика? Ее нужно куда-то лепить? Просмотрел внутри структура какая-то Дельфи-подобная и сообщения какие-то имеются. Нипанятна wacko ...
    6 марта 2014 - 00:00 / #16
  7. Оффлайн

    Leserg

    Звание: Ветеран

    Команда сайта

    Сообщений: 978

    Создано тем: 79

    Рейтинг: 8

    Репа: (132|132|0)

    Баллы: 1841

    Был: 2025-03-15 15:47

    Лайков: 202

    Цитата: Nexus
    чтобы установщик мог проверять наличие уже установелнной программы


    Зачем? В оригинальном сценарии этого нет. Зачем что-то выдумывать. Ты для начала собери инсталлятор программы, но со своими файлами. А со временем разберешься что, куда и как, и в будущем будешь клепать так, как тебе нужно. Не пытайся сразу объять необъятное.

    Кто ищет, тот всегда найдет!

    6 марта 2014 - 00:00 / #17
  8. Оффлайн

    Автор темы

    Nexus

    Забанен

    Сообщений: 611

    Создано тем: 20

    Репа: 0

    Баллы: 0

    Был: 2022-07-03 23:07

    Лайков: 8

    Цитата: Leserg
    Ты для начала собери инсталлятор программы, но со своими файлами


    Да он у меня давным-давно собран и готов ко взлету, но мне же хочется доколупаться до всего неизведанного biggrin
    Хрен с ним, выставлю как есть...
    6 марта 2014 - 00:00 / #18
  9. Оффлайн

    WYLEK

    Звание: Легенда

    Админ

    Сообщений: 2224

    Создано тем: 321

    Рейтинг: 10

    Репа: (246|246|0)

    Баллы: 3885

    Был: 2025-03-29 22:37

    Лайков: 217

    Цитата: Nexus
    а сообщения при этом берутся из файла CompiledCode.bin



    Забудь про него - никто еще его не распаковал biggrin
    Установленную прогу ищет код - /forum/32-694-1
    Если это не надо, вот кусок кода, объедини их до кучи...

    Проверка MD5 и файла обновления 

    //Не забываем вставить порверку на присутствие проверяемого файла 
 procedure CurStepChanged(CurStep: TSetupStep); 
 var 
   MD5,s:string; 
   begin 
  If CurStep=ssInstall 
 then 
   begin 
     MD5:= GetMD5OfFile(ExpandConstant(`{app}Safe.exe`)); 
      If not (MD5 = `0092f1cccd7a776679714da13bee0a9b`) then 
     begin 
       s:=`Ошибка MD5 в исполняемом файле!` #13#13 `Обновление прекращено.`; 
       MsgBox(s, mbCriticalError, mb_Ok); //Если хеш файла(ов) не соответствует, выдается сообщение, и на этом все действия прекращаются. 
     WizardForm.Close; //Закрытие инсталлятора 
     Exit; //Прерывание и откат всех действий 
 end; 
 end; 
 end; 
 //Не забываем дописать еще такую процедуру 
 procedure CancelButtonClick(CurPage:Integer; var Cancel, Confirm: Boolean); 
   begin 
   Cancel:=True; 
  If CurPage=12 //Это непосредственно страница с индикатором выполнения 
 then 
   begin 
   Confirm:=False; //На этой странице отключаем появление сообщения при нажатии на кнопку Отмена 
 end; 
 end;


    Проверка каталога 

    // Проверка присутствия определенных файлов в папке с установленной программой на странице выбора папки назначения 
 function NextButtonClick(CurPage: Integer): Boolean; 
 var 
   s:string; 
 begin 
   Result:=True; 
   If CurPage=6 then 
  begin 
    If (FileSearch(`Safe.exe`, ExpandConstant(`{app}`))=``) 
   then 
    begin 
      s:=`Извините, в директории `+ExpandConstant(`{app}`)+`` #13 `не обнаружены файлы, подтверждающие подлинность программы.` #13#13 `Пожалуйста, выберите правильный путь для установки обновления.`; 
      MsgBox(s, mbError, mb_Ok); 
      Result:= False 
    end; 
  end; 
 end;
    Сообщение отредактировал 24 января 2023 - 20:36

    6 марта 2014 - 00:00 / #19
  10. Оффлайн

    Автор темы

    Nexus

    Забанен

    Сообщений: 611

    Создано тем: 20

    Репа: 0

    Баллы: 0

    Был: 2022-07-03 23:07

    Лайков: 8

    WYLEK, едрить, да это ж целое программирование! wacko Пока так обойдуся, без прибамбасов biggrin Придет время и туда залезу.

    Цитата: WYLEK
    Забудь про него - никто еще его не распаковал


    Да ты прикалываешься surprised Сколько лет живет Inno и никто не может написать хоть приблизительный декомпилятор? Что-то не очень верится. Непорядок dry ...
    6 марта 2014 - 00:00 / #20

Статистика форума, пользователей онлайн: 0 (за последние 20 минут)

---
Создано тем
1214
Всего сообщений
16146
Пользователей
18153
Новый участник
Roman70
Powered by Bullet Energy Forum