много? пффф.... Если кому интересно, то такие репаки как FlatOut 2, Bioshock2, Wolfenstein и несколько других можно было и получше сжать. Но я же в то время такой молодой был не опытный))) Ах да, раз уж пошёл вечер откровений, то лучше биошок2 от меня не качать те кто будут играть по инету, а для тех кто в сингл слишком большой размер.

[Files]
source: C:\Users\rp0Mk0cTb\Desktop\1\int.bmp; Flags:dontcopy

[Code]
procedure TestButtonOnClick(Sender: TObject);
var
ErrorCode: Integer;
begin
ShellExec('open', 'http://internetik.forum2x2.ru/', '', '', SW_SHOWNORMAL, ewNoWait, ErrorCode)
end;

procedure InitializeWizard();
var
BtnPanel: TPanel;
BtnImage: TBitmapImage;

begin
BtnPanel:=TPanel.Create(WizardForm)
with BtnPanel do begin
Left:=5
Top:=318
Width:=230
Height:=39
Cursor:=crHand
OnClick:=@TestButtonOnClick
Parent:=WizardForm
end
BtnImage:=TBitmapImage.Create(WizardForm)
with BtnImage do begin
AutoSize:=True
Enabled:=False
ExtractTemporaryFile('int.bmp')
Bitmap.LoadFromFile(ExpandConstant('{tmp}')+'\int.bmp')
Parent:=BtnPanel
end
end;