Ver Mensaje Individual
  #16  
Antiguo 03-03-2008
Avatar de Al González
[Al González] Al González is offline
In .pas since 1991
 
Registrado: may 2003
Posts: 5.610
Reputación: 32
Al González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en bruto
Cita:
Empezado por ixMike Ver Mensaje
...SysUtils...si la quito, me ahorro 50KBs. Es más, la pongo, sin usar nada de ella, y al quitarla, ¡me ahorro 50KBs!...
Habría que revisar a detalle el programa y los fuentes de Delphi 3 (hace como siete años que no lo uso), pero muy probablemente se debe a que la unidad SysUtils lleva a cabo código de inicialización, en la SysUtils.pas de Delphi 7 dicho código es:

Código Delphi [-]
initialization
  if ModuleIsCpp then HexDisplayPrefix := '0x';
  InitExceptions;

{$IFDEF LINUX}
  SafeCallErrorProc := @SafeCallError;
  ExitProcessProc := PropagateSignals;

  CheckLocale;
{$ENDIF}

{$IFDEF MSWINDOWS}
  InitPlatformId;
  InitDriveSpacePtr;
{$ENDIF}
  GetFormatSettings; { Win implementation uses platform id }

Debe considerarse que siempre será compilado el código de inicialización que tengan todas las unidades referidas a través de cláusulas Uses.

Saludos.

Al.
Responder Con Cita