powered by simpleCommunicator - 2.0.59     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / размер DLL смущает, как уменьшить.
19 сообщений из 44, страница 2 из 2
размер DLL смущает, как уменьшить.
    #40059869
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Maxim Rusov
Раньше Variants вообще не было. При этом все конвертации вариантов работали...

Раньше, это когда?
...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40059870
Фотография Maxim Rusov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В 5-ке
...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40059873
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Maxim Rusov,

Ну блин... Давайте ещё с Турбо Паскалем сравним.
...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40059879
Фотография Maxim Rusov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev Alexey,

Ты спросил - я ответил.

Суть в том, что нельзя подключить WinAPI-шные хидеры, не потянув за собой кучу ненужного кода (а в некоторых случаях - и очень вредного). Это бардак. Хидеры не должны ничего тянуть.
...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40059885
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Maxim Rusov,

Подключение Winapi.Windows тянет только SysInit, System, System.Types, System.UITypes;
...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40059887
Фотография Maxim Rusov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev Alexey,

А ActiveX и всех производных (а это все актуальные API) - еще и SysUtils.
...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40059892
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Maxim Rusov,

В каких ситуациях это является проблемой?
...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40059895
Фотография Maxim Rusov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev Alexey,

Стадия принятия? :) Очевидно - если я не хочу цеплять SysUtils. Я вот плагины пишу - это маленькие DLL-ки и их _много_. Они в большинстве <100 K.
...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40059901
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Maxim Rusov
Стадия принятия? :)

Нет, я понять пытаюсь, от чего такая драма.

Maxim Rusov
Очевидно - если я не хочу цеплять SysUtils. Я вот плагины пишу - это маленькие DLL-ки и их _много_. Они в большинстве <100 K.

А, ну понятно...
...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40059909
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Maxim Rusov
А ActiveX и всех производных (а это все актуальные API) - еще и SysUtils.
Где?
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
{*******************************************************}
{                                                       }
{           CodeGear Delphi Runtime Library             }
{                                                       }
{        Files:  olectl.h, DocObj.h, oleauto.h          }
{        Copyright (c) Microsoft Corporation.           }
{        All Rights Reserved.                           }
{                                                       }
{       Translator: Embarcadero Technologies, Inc.      }
{ Copyright(c) 1995-2018 Embarcadero Technologies, Inc. }
{              All rights reserved                      }
{                                                       }
{*******************************************************}

{*******************************************************}
{            ActiveX / OLE 2 Interface Unit             }
{*******************************************************}

unit Winapi.ActiveX;

{$ALIGN ON}
{$MINENUMSIZE 4}
{$WEAKPACKAGEUNIT}
{$HPPEMIT LEGACYHPP}

interface

uses Winapi.Messages, System.Types, Winapi.Windows;

...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40059912
Фотография Maxim Rusov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40059917
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
program Test;

{$APPTYPE CONSOLE}

{$R *.res}

var
  LVar1: Variant;
  LVar2: OleVariant;
begin
  LVar1 := '123';
  Writeln(LVar1 + 1);
  LVar2 := '100';
  Writeln(LVar2 - 1);
  Readln;
end.

124
99ЧЯДНТ?

Delphi 10.3.1
...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40059918
GunSmoker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
_Vasilisk_, map файл глянь.
...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40059920
Fr0sT-Brutal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ну хз. На 10.3 сделал проект, х64 Релиз

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
library Project1;
uses
  Windows,
  System.SysUtils;

{$R *.res}

var i: olevariant;
  s: string;
begin
  i := 'ddd';
  s := i;
  OutputDebugString(pchar(s));
end.



273 кб. Не то, о чем стоит беспокоиться.
Хотя, конечно, неявное подключение выглядит неуместно. Коль уж тип объявлен в system - так дайте с ним работать без довесков.

