Jump to content
Korean Random

MS_RAMIS

User
  • Posts

    52
  • Joined

  • Last visited

Posts posted by MS_RAMIS

  1. в редакторе форм. В  Select TasksPage  просто растяни на сколько тебе нужно.

     

    ответили уже)) не заметил))

     

    через редактор форм менял размер ... и получил код 

     

    { RedesignWizardFormBegin } // Не удалять эту строку!
    // Не изменять эту секцию. Она создана автоматически.
    procedure RedesignWizardForm;
    begin
      with WizardForm.TasksList do
      begin
        Width := ScaleX(600);
        Height := ScaleY(350);
      end;
    
    { ReservationBegin }
      // Вы можете добавить ваш код здесь.
    
    { ReservationEnd }
    end;
    // Не изменять эту секцию. Она создана автоматически.
    { RedesignWizardFormEnd } // Не удалять эту строку!
    

     

    при компиляции выдает ошибку 

    вот код 

     

    [Code]
    
    //--------------- ФАК ---------------\\
    var
    InfoForm: TSetupForm;
    Info, Ok: TButton;
    InfoBefore: TRichEditViewer;
    ReadmeRu,ReadmeEn: AnsiString;
    
    procedure Okclick(Sender: TObject);
    begin
      InfoForm.Close;
      WizardForm.Enabled:=True;
    end;
    
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
    begin
      WizardForm.Enabled:=true;
    end;
    
    procedure InfoClick(Sender: TObject);
    begin
    InfoForm:= CreateCustomForm();
    with InfoForm do begin
      ClientWidth := ScaleX(600);
      ClientHeight := ScaleY(400);
      CenterInsideControl(WizardForm, False);
      Caption:='Страница FAQ';
      onClose:=@FormClose;
    Ok:=tbutton.create(InfoForm)
    with Ok do begin
      SetBounds(ScaleX(490),ScaleY(370),ScaleX(80),ScaleY(25));
      parent:=InfoForm;
      Caption:='Закрыть';
      onclick:=@OKclick;
      end;
    InfoBefore:= TRichEditViewer.Create(InfoForm);
    with InfoBefore do begin
      SetBounds(ScaleX(10),ScaleY(10),ScaleX(580),ScaleY(355));
      Parent:= InfoForm;
      //    ParentColor := True;
      //    Color:= WizardForm.Color;
      //    BorderStyle:= bsNone;
      ScrollBars:= ssVertical;
      ReadOnly:= true;
      RTFText:= ReadmeRu
    end;
      InfoForm.Show;
      WizardForm.Enabled:=false;
    end;
    end;
    
    procedure InitializeWizard3();
    begin
      ExtractTemporaryFile('ReadMeRu.rtf');
      LoadStringFromFile(ExpandConstant('{tmp}')+'\ReadMeRu.rtf', ReadmeRu);
      Info:=tbutton.create(WizardForm);
      with Info do begin
      Parent:=WizardForm;
      SetBounds(ScaleX(115),ScaleY(497),ScaleX(80),ScaleY(23));
      Caption:='F.A.Q';
      OnClick:=@InfoClick;
    end;
    end;
    //--------------- ФАК ---------------\\
    
    
    function MyDirName(S:String): String;
    var
      InsPath: String;
      er: boolean;
      myFile:String;
    begin
      Result:=ExpandConstant('C:\Games\World_of_Tanks\'); //если ключа нет то будем ставить сюда
      er := RegQueryStringValue(HKLM, 'SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812RU}_is1', 'InstallLocation', InsPath);
      if er and (InsPath<>'') then //если ключ существует и там что-то записано
      begin
        Result := InsPath;
      end;
    end;
    
    //==== Проверка  WoT ====\\
    function NextButtonClick(CurPageID: Integer): Boolean;
    begin
    Result := True;
    case CurPageID of
    wpSelectDir:
    if not FileExists(ExpandConstant('{app}\WorldOfTanks.exe')) then
    begin
    MsgBox('Не верно указана папка с игрой World_of_Tanks!', mbError, MB_OK);
    Result := False;
    end;
    end;
    end;
    //==== Проверка  WoT ====\\
    
    //==== Переход на сайт ====\\
    Procedure GoToSite(CurStep: TSetupStep);
    var
     RC: Integer;
    begin
     if CurStep = ssDone then
     begin
      ShellExec('', '{#MyAppURL}', '' , '', SW_SHOW, ewNoWait, RC);
     end;
    end;
    //==== Переход на сайт ====\\
    
    
    procedure LogoOnClick(Sender: TObject);
    var ResCode: Integer;
    begin
      ShellExec('', '{#MyAppURL}', '' , '', SW_SHOW, ewNoWait, ResCode)
    end;
    var
      BitmapImage1: TBitmapImage;
    procedure RedesignWizardForm;
    var
      i: integer;
      BtnPanel: TPanel;
      BtnImage: TBitmapImage;
    begin
      ExtractTemporaryFile('logo_vk.bmp')
      BtnPanel:=TPanel.Create(WizardForm)
    with BtnPanel do begin
      Left:=20
      Top:=494
      Width:=85
      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}')+'\logo_vk.bmp')
      Parent:=BtnPanel
      end;
    { BitmapImage1 }
    BitmapImage1 := TBitmapImage.Create(WizardForm);
    with BitmapImage1 do
    begin
      Parent := WizardForm.SelectDirPage;
      Left := ScaleX(0);
      Top := ScaleY(115);
      Width := ScaleX(620);
      Height := ScaleY(260);
      ExtractTemporaryFile('WizardForm.BitmapImage1.bmp');
      Bitmap.LoadFromFile(ExpandConstant('{tmp}\WizardForm.BitmapImage1.bmp'));
      end;
    end;
    
    
    function WindowResize(): Boolean;
    var
      HeightOffset, WidthOffset: Integer;
    begin
      HeightOffset:=170;
      WidthOffset:=200;
    
      WizardForm.Height:=WizardForm.Height + HeightOffset;
      WizardForm.Width:=WizardForm.Width + WidthOffset;
    
      WizardForm.NextButton.Top:=WizardForm.NextButton.Top + HeightOffset;
      WizardForm.BackButton.Top:=WizardForm.BackButton.Top + HeightOffset;
      WizardForm.CancelButton.Top:=WizardForm.CancelButton.Top + HeightOffset;
      WizardForm.NextButton.Left:=WizardForm.NextButton.Left + WidthOffset;
      WizardForm.BackButton.Left:=WizardForm.BackButton.Left + WidthOffset;
      WizardForm.CancelButton.Left:=WizardForm.CancelButton.Left + WidthOffset;
    
      WizardForm.OuterNotebook.Height:=WizardForm.OuterNotebook.Height + HeightOffset;
      WizardForm.InnerNotebook.Height:=WizardForm.InnerNotebook.Height + HeightOffset;
      WizardForm.OuterNotebook.Width:=WizardForm.OuterNotebook.Width + WidthOffset;
      WizardForm.InnerNotebook.Width:=WizardForm.InnerNotebook.Width + WidthOffset;
      WizardForm.WizardSmallBitmapImage.Left:= WizardForm.WizardSmallBitmapImage.Left + WidthOffset;
      WizardForm.Bevel.Top:=WizardForm.Bevel.Top + HeightOffset;
      WizardForm.BeveledLabel.Top:=WizardForm.BeveledLabel.Top + HeightOffset;
      WizardForm.Bevel.Width:=WizardForm.Bevel.Width + WidthOffset;
      WizardForm.Bevel1.Width:=WizardForm.Bevel1.Width + WidthOffset;
      WizardForm.MainPanel.Width:=WizardForm.MainPanel.Width + WidthOffset;
      WizardForm.BeveledLabel.Width:=WizardForm.BeveledLabel.Width + WidthOffset;
      WizardForm.Center;
    
    { /// --- Раскомментировать при желании ---- ///
      WizardForm.WelcomeLabel1.Hide;
      WizardForm.WelcomeLabel2.Hide;
      WizardForm.FinishedLabel.Hide;
      WizardForm.FinishedHeadingLabel.Hide;
      WizardForm.WizardBitmapImage.Width:=600;
      WizardForm.WizardBitmapImage.Height:=400;
      WizardForm.WizardBitmapImage2.Width:=600;
      WizardForm.WizardBitmapImage2.Height:=400;
      WizardForm.PageNameLabel.Hide;
      WizardForm.PageDescriptionLabel.Hide;
      WizardForm.WizardSmallBitmapImage.Top:=0;
      WizardForm.WizardSmallBitmapImage.Left:=0;
      WizardForm.WizardSmallBitmapImage.Width:=WizardForm.Width;
      WizardForm.WizardSmallBitmapImage.Height:=58;
      /// --- Конец ---- ///
    }
      WizardForm.WelcomeLabel1.Hide;
      WizardForm.WelcomeLabel2.Hide;
      WizardForm.WizardBitmapImage.Width:=697;
      WizardForm.WizardBitmapImage.Height:=483;
    
      WizardForm.FinishedHeadingLabel.Hide;
      WizardForm.FinishedLabel.Hide;
      WizardForm.YesRadio.Hide;
      WizardForm.NoRadio.Hide;
      WizardForm.WizardBitmapImage2.Width:=697;
      WizardForm.WizardBitmapImage2.Height:=483;
    
      WizardForm.PageNameLabel.Hide;
      WizardForm.PageDescriptionLabel.Hide;
      WizardForm.WizardSmallBitmapImage.Top:=0;
      WizardForm.WizardSmallBitmapImage.Left:=0;
      WizardForm.WizardSmallBitmapImage.Width:=697;
      WizardForm.WizardSmallBitmapImage.Height:=58;
    
      WizardForm.WelcomeLabel1.Width:=WizardForm.WelcomeLabel1.Width + WidthOffset;
      WizardForm.WelcomeLabel1.Height:=WizardForm.WelcomeLabel1.Height + HeightOffset;
      WizardForm.WelcomeLabel1.Width:=WizardForm.WelcomeLabel1.Width + WidthOffset;
    
      WizardForm.WelcomeLabel2.Width:=WizardForm.WelcomeLabel2.Width + WidthOffset;
      WizardForm.WelcomeLabel2.Height:=WizardForm.WelcomeLabel2.Height + HeightOffset;
      WizardForm.WelcomeLabel2.Width:=WizardForm.WelcomeLabel2.Width + WidthOffset;
    
    
      WizardForm.LicenseLabel1.Width:=WizardForm.LicenseLabel1.Width + WidthOffset;
      WizardForm.LicenseMemo.Height:=WizardForm.LicenseMemo.Height + HeightOffset;
      WizardForm.LicenseMemo.Width:=WizardForm.LicenseMemo.Width + WidthOffset;
      WizardForm.LicenseNotAcceptedRadio.Top:=WizardForm.LicenseNotAcceptedRadio.Top + HeightOffset;
      WizardForm.LicenseAcceptedRadio.Top:=WizardForm.LicenseAcceptedRadio.Top + HeightOffset;
    
      WizardForm.InfoBeforeClickLabel.Width:=WizardForm.InfoBeforeClickLabel.Width + WidthOffset;
      WizardForm.InfoBeforeMemo.Height:=WizardForm.InfoBeforeMemo.Height + HeightOffset;
      WizardForm.InfoBeforeMemo.Width:=WizardForm.InfoBeforeMemo.Width + WidthOffset;
    
      WizardForm.SelectDirLabel.Width:=WizardForm.SelectDirLabel.Width + WidthOffset;
      WizardForm.SelectDirBrowseLabel.Width:=WizardForm.SelectDirBrowseLabel.Width + WidthOffset;
      WizardForm.DiskSpaceLabel.Top:=WizardForm.DiskSpaceLabel.Top + HeightOffset;
      WizardForm.DirBrowseButton.Left:=WizardForm.DirBrowseButton.Left + HeightOffset;
      WizardForm.DirEdit.Width:=WizardForm.DirEdit.Width + HeightOffset;
    
      WizardForm.ComponentsDiskSpaceLabel.Top:=WizardForm.ComponentsDiskSpaceLabel.Top + HeightOffset;
      WizardForm.SelectComponentsLabel.Width:=WizardForm.SelectComponentsLabel.Width + WidthOffset;
      WizardForm.ComponentsList.Height:=WizardForm.ComponentsList.Height + HeightOffset;
      WizardForm.ComponentsList.Width:=WizardForm.ComponentsList.Width + WidthOffset;
    
      WizardForm.ReadyLabel.Width:=WizardForm.ReadyLabel.Width + WidthOffset;
      WizardForm.ReadyMemo.Height:=WizardForm.ReadyMemo.Height + HeightOffset;
      WizardForm.ReadyMemo.Width:=WizardForm.ReadyMemo.Width + WidthOffset;
    
      WizardForm.ProgressGauge.Width:=WizardForm.ProgressGauge.Width + HeightOffset;
      WizardForm.FilenameLabel.Width:=WizardForm.FilenameLabel.Width + HeightOffset;
      WizardForm.StatusLabel.Width:=WizardForm.StatusLabel.Width + HeightOffset;
    end;
    
    /// --- /// --- /// --- /// --- /// --- /// --- /// --- /// --- /// --- /// --- /// --- ///
    
    type
      TComponentDesc = record
        Description: String;
        ImageName: String;
        Index: Integer;
      end;
    
    var
      CompDescs: array of TComponentDesc;
      CompDescPanel, CompDescImgPanel: TPanel;
      CompDescText: array[1..2] of TLabel;
      CompIndex, LastIndex: Integer;
      CompDescImg: TBitmapImage;
    
    procedure ShowCompDescription(Sender: TObject; X, Y, Index: Integer; Area: TItemArea);
    var
      i: Integer;
    begin
      if Index = LastIndex then Exit;
      CompIndex := -1;
      for i := 0 to GetArrayLength(CompDescs) -1 do
      begin
        if (CompDescs[i].Index = Index) then
        begin
          CompIndex := i;
          Break;
        end;
      end;
      if (CompIndex >= 0) and (Area = iaItem) then
      begin
        if not FileExists(ExpandConstant('{tmp}\') + CompDescs[CompIndex].ImageName) then
          ExtractTemporaryFile(CompDescs[CompIndex].ImageName);
        CompDescImg.Bitmap.LoadFromFile(ExpandConstant('{tmp}\') + CompDescs[CompIndex].ImageName);
        CompDescImg.Show;
    
        CompDescText[2].Caption := CompDescs[CompIndex].Description;
        CompDescText[2].Enabled := True;
      end else
      begin
        CompDescText[2].Caption := CustomMessage('ComponentsInfo');
        CompDescText[2].Enabled := False;
        CompDescImg.Hide;
      end;
      LastIndex := Index;
    end;
    
    procedure CompListMouseLeave(Sender: TObject);
    begin
      CompDescImg.Hide;
      CompDescText[2].Caption := CustomMessage('ComponentsInfo');
      CompDescText[2].Enabled := False;
      LastIndex := -1;
    end;
    
    procedure AddCompDescription(AIndex: Integer; ADescription: String; AImageName: String);
    var
      i: Integer;
    begin
      i := GetArrayLength(CompDescs);
      SetArrayLength(CompDescs, i + 1);
      CompDescs[i].Description := ADescription;
      CompDescs[i].ImageName := AImageName;
      CompDescs[i].Index := AIndex - 1
    end;
    
    procedure InitializeWizard();
    begin
      InitializeWizard1(); {из BackUpPage.iss}
      //InitializeWizard2(); {из Music.iss}
      InitializeWizard3();
      RedesignWizardForm;
      WindowResize();
    
    begin
      WizardForm.SelectComponentsLabel.Hide;
      WizardForm.TypesCombo.Hide;
      WizardForm.ComponentsList.SetBounds(ScaleX(260), ScaleY(20), ScaleX(357), ScaleY(333));
      WizardForm.ComponentsList.OnItemMouseMove:= @ShowCompDescription;
      WizardForm.ComponentsList.OnMouseLeave := @CompListMouseLeave;
    
      CompDescImgPanel := TPanel.Create(WizardForm);
      with CompDescImgPanel do
      begin
        Parent := WizardForm.SelectComponentsPage;
        SetBounds(ScaleX(0), ScaleY(20), ScaleX(253), ScaleY(203));  //рамка картинки
        BevelInner := bvLowered;
      end;
    
      CompDescText[1] := TLabel.Create(WizardForm);
      with CompDescText[1] do
      begin
        Parent := CompDescImgPanel;
        SetBounds(ScaleX(5), ScaleY(5), CompDescImgPanel.Width - ScaleX(10), CompDescImgPanel.Height - ScaleY(10));
        AutoSize := False;
        WordWrap := True;
        Enabled := False;
        Caption := CustomMessage('ComponentsImgInfo');
      end;
    
      CompDescImg := TBitmapImage.Create(WizardForm);
      with CompDescImg do
      begin
        Parent := CompDescImgPanel;
        SetBounds(ScaleX(5), ScaleY(5), CompDescImgPanel.Width - ScaleX(10), CompDescImgPanel.Height - ScaleY(10));
        Stretch := True;
        Hide;
      end;
    
      CompDescPanel := TPanel.Create(WizardForm);
      with CompDescPanel do
      begin
        Parent := WizardForm.SelectComponentsPage;
        SetBounds(ScaleX(0), ScaleY(230), ScaleX(253), ScaleY(123));  //Нижния рамка
        BevelInner := bvLowered;
      end;
    
      CompDescText[2] := TLabel.Create(WizardForm);
      with CompDescText[2] do
      begin
        Parent := CompDescPanel;
        SetBounds(ScaleX(5), ScaleY(5), CompDescPanel.Width - ScaleX(10), CompDescPanel.Height - ScaleY(10));
        AutoSize := False;
        WordWrap := True;
        Enabled := False;
        Caption := CustomMessage('ComponentsInfo');
      end;
    

     

    может кто поможет ... 

     

    или возможно проще создать вторую страницу компонентов 

    post-18777-0-52366400-1498989010_thumb.png

  2. я тоже не гуру но можно сделать просто вот так)))

     

    [Setup]
    AppName="ххх"
    AppVersion=1.0
    DefaultDirName=C:\Games\World_of_Tanks\
    AppendDefaultDirName=no
    
    [Tasks]
    Name: "K"; Description: "WoT Tweaker Plus - для повышения FPS";  Flags: unchecked;
    Name: "K\2"; Description: "Увеличение максимальной дальности видимости"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "K\3"; Description: "Удаление тумана на всех картах"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "K\4"; Description: "Отключить эффекты погоды и дым на картах"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "K\5"; Description: "Отключить эффект взрыва снарядов и попадания в объекты"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "K\6"; Description: "Отключить облака"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "K\7"; Description: "Отключить дым от уничтоженных танков"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "K\8"; Description: "Отключить эффекты попадания по танкам"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "K\9"; Description: "Отключить тень под танками"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "K\10"; Description: "Отключить дым и пламя от выстрелов"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "K\11"; Description: "Отключить дым из выхлопных труб танков"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "K\12"; Description: "Отключить эффект движения деревьев"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    
    [Files]
    
    /////////////////////////////////////////////////////////////////////  WoT Tweaker Plus   ///////////////////////////
    
    Source: "F:\А ДЛЯ СБОРКИ\МОДЫ\МОДЫ\0 1 WoT Tweaker Plus\2 Увеличение максимальной дальности видимости\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: K\2; BeforeInstall:
    Source: "F:\А ДЛЯ СБОРКИ\МОДЫ\МОДЫ\0 1 WoT Tweaker Plus\3 Удаление тумана на всех картах\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: K\3; BeforeInstall:
    Source: "F:\А ДЛЯ СБОРКИ\МОДЫ\МОДЫ\0 1 WoT Tweaker Plus\4 Отключить эффекты проявления погоды и дым от объектов на картах\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: K\4; BeforeInstall:
    Source: "F:\А ДЛЯ СБОРКИ\МОДЫ\МОДЫ\0 1 WoT Tweaker Plus\5 Отключить эффект взрыва снарядов и попадания в объекты\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: K\5; BeforeInstall:
    Source: "F:\А ДЛЯ СБОРКИ\МОДЫ\МОДЫ\0 1 WoT Tweaker Plus\6 Отключить облака\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: K\6; BeforeInstall:
    Source: "F:\А ДЛЯ СБОРКИ\МОДЫ\МОДЫ\0 1 WoT Tweaker Plus\7 Отключить дым от уничтоженных танков\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: K\7; BeforeInstall:
    Source: "F:\А ДЛЯ СБОРКИ\МОДЫ\МОДЫ\0 1 WoT Tweaker Plus\8 Отключить эффекты попадания по танкам\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: K\8; BeforeInstall:
    Source: "F:\А ДЛЯ СБОРКИ\МОДЫ\МОДЫ\0 1 WoT Tweaker Plus\9 Отключить тень под танками\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: K\9; BeforeInstall:
    Source: "F:\А ДЛЯ СБОРКИ\МОДЫ\МОДЫ\0 1 WoT Tweaker Plus\10 Отключить дым и пламя от выстрелов\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: K\10; BeforeInstall:
    Source: "F:\А ДЛЯ СБОРКИ\МОДЫ\МОДЫ\0 1 WoT Tweaker Plus\11 Отключить дым из выхлопных труб танков\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: K\11; BeforeInstall:
    Source: "F:\А ДЛЯ СБОРКИ\МОДЫ\МОДЫ\0 1 WoT Tweaker Plus\12 Отключить эффект движения деревьев\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: K\12; BeforeInstall:
     

     

    и после модов у тебя будет отдельная страница для твикера)))

     

     

    СПАСИБО БОЛЬШОЕ )))  только можно как нибудь изменить размер содержимого окна. т.е. у меня получилось не на все окно ... 

    post-18777-0-93255900-1498945855_thumb.png

  3. ВСЕМ Привет!!!

    увы я не гуру в Inno Setup

    помогите сделать встроенный wot_tweaker в установщике, то есть мне нужно что бы после страницы модов шла страница "Повысить FPS" с чебоксами отключения различных эффектов

     

     

  4. Доброго времени суток !

     

     Не секрет что некоторые "игроки" используют запрещенные прицелы. И эти "игроки" ну очень точные и в большинства случаях у них низкий КПД и высокий % точности.

     Возникла идея сделать что бы в маркерах над танком, при 75-80% точности на танке (или общий) показывало рисунок (снайпер, что изображено не особо важно),  по которому сразу было бы понятно что игрок супер точный и опасен. 

     

     

  5. MS_RAMIS, вы не поняли.

    Зеркалирование не при чем. Есть необходимость загрузить из второго атласа свои иконки (они уже повернуты в нужную сторону и надписи на них соответственно размещены). Но XVM почему-то не загружает второй атлас, хотя путь к нему в iconset.xc прописан. Загружается только первый атлас (для союзников), соперникам грузится он же.

    До 0.9.17.0 все работало.

     

    я все понял .. просто в этом патче в XVM  не работает страница загрузки (((

  6. Не получается изменить иконки на начальном экране. Подскажите в чём беда.

    attachicon.gificonset.xc

     

    Атласы находятся по адресу:  C:\Games\World_of_Tanks\res_mods\mods\icons\atlases

     

    attachicon.gifshot_013.jpg  attachicon.gifс TAB.jpg  attachicon.gifshot_017.jpg

     

    можно вылечить этим файлом +

     

    VehicleIcons.zip

     

    конечно зеркалить не будет , но и такой шляпы не будет ))))

    просто в этом патче в xvm  не работает страница загрузки ...

  7. поменял бы ... но я уже писал что не разбираюсь в этом , не мастер в этом как некоторые ... и поэтому нужна помощь!!!

     

    я пробовал на примерах что нашел ,

     

    код1

    [Files]
    Source: "MODS\WOT_TWEAKER\Отключения тумана\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: CheckBoxChecked(1);
    Source: "MODS\WOT_TWEAKER\Отключить облака\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: CheckBoxChecked(2);
    Source: "MODS\WOT_TWEAKER\Отключить тень под танками\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: CheckBoxChecked(3);
    Source: "MODS\WOT_TWEAKER\Отключить эффект движения деревьев\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: CheckBoxChecked(4); 
    Source: "MODS\WOT_TWEAKER\Отключить эффекты разрушения объектов\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: CheckBoxChecked(5); 
    Source: "MODS\WOT_TWEAKER\Отключить эффект взрыва снарядов и попадания в объекты\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: CheckBoxChecked(6);
    Source: "MODS\WOT_TWEAKER\Отключить эффекты уничтожения танков\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: CheckBoxChecked(7);
    Source: "MODS\WOT_TWEAKER\Отключить эффекты попадания по танкам\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: CheckBoxChecked(8);
    Source: "MODS\WOT_TWEAKER\Отключить эффекты проявления погоды и дым от объектов на картах\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: CheckBoxChecked(9);
    Source: "MODS\WOT_TWEAKER\Отключить дым и пламя от выстрелов\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: CheckBoxChecked(10);
    Source: "MODS\WOT_TWEAKER\Отключить дым от уничтоженных танков\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: CheckBoxChecked(11);
    Source: "MODS\WOT_TWEAKER\Отключить дым из выхлопных труб танков\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: CheckBoxChecked(12);
    
    [code]
    var
      Tweaker: TNewCheckListBox;
    Procedure InitializeWizard1();
    begin
      Tweaker:=TNewCheckListBox.Create(WizardForm);
      Tweaker.Parent:=WizardForm.SelectTasksPage;
      Tweaker.Left:=ScaleX(32);
      Tweaker.Top:=ScaleY(21);
      Tweaker.Width:=ScaleX(729);
      Tweaker.Height:=ScaleY(248);
      Tweaker.Cursor:=crHand;
      Tweaker.BorderStyle:=bsSingle;
      Tweaker.Color:=clWindow;
      Tweaker.DragCursor:=crHand;
      Tweaker.DragMode:=dmAutomatic;
      Tweaker.Flat:=True;
      Tweaker.Font.Color:=clBlue;
      Tweaker.Font.Height:=-12;
      Tweaker.Font.Name:='@Arial Unicode MS';
      Tweaker.ParentFont:=False;
      Tweaker.ShowLines:=True;
      Tweaker.TreeViewStyle:=True;
      Tweaker.ItemHeightFixed:=True;
    //**************************************************************************//
      Tweaker.AddCheckBox('<<WoT Tweaker Plus>>', '', 0, True, True, True, False, nil);                      //0
      Tweaker.AddCheckBox('Отключить туман', '0.1 Мб', 1, True, True, False, True, nil);          //1
      Tweaker.AddCheckBox('Отключить отображение облаков', '0.1 Мб', 1, True, True, False, True, nil);      //2
      Tweaker.AddCheckBox('Отключить тень под танками', '0.1 Мб', 1, True, True, False, True, nil);   //3
      Tweaker.AddCheckBox('Отключить эффект движения деревьев', '0.1 Мб', 1, True, True, False, True, nil);   //4
      Tweaker.AddCheckBox('Отключить эффекты разрушения объектов', '0.1 Мб', 1, True, True, False, True, nil);      //5
      Tweaker.AddCheckBox('Отключить эффект взрыва снарядов и попадания в объекты', '0.1 Мб', 1, True, True, False, True, nil);       //6
      Tweaker.AddCheckBox('Отключить эффекты уничтожения танков', '0.1 Мб', 1, True, True, False, True, nil);       //7
      Tweaker.AddCheckBox('Отключить эффекты попадания по танкам', '0.1 Мб', 1, True, True, False, True, nil);     //8
      Tweaker.AddCheckBox('Отключить эффекты проявления погоды и дым от объектов на картах', '0.1 Мб', 1, True, True, False, True, nil);   //9
      Tweaker.AddCheckBox('Отключить дым и пламя от выстрелов', '0.1 Мб', 1, True, True, False, True, nil);       //10 
      Tweaker.AddCheckBox('Отключить дым от уничтоженных танков', '0.1 Мб', 1, True, True, False, True, nil);       //11
      Tweaker.AddCheckBox('Отключить дым из выхлопных труб танков', '0.1 Мб', 1, True, True, False, True, nil);       //12
    end;
    //**************************************************************************//
    Function CheckBoxChecked(Idx: Integer): Boolean;
    begin
    case Idx of
    0:
      Result := Tweaker.Checked[0];
    1:
      Result := Tweaker.Checked[1];
    2:
      Result := Tweaker.Checked[2];
    3:
      Result := Tweaker.Checked[3];
    4:
      Result := Tweaker.Checked[4];
    5:
      Result := Tweaker.Checked[5];
    6:
      Result := Tweaker.Checked[6];
    7:
      Result := Tweaker.Checked[7];
    8:
      Result := Tweaker.Checked[8];
    9:
      Result := Tweaker.Checked[9];
    10:
      Result := Tweaker.Checked[10];
    11:
      Result := Tweaker.Checked[11];
    12:
      Result := Tweaker.Checked[12];
    end;
    end;
    

     



     

    код2



     
    [Tasks]
    Name: "Tweaker"; Description: "<<WoT Tweaker Plus>>";
    Name: "Tweaker\1"; Description: "Отключить туман"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\2"; Description: "Отключить отображение облаков"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\3"; Description: "Отключить тень под танками"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\4"; Description: "Отключить эффект движения деревьев"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\5"; Description: "Отключить эффекты разрушения объектов"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\6"; Description: "Отключить эффект взрыва снарядов и попадания в объекты"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\7"; Description: "Отключить эффекты уничтожения танков"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\8"; Description: "Отключить эффекты попадания по танкам"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\9"; Description: "Отключить эффекты проявления погоды и дым от объектов на картах"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\10"; Description: "Отключить дым и пламя от выстрелов"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\11"; Description: "Отключить дым от уничтоженных танков"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\12"; Description: "Отключить дым из выхлопных труб танков"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    
    [Files]
    Source: "MODS\WOT_TWEAKER\Отключения тумана\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\1;
    Source: "MODS\WOT_TWEAKER\Отключить облака\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\2;
    Source: "MODS\WOT_TWEAKER\Отключить тень под танками\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\3;
    Source: "MODS\WOT_TWEAKER\Отключить эффект движения деревьев\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\4; 
    Source: "MODS\WOT_TWEAKER\Отключить эффекты разрушения объектов\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\5; 
    Source: "MODS\WOT_TWEAKER\Отключить эффект взрыва снарядов и попадания в объекты\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\6;
    Source: "MODS\WOT_TWEAKER\Отключить эффекты уничтожения танков\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\7;
    Source: "MODS\WOT_TWEAKER\Отключить эффекты попадания по танкам\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\8;
    Source: "MODS\WOT_TWEAKER\Отключить эффекты проявления погоды и дым от объектов на картах\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\9;
    Source: "MODS\WOT_TWEAKER\Отключить дым и пламя от выстрелов\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\10;
    Source: "MODS\WOT_TWEAKER\Отключить дым от уничтоженных танков\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\11;
    Source: "MODS\WOT_TWEAKER\Отключить дым из выхлопных труб танков\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\12;
    

     

    были и другие варианты , но увы то получается  ...

     

  8. ....

    Не клянчи, а учи тут помогают только тому кто хоть что-то учит и понимает, а за тебя никто ничего делать не будет.... есть раздел форума платных услуг там и спрашивай после оплаты...

    И сделают все за тебя.....

     

     

    когда просил помощи , я имел ввиду что мне нужна помощь !!! а не то что клянчил, и что бы за меня все сделали....

     

    Я уже сам пробовал сделать, но увы у меня не получилось ... 

     

    мой код

    [Files]
    Source: "MODS\WOT_TWEAKER\Отключения тумана\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\1;
    Source: "MODS\WOT_TWEAKER\Отключить облака\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\2;
    Source: "MODS\WOT_TWEAKER\Отключить тень под танками\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\3;
    Source: "MODS\WOT_TWEAKER\Отключить эффект движения деревьев\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\4;
    Source: "MODS\WOT_TWEAKER\Отключить эффекты разрушения объектов\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\5;
    Source: "MODS\WOT_TWEAKER\Отключить эффект взрыва снарядов и попадания в объекты\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\6;
    Source: "MODS\WOT_TWEAKER\Отключить эффекты уничтожения танков\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\7;
    Source: "MODS\WOT_TWEAKER\Отключить эффекты попадания по танкам\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\8;
    Source: "MODS\WOT_TWEAKER\Отключить эффекты проявления погоды и дым от объектов на картах\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\9;
    Source: "MODS\WOT_TWEAKER\Отключить дым и пламя от выстрелов\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\10;
    Source: "MODS\WOT_TWEAKER\Отключить дым от уничтоженных танков\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\11;
    Source: "MODS\WOT_TWEAKER\Отключить дым из выхлопных труб танков\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\12;
    
    
    
    [Tasks]
    Name: "Tweaker"; Description: "<<WoT Tweaker>>";
    Name: "Tweaker\1"; Description: "Отключить туман"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\2"; Description: "Отключить отображение облаков"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\3"; Description: "Отключить тень под танками"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\4"; Description: "Отключить эффект движения деревьев"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\5"; Description: "Отключить эффекты разрушения объектов"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\6"; Description: "Отключить эффект взрыва снарядов и попадания в объекты"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\7"; Description: "Отключить эффекты уничтожения танков"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\8"; Description: "Отключить эффекты попадания по танкам"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\9"; Description: "Отключить эффекты проявления погоды и дым от объектов на картах"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\10"; Description: "Отключить дым и пламя от выстрелов"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\11"; Description: "Отключить дым от уничтоженных танков"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    Name: "Tweaker\12"; Description: "Отключить дым из выхлопных труб танков"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
    
    

     

    нужно убрать ползунок (полосу прокрутки) или увеличить "окно" где пишутся чекбоксы.... (если не понятно написал сори)

    на скрине видно надеюсь

     

    post-18777-0-86984400-1481625653_thumb.png

  9.  

    извините, но я плохо разбираюсь в этом . .. но путь файла куда 

     

     

     

     

    может кто может помочь ! хочу создать отдельную страничку которая будет после выбора модов с выбором чебоксов отключения различных эффектов для повышения FPS (т.е. страницу WoT Tweaker)
  10. Всем Привет  

    искал в теме не нашел увы ...

     

    может кто может помочь !

    хочу создать отдельную страничку которая будет после выбора модов с выбором чебоксов отключения различных эффектов для повышения FPS (т.е. страницу WoT Tweaker)

  11. писать бла бла бла лень

     

    'скриншоты'

    'info'

    40ExDcI4sjs.jpg

    6PPnBqmLXAw.jpg

     

    'beta'

    ABPgvS-dywA.jpg

    tsLlji8GKsM.jpg

     

    'update'

    DZnOJkqTAdY.jpg

    tbQ3PZlPi9c.jpg

     

    'actual'

    2NJ_V1YuUYw.jpg

     

     

    'мелкое описание'

    Cостав мода:

    mod_updater.pyc - непосредственно сам мод.

    mod_updater.json - локальный файл настроек, его им¤ зависит от имени мода

     

    Содержит текущую установленную версию модпака и ссылку на серверный конфиг

     

    server.json - файл настроек, который должен находится на вашем сервере

     

    Содержит новую версию модпака, ссылку для скачивания новой версии, заголовок окон и содержание сообщений

     

    // макросы: {localVer} - текуща¤ верси¤ модпака

    // макросы: {servVer} - нова¤ верси¤ модпака

    // макросы: {author} - автор модпака

    // макросы: {wotVer} - верси¤ игры

     

    "icon": "", // иконка

    "bgIcon": "", // фоновое изображение

    "lifeTime": 6, // время показа сообщения (в секундах)

    "hidingAnimationSpeed": 4, // время затухания сообщения (в секундах)

    "typeUrl": "http://goo.gl/yA2LUZ",// ссылка

     

    // openPopUp - открыть диалоговое окно

    // openClose - больше не показывать сообщение

    // openUrlUp - открыть ссылку typeUrl

     

     

    v1 содержит: новую версию модпака, бета версию модпака, актуальную версию модпака и окно для информации

    v2 содержит: новую версию модпака

     

    скачать

     

    появилась   проблема  ((( 

    - не принимаются приглашения во взводы, КБ, трени и т.д.

    - результаты боя не доступны

     

    Т.е при нажатии на "принять" (приглос) или "подробнее" (результат боя) просто ничего не происходит....

  12. ВСЕМ Привет!

    а можно сделать чтобы Лог Урона (damageLog) переносился в право при включении "детального и суммарного урона" от WG?

    если нет пока такой возможности может в будущем разработчики сделают, буду рад ...

     

    и еще можно как можно сделать отображение заблокированного и засвеченного урона как DamageLog от GambitER  ???

  13. update 9.16 клик

     

     после обновления игры сообщения появляются в центре уведомлений в закладке "Личные уведомления" увы это мало заметно((( можно как нибудь сделать чтобы они появлялись в закладке "Информационные уведомления" ?

  14. можно

    [Setup]
    AppName=My Application
    AppVersion=1.5
    DefaultDirName={pf}\My Application
    
    [code]
    { RedesignWizardFormBegin } // Не удалять эту строку!
    // Не изменять эту секцию. Она создана автоматически.
    var
      NewCheckBox1: TNewCheckBox;
    
    procedure NewCheckBox1Click(Sender: TObject); forward;
    
    procedure RedesignWizardForm;
    begin
      { NewCheckBox1 }
      NewCheckBox1 := TNewCheckBox.Create(WizardForm);
      with NewCheckBox1 do
      begin
        Parent := WizardForm.InstallingPage;
        Left := ScaleX(32);
        Top := ScaleY(88);
        Width := ScaleX(97);
        Height := ScaleY(17);
        Caption := 'NewCheckBox1';
        OnClick := @NewCheckBox1Click;
      end;
    
      NewCheckBox1.TabOrder := 3;
    
    { ReservationBegin }
      // Вы можете добавить ваш код здесь.
    
    { ReservationEnd }
    end;
    // Не изменять эту секцию. Она создана автоматически.
    { RedesignWizardFormEnd } // Не удалять эту строку!
    
    procedure NewCheckBox1Click(Sender: TObject);
    var
      ErrorCode: Integer;
    begin
    ShellExec('open', 'http://aces.gg/', '', '', SW_SHOW, ewNoWait, ErrorCode);
    end;
    
    procedure InitializeWizard();
    begin
      RedesignWizardForm;
    end;
    

     

     

    блин я так и не понял что и как сделать (((  как результат у меня просто происходит ошибка.

     

    - может кто подскажет как сделать этот код

    [Tasks]
    Name: "gotositexvm"; Description: "Перейти на сайт XVM`а"; GroupDescription: "Дополнительные задачи"
    Name: "gotositeauthor"; Description: "Перейти на сайт автора модпака"; GroupDescription: "Дополнительные задачи"
    [Run]
    Filename: "http://www.modxvm.com/"; Flags: shellexec; Tasks: gotositexvm
    Filename: "http://..."; Flags: shellexec; Tasks: gotositeautor

    в отдельном, всплывающем окне. как на скрине в посте http://www.koreanrandom.com/forum/topic/9050-инсталлятор-для-модпаков/?p=351950

    просто меня выходит, что в центре портиться фон.

    post-18777-0-25152300-1473334567_thumb.jpg

  15.  

    если подумать, то, думаю, можно это сделать, но самый лучший пример:

     

     

    а можно его на страницу "распаковки файлов" поставить?

    если нет то буду надеяться, что кто нибудь с выводов на отдельное окно в концу установки поможет

    • Upvote 1
  16.  

    Тогда попробуйте этот вариант:

    Код

    [Tasks]
    Name: "gotositexvm"; Description: "Перейти на сайт XVM`а"; GroupDescription: "Дополнительные задачи"
    Name: "gotositeauthor"; Description: "Перейти на сайт автора модпака"; GroupDescription: "Дополнительные задачи"
    
    [Run]
    Filename: "http://www.modxvm.com/"; Flags: shellexec; Tasks: gotositexvm
    Filename: "http://..."; Flags: shellexec; Tasks: gotositeautor

     

    ошибку выдает ;(  скрин прикрепил .....

     

    UPD: все нашел ошибку ! ... спасибо

     

    gad_575__2 , Большое Спасибо тебе! 

     

    сори, я наверное не правильно объяснил !

    можно сделать чтобы это сообщение выходило в ОТДЕЛЬНОМ маленьком окне или в голове возник 2 вариант - странице распаковки файлов / модов

     

    скрины примеров выложил 

    post-18777-0-15059500-1473175425_thumb.png

    post-18777-0-08906000-1473175426_thumb.png

  17.  

    Попробуйте этот вариант:

    Код

    [Run]
    Filename: "http://www.modxvm.com/"; Description: "Перейти на сайт XVM`а"; Flags: postinstall shellexec
    Filename: "http://..."; Description: "Перейти на сайт автора модпака"; Flags: postinstall shellexec 

     

    спасибо работает! только увы фон портит ...

     

    а можно сделать так чтобы это сообщение выходило в отдельном окне? 

×
×
  • Create New...