Затеял свой инсталятор

@JoraVoenyjHaker · 29.10.2013, 14:50. **Показов** 18425. **Ответов** 181

Студворк — интернет-сервис помощи студентам

Главная его задача:
Создать один файл EXE
который одновременно будет и исполняемым файлом программы
и распаковщиком дополнительных библиотек если нужно
если произведен первый запуск добавление Uninstal в эту-же папку

Схема его работы примерно следующая:
1 указывается папка установки (по умолчанию Program files)
2 список найденных подключенных библиотек проекта
(сделать анализ на уровне проекта или группы не сложно)
3 текстовое поле лицензии

если есть конструктивные идеи или вопросы
Господа ! давайте будем рассматривыть их здесь

готов выложить исходники прямо сейчас !

Добавлено через 15 минут
...

@Catstail · 05.11.2013, 11:38

Сообщение от JoraVoenyjHaker

если так разобраться я свой упаковщик делаю
на манер WinRar-а

- так в winRar-е главное - не интерфейс, а алгоритм сжатия данных. Ты и за сжатие взялся?

@JoraVoenyjHaker · 05.11.2013, 13:33 **[ТС]**

Сообщение от Catstail

Ты и за сжатие взялся?

Ну вот ещё что, я воспользуюсь 7z-dll, я хотел сказать поведение такое-же, так-же есть возможность сохранять настройки

@JoraVoenyjHaker · 05.11.2013, 13:36 **[ТС]**

Раздел реестра

@JoraVoenyjHaker · 05.11.2013, 14:25 **[ТС]**

Внутри реестра, одна запись....

Кликните здесь для просмотра всего текста

[Поле адреса проекта]
C:#Documents and Settings#User#Мои документы#VB.Project#1...Создаваемые проекты#GeneratorSetupLiveVB#GeneratorSe tupLiveVB.vbp
[Список компонентов]
C:#WINDOWS#system32#wshom.ocx;Check=1
C:#WINDOWS#system32#shell32.dll;Check=1
C:#WINDOWS#system32#scrrun.dll;Check=0
C:#WINDOWS#System32#comdlg32.ocx;Check=0
C:#WINDOWS#system32#comctl32.ocx;Check=1
[Список проектов]
C:#Documents and Settings#User#Мои документы#VB.Project#1...Создаваемые проекты#GeneratorSetupLiveVB#GeneratorSe tupLiveVB.vbp;Check=1

Добавлено через 15 минут
Тоесть хочу заранее предусмотреть возможность
делать тяжолые программы, удивляюсь что прогеры VB6
так мало развивают эту тему, а сосредотачиваються только на своих мини проектиках

Добавлено через 9 минут
Если бы я делал "по своему" то там бы не один экперт не разобрался бы кроме меня
а так как я хочу выложить исходники, то делаю все компоненты легко заменяемыми
чтоб если кто захочет может внести свои усовершенствования
и по возможности коментирую текст на русском языке )))

Добавлено через 11 минут
Так как я начал использовать много-оконность в связи этим у меня вопрос
как лучше обьявлять переменные пример:

Кликните здесь для просмотра всего текста

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
'-----------------------------------------[Глобальные переменные]
Global APN$ 'App.EXEName
Global frmMain As frmMain
Global frmList As frmList
Global Const ListSettings = "[Список настроек]"
 
 
Sub Main()
    APN = App.EXEName
    'Инициализация стиля НЕ УДОЛЯТЬ
    Dim iccex As InitCommonControlsExStruct, hMod As Long
    With iccex
        .lngSize = LenB(iccex)
        .lngICC = ICC_STANDARD_CLASSES ' встроенные элементы управления VB (кнопки, текстового поля и т.д.)
    End With
    On Error Resume Next ' если произошла ...
    hMod = LoadLibrary("shell32.dll")
    InitCommonControlsEx iccex
    If Err Then
        InitCommonControls ' попробовать версию Win9x
        Err.Clear
    End If
    On Error GoTo 0
    If hMod Then FreeLibrary hMod
    frmMain.Show 'Запуск главной формы
 
End Sub

или

Visual Basic
1
2
Global frmMain As New frmMain
Global frmList As New frmList

@Catstail · 05.11.2013, 14:47

Сообщение от JoraVoenyjHaker

удивляюсь что прогеры VB6
так мало развивают эту тему, а сосредотачиваються только на своих мини проектиках

- "не хвались, едучи на рать, а хвались, едучи с рати"

@JoraVoenyjHaker · 05.11.2013, 16:44 **[ТС]**

Сообщение от Catstail

не хвались, едучи на рать, а хвались, едучи с рати

Намёк понял !

Добавлено через 5 минут
Так или иначе об этом надо разговаривать, чтоб вышло что-то толковое )))

Добавлено через 1 час 5 минут
Дошло!
переменная должна быть с измененным именем !
Global frmMain1 As New frmMain

