Графическая оболочка для UPX (GUI-UPX)

[Johnson]

Мини-тест...
Библиотека DLL.
Исходный размер 3.18мБ
Размер после любой степени сжатия, с любыми опциями - 3.18мБ.
Испытано на 3 разных библиотеках с разными размерами...

Вопрос автору: зачем включать поддержку сжатия библиотек, если они не сжимаются?
Пожелания автору:
1 - настройте фильтры OpenDialog
2 - уберите вкладки. Пусть окно програмы будет чуть больше, зато станет удобнее.
3(если отклонено пожелание 2) - При создании формы принудительно открывайте первую вкладку. При создании формы сразу открывайте OpenDialog.

[Johnson]

Мини-тест...
Библиотека DLL.
Исходный размер 3.18мБ
Размер после любой степени сжатия, с любыми опциями - 3.18мБ.
Испытано на 3 разных библиотеках с разными размерами...

Вопрос автору: зачем включать поддержку сжатия библиотек, если они не сжимаются?
Пожелания автору:
1 - настройте фильтры OpenDialog
2 - уберите вкладки. Пусть окно програмы будет чуть больше, зато станет удобнее.
3(если отклонено пожелание 2) - При создании формы принудительно открывайте первую вкладку. При создании формы сразу открывайте OpenDialog.

[_SERGEYX_]

И добавить поддержку командной строки. Например, у меня все упаковщики в total commndere добавлены на панель и я просто "вытягиваю" нужный файл на иконку.
Значит, при OnCreate нужно добавить

if ParamStr(1) <>'' then path:= ParamStr(1); //и т.д.

И, ИМХО, мне не нравятся два таймера. Ну, просто не нравятся и всё... . Не люблю таймеры.

[Johnson]

Эмм... Я, вобще-то, не смотрел даже сырцы... Но ЗАЧЕМ там таймеры??? оО
Так же стоит запускать UPX в скрытом виде...
А ещё - создавать отдельный поток, в нем использовать CreateProcess и ответы из этого процесса обрабатывать, и ждать завешения... Прикрутить прогрессбар, сделать синхронизацию... Тогда и не понадобятся таймеры, чтоб вычислять размер результата (только предполагаю, что они там для этого, не видел)...
И по командной строке выставлять степень сжатия на максимум и устанавливать фокус на кнопку Старт...


Ой что-то я разогнался... Но если Вы пишите код для паблика - пишите его правильно и красиво...
PS: не надо заявлять "дареному коню в зубы не смотрят"... гуй такого уровня я написал для UPX ещё когда только начал изучать дельфю...

[Alex Cones]

Но ЗАЧЕМ там таймеры???

procedure TForm1.Timer1Timer(Sender: TObject);
begin
if CheckBox6.Checked then
 begin
 CheckBox1.Checked := false;
 CheckBox2.Checked := false;
 CheckBox3.Checked := false;
 CheckBox4.Checked := false;
 CheckBox5.Checked := false;
 end;

end;

procedure TForm1.Timer2Timer(Sender: TObject);
begin
size_b := FileSize(path);
StatusBar1.Panels[0].Text := 'Размер после упаковки: '+FloatToStr(Roundto(size_b/1024,-1))+' Кбайт';
if StatusBar1.Panels[0].Text <>'' then
StatusBar1.Panels[1].Text := 'Соотношение '+FloatToStr(RoundTo((size_b/size_a)*100,-1))+' %';
end;

[Johnson]

Про первый таймер могу сказать только одно - ОЙ!
А про второй угадал-таки

[Alex Cones]

ОЙ!

На самом деле это печально, когда кто-то так делает.

[Johnson]

Ну про глубокую печаль я и говорю...
Не хочу обидеть,просто пошутить, но Индия потеряла Великого программиста...

[>>arty<<]

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

Ну про глубокую печаль я и говорю...
Не хочу обидеть,просто пошутить, но Индия потеряла Великого программиста...

Сразу по поводу библиотек: у меня прекрасно сжалось - видимо у вас она и так сжатая!

Во-первых, это оболочка!!! (и все её недостатки мне и так без вас известны)
Во-вторых, о прогресс баре и остальных вопросах обсуждалось здесь:

КИБЕРФОРУМ

В третьих, в одном таймере два моих условия проверки сосуществовать не могут!

В четвёртых, это программа скорее любительская нежели профессиональная (если вам не нравится - пишите свою, как напишите - возьмите пряник с полки!), она лишь позволяет упростить использование UPX (которая является консольной - в ней нет никаких библиотек и поэтому с ней я работаю через делфю и запускаю с параметром).

P.S. критиковать чужое очень легко, сделать своё и доказать на деле - сложнее, и в Индии я жить и работать не планировал....

[Alex Cones]

и все её недостатки мне и так без вас известны

С таким отношением в программировании делать нечего.

В третьих, в одном таймере два моих условия проверки сосуществовать не могут!

Похоже пост о том, что ТАЙМЕРЫ ТАМ НЕ НУЖНЫ вы проморгали.