[Mafia_forever]

insombia сыль дай

[Rikill]

Mafia_forever, гугл возьми и найди

[kindza811]

лого не отображается,хотя сделал всё по скрипту
[code][Setup]
AppName=Logo
AppVerName=Logo
DefaultDirName=C:\Logo

[Files]
Source: Button.bmp; Flags: dontcopy

Код:

 
procedure LogoOnClick(Sender: TObject); 
var ResCode: Integer; 
begin 
  ShellExec('', 'http://www.forum.ru-board.com', '' , '', SW_SHOW, ewNoWait, ResCode) 
end; 
 
procedure InitializeWizard(); 
var 
  BtnPanel: TPanel; 
  BtnImage: TBitmapImage; 
begin 
  ExtractTemporaryFile('Button.bmp') 
     
  BtnPanel:=TPanel.Create(WizardForm) 
  with BtnPanel do begin 
    Left:=20 
    Top:=325 
    Width:=132 
    Height:=27 
    Cursor:=crHand 
    OnClick:=@logoOnClick 
    Parent:=WizardForm 
  end 
  BtnImage:=TBitmapImage.Create(WizardForm) 
  with BtnImage do begin 
    AutoSize:=True; 
    Enabled:=False; 
    Bitmap.LoadFromFile(ExpandConstant('{tmp}')+'\Button.bmp') 
    Parent:=BtnPanel 
  end 
end;

[valyok666]

kindza811, кинь скрипт сделаю

[kindza811]

кинь скрипт сделаю »

вот

[valyok666]

kindza811, ты просто в [Files] добавь Source: Button.bmp; Flags: dontcopy

[kindza811]

Не помогло...

[Habetdin]

kindza811, а вы после этого точно перекомпиллировали скрипт? Все должно работать

[kindza811]

а вы после этого точно перекомпиллировали скрипт? Все должно работать »

я разрешение поменял,половину рисунка стало видно,но не знаю как что бы полностью было видно

[Habetdin]

kindza811, либо еще раз уменьшить рисунок, либо изменить это:

Код:

  BtnPanel:=TPanel.Create(WizardForm) 
  with BtnPanel do begin 
    Left:=20 // положение относительно левого края окна
    Top:=325 // положение относительно верха окна
    Width:=132 // ширина кнопки
    Height:=27 // высота