Добавлено через 4 минуты
а иначе будут глюки в передачи свойств
между окнами

Добавлено через 34 минуты
Почему вызываемая форма не вылазеет строго на координатах фрейма ?
что тут поменять ?

Кликните здесь для просмотра всего текста

Visual Basic
1
2
frmList1.Left = Me.Left + Frame1([Фрейм список проектов]).Left * Screen.TwipsPerPixelX
frmList1.Top = Me.Top + Frame1([Фрейм список проектов]).Top * Screen.TwipsPerPixelY

Добавлено через 2 минуты
тоесть вылазеет немного выше
мне надо это понять

@JoraVoenyjHaker · 06.11.2013, 00:45 **[ТС]**

интерфейс почти сделан
можно уже начинать делать упаковку
Если кому интересно где я, или кто хочет
мне указать на ошибки, или помоч то вот:

@JoraVoenyjHaker · 07.11.2013, 20:20 **[ТС]**

Сообщение от Catstail

- так в winRar-е главное - не интерфейс, а алгоритм сжатия данных. Ты и за сжатие взялся?

Я вообще мог-бы ничего не упаковывать а вот как сделать
Объеденить в один файл с байтовой запистью !
только разделяя их в файле условными значениями и запрятать в ресурс!!!
а при запуске у клиента все компоненты молниеносно раскидаються по местам!
этот вариант уже на 99% машин сработает у кого есть рантайм
просто мне сейчас чуть-чуть некогда заниматься инсталятором, но уже прикинул
что лично мне понадобиться 6 часов непрерывной работы

а что касаеться алгоритмов сжатия у меня действительно есть свой
но я его пока не покажу )))
он работает по принципу исключения находящихся фрагментов в файле
особенно эфективно сжимает тексты
алгоритм сначало регестрирует по одному символу в файле затем по словам, фрагментам и тд
и переписывает так, как это по порядковому номеру в списке регистрированных значений
бинарным способом тоесть из 8 бит может выходить 7 и менее для расшифровки одного байта

Добавлено через 4 минуты
Я этот алгоритм на полном серьёзе продать хочу
только доработаю немного

Добавлено через 10 часов 7 минут

Сообщение от JoraVoenyjHaker

Объеденить в один файл с байтовой запистью

кстате я уже так и делаю, теперь уже точно переделывать не буду
преемущества:
1 алгоритмы имеются (потому что я их сам делал)
за исключением алгоритма The Trick который редактирует ресурс отдельное спасибо
2 возможность устанавливать свои навороты в выходной установочной программе
(картинки, или ссылки, или даже если всё это разовьёться комерческую рекламу !!!)
3 если использовать для сжатия системный ZIP то проблем точно не возникнет
потомучто объедененный файл можно одинаково хранить как в сжатом виде
так и в нормальном разница только в скоростях

@JoraVoenyjHaker · 08.11.2013, 20:31 **[ТС]**

если кому интересно сжатие вот отдельный мой класс
работающий только в группе !

@JoraVoenyjHaker · 08.11.2013, 20:51 **[ТС]**

где отмеченно звездочкой
это ноу-хау

@The trick · 08.11.2013, 20:56

Сообщение от JoraVoenyjHaker

если кому интересно сжатие вот отдельный мой класс
работающий только в группе !

Ты что работаешь с кодом как со строкой?

Не по теме:

Особо не разбирал, поверхностно просмотрел

@JoraVoenyjHaker · 08.11.2013, 22:09 **[ТС]**

Это отдельны мой клас для сжатия
я его еще разрабатываю
с удовольствием буду дружить кто понимает в этом

Добавлено через 56 минут
Я намеренно не стал показывать ещё одну
часть так-как там есть что-то такое
из за чего идею просто украдут )))

Добавлено через 12 минут
эйфория перво-открывателя
Если я хотя-бы раз в день не буду это испытывать
то считаю день прошол зря )))

@JoraVoenyjHaker · 10.11.2013, 03:28 **[ТС]**

Автор: Fredrik Qvarfort

Вообще-то данным алгоритмом можно сжать файл любого формата, но на текстовых файлов этот метод показывает наибольшую производительность. Что самое интересное, производительность заключается в скорости сжатия. Вот например, приведённый ниже пример программы ужимает текстовый файл размером 1.6Мб за 1 секунду 8-0. .....и такое бывает

@JoraVoenyjHaker · 10.11.2013, 03:51 **[ТС]**

Автор: Mark Withers

Основная задача этой программы - это шифрование файлов, но так же она позволяет сжимать весь архив с разной степенью сжатия, наподобие WinZip

Осталось cybercrypt прикрутить в мою прогу и всё

@JoraVoenyjHaker · 10.11.2013, 05:31 **[ТС]**

Ну теперь мне медаль дадут

@Catstail · 11.11.2013, 11:50

Сообщение от JoraVoenyjHaker

Fredrik Qvarfort

