Размер ActiveX Library в Delphi XE5

[STRELOK-2007]

Приветствую!

Заметил, что релизный вариант Activex Library, содержащей один COM сервер, один COM объект с одним интерфейсом, имеющим один простой метод - занимает больше, чем VCL-приложение, являющегося клиентом!
2,3мб против 2.1мб!
Это-же очень много!

После изучения, оказалось, что библиотека таскает с собой ненужные модули StdVCL и Graphics. Убрал, скомпилировал.
Больше кажется ничего не уберешь, все нужно.

Размер стал 1.2мб. Серьезное изменение, но все равно много!

Можно ли еще что-то сделать?

p.s.
Сжимал VMProtect-ом, размер стал 960кб.

[Человек_Борща]

Сам вырежи полезный код, и решишь проблему) Компилятор этого не умеет.

[doktor255]

Интересно, запустится ли такое приложение на компьютере, где нет делфи?

[Человек_Борща]

Да. Всегда так делаю когда надо достичь бинарника больших возможностей и маленького размера(~40-80 кб). Очень рутинная работа, но оно того стоит) И работает очень даже ничего, где угодно и как должно. И упаковщики не нужны.

[doktor255]

А можно посмотреть алгоритм этой самой рутинной работы (в подробностях)? Часто скидываю свои проекты людям, и не очень престижно отдавать простой проект весом под 5 мегабайт.

[ZuBy]

Сообщение от Человек_Борща

Да. Всегда так делаю когда надо достичь бинарника больших возможностей и маленького размера(~40-80 кб). Очень рутинная работа, но оно того стоит) И работает очень даже ничего.

с COM объектами такое не выйдет, они завязаны интерфейсами... один вставишь, но в методах использует следующий, а этот еще один, и так до бесконечности...

[Человек_Борща]

Банально выпиливаешь модуль Windows из Uses, видишь кучу красного(в XE версиях есть)), отмечаешь это) Создаёшь модуль uSmall_Windows и начинаешь туда копипастить из оригинального Windows.pas все что используешь в своём проекте.

В итоге у тебя Windows.pas, но уже в рамках твоего проекта и не большого размера, а оригинальный уже не нужен.

[doktor255]

Выпилил Uses до такого содержания

unit Unit1;

interface

uses
  Vcl.Forms;

type
  TForm1 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

end.

Компилируемый код как был под 2 мегабайта, так и остался. Что я сделал не так?

[ZuBy]

VCL.Froms много весит, теперь то что выпилил, добавь в WinAPI проекту
увидишь результата

[doktor255]

Зачем мне куда-то что-то добавлять, если я хочу уменьшить размер конкретно этого приложения???