Можно извратиться и реализовать свой olevariant. Это ведь все равно в конечном итоге некая структура.
...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40059922
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GunSmoker
map файл глянь.
Да. Уже вижу. Был не прав
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
 0001:00000000 0000C29C C=CODE     S=.text    G=(none)   M=System   ACBP=A9
 0001:0000C29C 00000C50 C=CODE     S=.text    G=(none)   M=SysInit  ACBP=A9
 0001:0000CEEC 00000038 C=CODE     S=.text    G=(none)   M=System.Types ACBP=A9
 0001:0000CF24 0000000C C=CODE     S=.text    G=(none)   M=System.UITypes ACBP=A9
 0001:0000CF30 00000284 C=CODE     S=.text    G=(none)   M=Winapi.Windows ACBP=A9
 0001:0000D1B4 00000338 C=CODE     S=.text    G=(none)   M=System.SysConst ACBP=A9
 0001:0000D4EC 00000024 C=CODE     S=.text    G=(none)   M=Winapi.PsAPI ACBP=A9
 0001:0000D510 00000098 C=CODE     S=.text    G=(none)   M=System.RTLConsts ACBP=A9
 0001:0000D5A8 00005D88 C=CODE     S=.text    G=(none)   M=System.Character ACBP=A9
 0001:00013330 00000278 C=CODE     S=.text    G=(none)   M=System.Internal.ExcUtils ACBP=A9
 0001:000135A8 0000B6B4 C=CODE     S=.text    G=(none)   M=System.SysUtils ACBP=A9
 0001:0001EC5C 00000958 C=CODE     S=.text    G=(none)   M=System.VarUtils ACBP=A9
 0001:0001F5B4 0000927C C=CODE     S=.text    G=(none)   M=System.Variants ACBP=A9
 0001:00028830 00001D58 C=CODE     S=.text    G=(none)   M=Test  ACBP=A9
 0002:00000000 000000E0 C=ICODE    S=.itext   G=(none)   M=System   ACBP=A9
 0002:000000E0 00000008 C=ICODE    S=.itext   G=(none)   M=SysInit  ACBP=A9
 0002:000000E8 00000014 C=ICODE    S=.itext   G=(none)   M=System.UITypes ACBP=A9
 0002:000000FC 00000018 C=ICODE    S=.itext   G=(none)   M=Winapi.Windows ACBP=A9
 0002:00000114 00000008 C=ICODE    S=.itext   G=(none)   M=Winapi.PsAPI ACBP=A9
 0002:0000011C 00000010 C=ICODE    S=.itext   G=(none)   M=System.Character ACBP=A9
 0002:0000012C 00000020 C=ICODE    S=.itext   G=(none)   M=System.Internal.ExcUtils ACBP=A9
 0002:0000014C 00000418 C=ICODE    S=.itext   G=(none)   M=System.SysUtils ACBP=A9
 0002:00000564 00000010 C=ICODE    S=.itext   G=(none)   M=System.VarUtils ACBP=A9
 0002:00000574 000000B8 C=ICODE    S=.itext   G=(none)   M=System.Variants ACBP=A9
 0002:0000062C 00000140 C=ICODE    S=.itext   G=(none)   M=Test  ACBP=A9
 0003:00000000 00000C04 C=DATA     S=.data    G=DGROUP   M=System   ACBP=A9
 0003:00000C04 0000007C C=DATA     S=.data    G=DGROUP   M=SysInit  ACBP=A9
 0003:00000C80 0000000C C=DATA     S=.data    G=DGROUP   M=Winapi.Windows ACBP=A9
 0003:00000C8C 00000124 C=DATA     S=.data    G=DGROUP   M=System.Internal.ExcUtils ACBP=A9
 0003:00000DB0 00000790 C=DATA     S=.data    G=DGROUP   M=System.SysUtils ACBP=A9
 0003:00001540 00000008 C=DATA     S=.data    G=DGROUP   M=System.VarUtils ACBP=A9
 0003:00001548 00000138 C=DATA     S=.data    G=DGROUP   M=System.Variants ACBP=A9
 0004:00000000 00003628 C=BSS      S=.bss     G=DGROUP   M=System   ACBP=A9
 0004:00003628 00000020 C=BSS      S=.bss     G=DGROUP   M=SysInit  ACBP=A9
 0004:00003648 00000008 C=BSS      S=.bss     G=DGROUP   M=System.UITypes ACBP=A9
 0004:00003650 00000008 C=BSS      S=.bss     G=DGROUP   M=Winapi.Windows ACBP=A9
 0004:00003658 00000008 C=BSS      S=.bss     G=DGROUP   M=Winapi.PsAPI ACBP=A9
 0004:00003660 00000024 C=BSS      S=.bss     G=DGROUP   M=System.Character ACBP=A9
 0004:00003684 00000004 C=BSS      S=.bss     G=DGROUP   M=System.Internal.ExcUtils ACBP=A9
 0004:00003688 0000224C C=BSS      S=.bss     G=DGROUP   M=System.SysUtils ACBP=A9
 0004:000058D4 0000005C C=BSS      S=.bss     G=DGROUP   M=System.VarUtils ACBP=A9
 0004:00005930 0000001C C=BSS      S=.bss     G=DGROUP   M=System.Variants ACBP=A9
 0004:0000594C 00000024 C=BSS      S=.bss     G=DGROUP   M=Test  ACBP=A9
 0005:00000000 00000010 C=TLS      S=.tls     G=(none)   M=System   ACBP=A9
 0005:00000010 00000004 C=TLS      S=.tls     G=(none)   M=System.SysUtils ACBP=A9
...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40060002
kealon(Ruslan)
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev Alexey
kealon(Ruslan)
пишут...
"просто подцепить SysUtils" на новых дельфях это сразу больше мегабайта

Враньё. Релизные размеры сильно меньше.
пардон, System.Classes - >1.5 мб на x64
...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40060006
bk0010
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
(Старческим голосом) Помницца в молодости был еще такой KOL, созданный как раз для минимизации объемов файлов. Посмотрите, что с ним сталось за эти годы, может это то, что вы ищете.
...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40060023
white_nigger
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А я ещё помню уйнёй маялся, чтоб на 2010 или XE (не помню точно) пустой exe-шник 7кб получался. Вот делать нехера было...
...
Рейтинг: 0 / 0
размер DLL смущает, как уменьшить.
    #40060029
kealon(Ruslan)
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
white_nigger,

во всём можно найти смысл, может при наброске кнопочек это и неважно
хотя бы протектор накинуть из популярных, а в твоём результате дыры, оставленные в базовой библиотеке, так можно пустить под хвост несколько человеколет

выбор как таковой практически отсутствует: либо всё вместе, либо сам пиши
не надо кривой аналогии про комплексный обед, с него что-то можно и не съесть
...
Рейтинг: 0 / 0
19 сообщений из 44, страница 2 из 2
Форумы / Delphi [игнор отключен] [закрыт для гостей] / размер DLL смущает, как уменьшить.
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]