Как уменьшить размер исполнительного файла в XE7

[Vapaamies]

Сообщение от min@y™

Так и быть должно? Или я что-то делаю не так?

Если ты подсовываешь ей программу, собранную с ключом {$SetPEFlags} и потому уже оптимизированную самим Delphi, результат ожидаем. На заголовках много не выиграешь, это больше для мелких утилит вроде самой Pet имеет значение.

К тому же новые версии Delphi создают больше секций в exe-файле, и раздувшийся за их счет заголовок PE уже не влезает в первые 512 байт, так что замена DOS-заглушки ничего не дает в плане выигрыша. На твоем скрине выигрыш только за счет ключа -trunc. Убери его, и будет чистый 0.

Вот если скормить Pet программу с отладочной информацией, она ее радостно вырежет, а полученный exe-шник по размерам будет соизмерим с релизной сборкой. На практике так делать не надо, если на то нет серьезных причин. Как уже говорил, в отладочной сборке обычно включен флаг {$R+}, а порожденный им код никакая Pet не вырежет -- он по всему коду программы разбросан. Тут не утилита нужна, а компилятор, и этот компилятор -- Delphi.

Так что да, несмотря на раздутость RTL современных версий Delphi, при использовании рассмотренных нами практик файл выходит технически оптимизированным, и больше вырезать из него ничего нельзя. Нужно альтернативный компилятор писать.

[min@y™]

Так что да, несмотря на раздутость RTL современных версий Delphi, при использовании рассмотренных нами практик файл выходит технически оптимизированным, и больше вырезать из него ничего нельзя.

Да я так и думал. Но надеялся на чудо.
А чудес не бывает.

[Vapaamies]

Отпишитесь еще в теме Pet, если кто хочет увековечить свои имена в DOS-заглушках.

Сообщение от min@y™

Исходник нуждается в портировании под юникодный компайлер.

Версия 0.3.2 должна собираться, а на 0.4 еще не выделял время играться с XE2.

[min@y™]

Просто забей на НЕюникодный вариант. Навсегда.
Сэкономишь время.
Другой вопрос - смысл-то есть?

З.Ы. У меня ХЕ10, я посмотрел - можно просто удалить часть кода, связанного с кодировками.

[Vapaamies]

Сообщение от min@y™

Просто забей на НЕюникодный вариант. Навсегда.
Сэкономишь время.

Ты не понял. В CoreLite своя поддержка Юникода, работающая в Delphi 6/7. Тестируемая тобой бета используюет юникодную консоль, -- в ней нормально и диакритики выводятся, и грузинский с армянским, и иероглифы всякие. Нужно только Lucida Console или Consolas для консоли установить, о чем во встроенной справке написано.

А если собрать Pet в Delphi XE2, где нет "трюкового" модуля System, она на ровном месте из 60 КБ станет 160. Мне потом что, свою тему об уменьшении размера файлов заводить?

[min@y™]

А если собрать Pet в Delphi XE2, где нет "трюкового" модуля System, она на ровном месте из 60 КБ станет 160. Мне потом что, свою тему об уменьшении размера файлов заводить?

Да мне, собственно говоря, ультрафиолетово.
Смущает только 1 вопрос: ты D7 до самого зомби-апокалипсиса юзать собираешься?
Можешь не отвечаешь, имеешь право.

[Vapaamies]

Сообщение от min@y™

Смущает только 1 вопрос: ты D7 до самого зомби-апокалипсиса юзать собираешься?

Если зомби-апокалипсис наступит быстрее, чем я напишу Кантор, то да.

В "Канторовых системах" нет задачи правильно потреблять новомодные штуки Delphi, а стоит задача разработать самобытный Кантор. Ради этого приходится опускаться вниз. На работе я без проблем работаю в Delphi 2010 -- там другие задачи, корпоративный стандарт и всё такое прочее.

Твой интерес сподвиг меня запустить-таки виртуалку с XE2 и добиться компилируемости исходников. На радостях обновил архив исходников на SourceForge, теперь он соответствует кандидату в релиз, компилированную сборку которого я решил не выкладывать. Исходники теперь новее бинарников.

К слову сказать, в XE2 Pet.exe 100 кил выходит, я на 60 кил ошибся.

[min@y™]

К слову сказать, в XE2 Pet.exe 100 кил выходит, я на 60 кил ошибся.

Прогнать через ХЕ10?

152.png

Самое интересное, похоже, ещё впереди.
Лечится, конечно же, так:

153.jpg

Результат компайлинга:

154.png

Как работает - не проверял.

[Vapaamies]

Сообщение от min@y™

Самое интересное, похоже, ещё впереди.

{$T+} в настройках проекта включи (Typed @ operator). С object-ами без него никак.

[min@y™]

{$T+} в настройках проекта включи (Typed @ operator). С object-ами без него никак.

Да догадался. Я давно программистом работаю.
Сначала запостил, потом допёрло.