Solved

Delphi exe size

Posted on 2002-03-25
5
208 Views
Last Modified: 2010-04-04
If I create a new clean application which uses no extra unit my project is about 16kb, if I include lets say inifiles in uses clause the file growns even when I don't use anything from inifiles.pas.
Why does delphi include code from inifiles when it is unneeded ? Is there a way to remove this unused code ?
0
Comment
Question by:bnz
5 Comments
 
LVL 9

Expert Comment

by:ginsonic
ID: 6893821
Is included because you ask it . The inifiles unit is declared into uses ( by you ) so the compiler add this 'library' into compiled version.
If you don't need some units just remove these from uses section.

If you don't know if use some units or not, just remove one by one and try to run the application . If receive error mesages then undo . Do that for all declared units ( but one be one ) .
0
 
LVL 1

Expert Comment

by:slavikn
ID: 6894398
You can make a package. It is very small because is doesn't compile any units. It uses DLLs which are included in the Windows directory. It doesn't work sometimes because a certain DLL may be old...
0
 
LVL 14

Accepted Solution

by:
AvonWyss earned 100 total points
ID: 6895068
Units can have initializations, that is, code that is executed when loading or stopping the application. These are used to initialize things needed for that particular unit to work. Now, your example IniFiles itself does not have such initializations, but it does include other units: Windows, SysUtils, Classes and Consts. Both SysUtils and Classes do have initializations; SysUtils mainly to provide exception handling and Classes mainly for the streaming system. So that's the code that is added - and executed - to your EXE.

Note that the Forms unit is making your EXE grow about the most. So unless you use it (GUI stuff), you should not include it directly or indirectly if you want to have a small EXE file.
0
 
LVL 14

Expert Comment

by:DragonSlayer
ID: 6895433
Shrink the size of your .EXE using the UPX tool... get the latest version from http://upx.sourceforge.net/
0
 
LVL 33

Expert Comment

by:Slick812
ID: 6895624
hello bnz, you can remove the unneeded Kb by rewriting the units (SysUtils and Classes) and only including the functions and initialization code that you need for your app, but this can take time and requires API knowledge. You could use API and leave out the inifiles unit altogether.

var
IniName: PChar;
CharBuffer: array[0..255] of Char;


IniName := 'C:\App Folder\this.ini';

  GetPrivateProfileString(FormPos,'Top','70', CharBuffer, SizeOf(CharBuffer), IniName);
  {GetPrivateProfileString reads the specified String or gets the lpDefault
  if there is no string to read}
  Top := Str2Int(String(CharBuffer));
  {get the Top and Left for the window position}
  GetPrivateProfileString(FormPos,'Left','70', CharBuffer, SizeOf(CharBuffer), IniName);
  Left := Str2Int(String(CharBuffer));



procedure ShutDown;
var
WinPlace: TWindowPlacement;
begin
WinPlace.length := SizeOf(TWindowPlacement);
GetWindowPlacement(hNoteHandle,@WinPlace);
WritePrivateProfileString(FormPos,'Top',PChar(Int2Str(WinPlace.rcNormalPosition.Top)), IniName);
{WritePrivateProfileString writes to an Ini file}
WritePrivateProfileString(FormPos,'Left',PChar(Int2Str(WinPlace.rcNormalPosition.Left)),IniName);
PostQuitMessage(0);
end;


Are you trying to create an app without the Forms unit?
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Hello everybody This Article will show you how to validate number with TEdit control, What's the TEdit control? TEdit is a standard Windows edit control on a form, it allows to user to write, read and copy/paste single line of text. Usua…
Introduction Raise your hands if you were as upset with FireMonkey as I was when I discovered that there was no TListview.  I use TListView in almost all of my applications I've written, and I was not going to compromise by resorting to TStringGrid…
Windows 10 is mostly good. However the one thing that annoys me is how many clicks you have to do to dial a VPN connection. You have to go to settings from the start menu, (2 clicks), Network and Internet (1 click), Click VPN (another click) then fi…
Internet Business Fax to Email Made Easy - With  eFax Corporate (http://www.enterprise.efax.com), you'll receive a dedicated online fax number, which is used the same way as a typical analog fax number. You'll receive secure faxes in your email, f…

920 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

16 Experts available now in Live!

Get 1:1 Help Now