Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Логин:
Пароль:
Регистрация | Забыли пароль?

Delphi.int.ru Expert

Другие разделы портала

Переход к вопросу:

#   

Статистика за сегодня:  


Лучшие эксперты

Подробнее »



Вопрос # 676

Раздел: Delphi » Прочее
/ вопрос открыт /

Здравствуйте, уважаемые эксперты! создал программу Использую Excel App b Rave Как мозжно урезать розмер EXEшника да и весего дистрибутива не используя Архиваторы ?
заранее благодарен

Приложение:
  1. TForm1 = class(TForm)
  2. CoolBar1: TCoolBar;
  3. Gr: TGradient;
  4. XPManifest: TXPManifest;
  5. ActionManager1: TActionManager;
  6. prop: TLabel;
  7. tretgr: TGroupBox;
  8. Label13: TLabel;
  9. Label12: TLabel;
  10. po_s: TEdit;
  11. Label14: TLabel;
  12. po_i: TEdit;
  13. Label15: TLabel;
  14. po_n: TEdit;
  15. Label11: TLabel;
  16. po_b_s: TEdit;
  17. po_b_n: TEdit;
  18. Label10: TLabel;
  19. pl_b_s: TEdit;
  20. pl_b_n: TEdit;
  21. Label7: TLabel;
  22. Label8: TLabel;
  23. pl_s: TEdit;
  24. Label4: TLabel;
  25. Label5: TLabel;
  26. pl_i: TEdit;
  27. pl_n: TEdit;
  28. Label2: TLabel;
  29. Label3: TLabel;
  30. chetgr: TGroupBox;
  31. sum: TEdit;
  32. Label6: TLabel;
  33. Label9: TLabel;
  34. det: TEdit;
  35. pergr: TGroupBox;
  36. Dat: TDateTimePicker;
  37. Label1: TLabel;
  38. num: TEdit;
  39. Label16: TLabel;
  40. doc_form: TComboBox;
  41. Label17: TLabel;
  42. vtorgr: TGroupBox;
  43. UNVIV: TAction;
  44. Excel: TExcelApplication;
  45. print: TAction;
  46. List: TImageList;
  47. CHZ: TEdit;
  48. chzl: TLabel;
  49. Action1: TAction;
  50. ActionMainMenuBar1: TActionMainMenuBar;
  51. ActionToolBar1: TActionToolBar;
  52. about: TAction;
  53. exit: TAction;
  54. edb: TAction;
  55. mfo: TClientDataSet;
  56. vvod: TBitBtn;
  57. new: TAction;
  58. up: TUpDown;
  59. RvCust: TRvCustomConnection;
  60. RvProject1: TRvProject;
  61. RvSystem1: TRvSystem;
  62. pr: TAction;
  63. SaveDialog1: TSaveDialog;
  64. pre: TAction;


Р.А. Вопрос ожидает решения (принимаются ответы, доступен мини-форум)

Вопрос задал: Р.А. (статус: Посетитель)
Вопрос отправлен: 29 июня 2007, 07:22
Состояние вопроса: открыт, ответов: 2.

Ответ #1. Отвечает эксперт: Вадим К

Здравствуйте, Раджабов Амин!
А сколько в данный момент получается размер? А сколько хотелося бы?

Просто используя VCL вы уже способствуете "большим размерам". Но разве 2-3 мегабайта в наше время это большие размеры? Хотя ...
Урезать можно так:
-выкинуть большие картинки с проекта
-удалить сторонние компоненты-украшательства
-использовать пакеты времени выполнения

А использовать упаковщики - не рекомендую. Они только вредят.

Ответ отправил: Вадим К (статус: Академик)
Время отправки: 29 июня 2007, 11:02
Оценка за ответ: 4

Комментарий к оценке: Спасибо

Ответ #2. Отвечает эксперт: Матвеев Игорь Владимирович

Здравствуйте, Раджабов Амин!
1. Выкинуть ненужные ресурсы;
2. Удалить неиспользуемые модули из секций uses всех модулей ("умный" компилятор Delphi не умеет удалять автоматически неиспользуемые модули);
3. Выкинуть ненужные библиотеки;

А в конце пожать все UPX'ом (http://upx.sourceforge.net/
), и вовсе они (упаковщики) не вредят, даже помогают очень часто, главное использовать грамотно.

Ответ отправил: Матвеев Игорь Владимирович (статус: Студент)
Время отправки: 30 июня 2007, 04:00
Оценка за ответ: 4


Мини-форум вопроса

Мини-форум пуст.

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.

Версия движка: 2.6+ (26.01.2011)
Текущее время: 22 февраля 2025, 11:37
Выполнено за 0.02 сек.