- автор, все-таки Хаффман...

@JoraVoenyjHaker · 11.11.2013, 11:59 **[ТС]**

У меня свой алгоритм есть, но я решил
в интернете покопаться и выложить чужие
при этом сослался на их Авторство

@Pro_grammer · 11.11.2013, 22:59

Сообщение от JoraVoenyjHaker

Что самое интересное, производительность заключается в скорости сжатия.

А смысл, если сжатие плохое? Разница в скорости 1-2 секунды кого волнует? А вот сжатие хуже на 34% это уже существенный минус. Не так ли? Проверил на романе "Война и мир" 1 том. Обычный ZIP сжал текст в ~1.5 Мб до 601 Кб, а этот код всего до 903 Кб. А если 7Zip подключить? Тут вообще будет полный провал, да?

Сообщение от JoraVoenyjHaker

У меня свой алгоритм есть,

Давай твой проверим! Можно без исходника, если он тебе дорог, как ценный бриллиант. Просто выложи скомпилированную программу, где можно выбрать любой файл для сжатия.
А что? может ты гений???

@JoraVoenyjHaker · 12.11.2013, 05:15 **[ТС]**

ну может не так громко...
но не-стандартные подходы имеються...
Я и говорю не до-работал ещё
там ничего хитроумного:
суть в крации я описал выше )))

а пока в инсталятор можно cybercrypt прикрутить
найду время, сделаю

что же касается 7Zip то я бы его мог использовать
к сожалению не нашол исходника
а использовать чью-то, DLL не охота

Сообщение от Catstail

автор, все-таки Хаффман...

там в интернете уже столько раз всё пере-украденно,
что уже концов не найдеш )))

fireday · 16.11.2013, 19:32

JoraVoenyjHaker, на официальном сайте 7zip есть консольный вариант (ехе+дллки)

Новые блоги и статьи Все статьи Все блоги /
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .
Оттачиваю умение писать js программы. russiannick 30.08.2026 Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .	мат медиц модель 30. презентация проекта anaschu 27.08.2026 хоп хоп хоп хидахоп, а я кладую))	Как у меня протекала болезнь zorxor 27.08.2026 Здравствуйте, друзья! Эта запись блога предназначена именно для вас - для моих дорогих друзей, которые знали меня лично. Чтобы ответить на вопрос - а что же со мной произошло на самом деле? Я учился. . .	Нашел вот забавное видео о измерениях. Лучшее что я видел на эту тему kumehtar 26.08.2026 ILETXiw9bMQ Основная суть и тезисы по измерениям: 0D (Нулевое измерение): точка, не имеющая длины, ширины, высоты или объема. Объект не может перемещаться в 0D. 1D (Первое измерение):. . .

@JoraVoenyjHaker Заблокирован

	Затеял свой инсталятор 29.10.2013, 14:50. Показов 18425. Ответов 181 Метки generatorsetuplivevb, package vb, setup для vb, инсталятор vb (Все метки) Главная его задача: Создать один файл EXE который одновременно будет и исполняемым файлом программы и распаковщиком дополнительных библиотек если нужно если произведен первый запуск добавление Uninstal в эту-же папку Схема его работы примерно следующая: 1 указывается папка установки (по умолчанию Program files) 2 список найденных подключенных библиотек проекта (сделать анализ на уровне проекта или группы не сложно) 3 текстовое поле лицензии если есть конструктивные идеи или вопросы Господа ! давайте будем рассматривыть их здесь готов выложить исходники прямо сейчас ! Добавлено через 15 минут ... 0

@JoraVoenyjHaker Заблокирован
	05.11.2013, 13:36 [ТС]
	Раздел реестра Миниатюры 0

@JoraVoenyjHaker Заблокирован
	08.11.2013, 20:51 [ТС]
	где отмеченно звездочкой это ноу-хау 0

@JoraVoenyjHaker Заблокирован
	08.11.2013, 22:09 [ТС]
	Это отдельны мой клас для сжатия я его еще разрабатываю с удовольствием буду дружить кто понимает в этом Добавлено через 56 минут Я намеренно не стал показывать ещё одну часть так-как там есть что-то такое из за чего идею просто украдут ))) Добавлено через 12 минут эйфория перво-открывателя Если я хотя-бы раз в день не буду это испытывать то считаю день прошол зря ))) 0

@JoraVoenyjHaker Заблокирован
	10.11.2013, 05:31 [ТС]
	Ну теперь мне медаль дадут 0

@JoraVoenyjHaker Заблокирован
	11.11.2013, 11:59 [ТС]
	У меня свой алгоритм есть, но я решил в интернете покопаться и выложить чужие при этом сослался на их Авторство 0

fireday 307 / 138 / 6 Регистрация: 17.04.2013 Сообщений: 1,943
	16.11.2013, 19:32
	JoraVoenyjHaker, на официальном сайте 7zip есть консольный вариант (ехе+дллки) 0