Уменьшаем Exe, удаляя релоки без сторонних утилит.
Написал Snowy
08.05.2007
Многие знают, что можно уменьшить размер exe файла, не используя упаковщики и не изменяя функциональность, путём удаления из exe таблицы релокаций.
Обычно для этого используют сторонние утилиты. Например StripReloc Джордона Рассела.
А теперь я расскажу страшную тайну. В Delphi 2006 и выше, релоки можно не удалять, а просто не создавать!
В Delphi 2006 появилась недокументированная директива компилятора {$SETPEFLAGS}. Она позволяет настроить несколько тонких моментов создания нашего бинарника.
В первую очередь она интересна тем, что позволяет отключить создание таблицы релокаций.
Внимание! Не отключайте таблицы релокаций в dll, bpl и др. файлах.
Таблица релокации не нужна exe файлу, т.к. он всегда грузится по одному и тому же адресу.
Использование директивы {$SETPEFLAGS} очень простое:
Откройте файл проекта (dpr)
В uses добавьте Windows
Ниже пропишите {$SETPEFLAGS IMAGE_FILE_RELOCS_STRIPPED}
Попробуйте скомпилировать файл до добавления этой директивы и после.
Вы сами сможете убедиться, что размер exe уменьшился.
В дополнение хочу сказать, что использование SETPEFLAGS этим не ограничивается.
У неё есть ещё масса интересных возможностей. Получить их полный список очень просто:
Откройте модуль Windows
Найдите в нём поиском IMAGE_FILE_RELOCS_STRIPPED
Нашли? Ниже идёт целый список констант, начинающихся с IMAGE_FILE_
Справа идёт комментарий. Для включения нескольких инструкций, используйте or. Пример:
{$SETPEFlAGS IMAGE_FILE_RELOCS_STRIPPED or IMAGE_FILE_DEBUG_STRIPPED or
IMAGE_FILE_LINE_NUMS_STRIPPED or IMAGE_FILE_LOCAL_SYMS_STRIPPED or
IMAGE_FILE_REMOVABLE_RUN_FROM_SWAP or IMAGE_FILE_NET_RUN_FROM_SWAP}
Что я здесь сделал?
IMAGE_FILE_RELOCS_STRIPPED - отрезал релоки
IMAGE_FILE_DEBUG_STRIPPED - Выбросил из ехе Debug информацию
IMAGE_FILE_LINE_NUMS_STRIPPED - Выбросил из exe информацию о номерах строк
IMAGE_FILE_LOCAL_SYMS_STRIPPED - Выбросил local symbols
IMAGE_FILE_REMOVABLE_RUN_FROM_SWAP - При запуске exe с компакта, флэшки, других извлекаемых устройств, считать exe в свап и запустить оттуда. Полезно, если нужно запустить программу с компакта, а потом попросить вставить другой...
IMAGE_FILE_NET_RUN_FROM_SWAP - аналогично предыдущей, только для сетевых дисков
Для того что бы уменьшить размеры проги на Delphi до размеров в несколько килобайт необходимо писать на чистом WinApi удаляя RTL и пакуя FSG)) При этом я лично изготавливал ехе-шник (простое пустое окно как стандартный проект в делфи) размером в 1400 байт)))) Вот это уменьшение))
ответ - лучший дизайн интерьера квартиры в Киеве и области
ничего нового автор не открыл для тех кто интересуется, а вообще...
Нет никакого совпадения - тут же написано, что вышла новая верси...
Ссылка вдогонку - Официальный сайт:http://crosskylix.untergrund....
Обновление CrossKylix - Удивительно всё совпало, но в день напис...
Ошибка - Установил Delphi 2010,При использовании кряка (Ctrl + A...
Перезалейте - Перезайлейте плиз delphi 7 на другой файлообменник...
Проще Lazarus использовать
Turbo Delphi Explorer - >Snowyспасибо за ключик! обыскался
re: Программы на Delphi - [quote=Chrome]Чтобы бесплатно распрост...