Jump to content
Korean Random

liked

User
  • Posts

    170
  • Joined

  • Last visited

Posts posted by liked

  1. Написал же выше.

    Если уже давать код добавления страницы, то лучше разбирать этот пример: http://www.koreanrandom.com/forum/topic/9050-/page-7?do=findComment&comment=157502

    В предложенном выше не так всё просто - там страница для вывода текстовой информации создаётся.

     

    З.Ы. Ещё раз повторюсь - пример корректно работает только на ANSI-версии. Под Unicode поковыряться нет времени, да и не факт что получится переделать.

    понятно спасибо

  2. Необходимо внести изменения в Messages.iss:

     

    Если ваш язык :

    [Languages]
    Name: rus; MessagesFile: compiler:Languages\Russian.isl

    Надо добавить:

    [Messages]
    ; *** "Select Components" wizard page
    SelectComponentsLabel2=Напишите, что вы хотите.

    Вот как выглядит измененный скрипт:

    [Languages]
    Name: rus; MessagesFile: compiler:Languages\Russian.isl
    
    [Messages]
    ButtonBack=Назад
    ButtonNext=Далее
    ButtonCancel=Выход
    ButtonInstall=Установить
    ButtonFinish=Завершить
    ButtonWizardBrowse=Обзор...
    ; *** "Select Components" wizard page
    SelectComponentsLabel2=Напишите, что вы хотите.
    
    [CustomMessages]
    rus.Main=Установка - «{#MyAppName}»
    rus.Welcome1=
    rus.Welcome2=Программа установит «{#MyAppName}» на Ваш компьютер.%n%nРекомендуется закрыть антивирусные пакеты и все прочие приложения%nперед тем, как продолжить.%n%nНажмите «Далее», что бы продолжить установку,%nили «Выход», чтобы выйти из программы установки.
    rus.Finished1=
    rus.Finished2=Игра «{#MyAppName}» была успешно установлена на Ваш компьютер.%n%nДля ее запуска выберите соответствующий ярлык в меню «Пуск»%nили на Рабочем столе.%n%nНажмите «Завершить», чтобы выйти из программы установки.
    rus.ErrorFinished1=
    rus.ErrorFinished2=Установка игры «{#MyAppName}» не завершена !%n%nУстановка не была завершена.%n%nПожалуйста, устраните проблему и запустите установку снова.
    rus.SelectDir1=Если вы хотите выбрать другую папку, нажмите кнопку «Обзор».
    rus.SelectDir2=Программа создаст ярлыки в следующей папке меню «Пуск».
    rus.SelectGroup1=Выберит папку в меню «Пуск».%nНажмите кнопку «Обзор» для выбора.
    rus.SelectGroup2=
    rus.IconsCheck=Создать ярлык в меню «Пуск» ?
    rus.DesktopTasks=Создать значок на рабочем столе ?
    rus.DPO=Дополнительное программное обеспечение:
    rus.DirectX= Установить DirectX
    rus.VCRedist= Установить Visual++
    rus.SelectTasks=
    rus.ExtractedFile=Извлекается файл:
    rus.ExtractedDire=Директория:
    rus.Extracted=Распаковка архивов...
    rus.CancelButton=Отменить распаковку
    rus.Error=Ошибка распаковки!
    rus.Completion=Завершение установки...
    rus.StatusRollback=Пожалуйста ждите!%n%nИдет откат изменений...
    rus.ElapsedTime=Прошло:
    rus.RemainingTime=Осталось времени:
    rus.EstimatedTime=Всего:
    rus.AllElapsedTime=Время установки:
    rus.Doppo1=Пожалуйста ждите!%n%n%n%n%n%n%n%nОбновление дополнительного ПО...%n%nУстановка DirectX...
    rus.Doppo2=Пожалуйста ждите!%n%n%n%n%n%n%n%nОбновление дополнительного ПО...%n%nУстановка VCRedist...
    //rus.UninstalledAll=Ну и нахрена удалил?

    Если вам нужно изменить другие стандартные тексты, вы можете получить их от ... Inno Setup 5\Languages\Russian.ISL

    Откройте его с Notepapad++

    Хочу не изменить данные строки а удалить!

  3. Вот ешё вопросик, вот наводишь мод появляется картинка, убираеш курсор картинка пропадает, а можно как то  сделать чтоб какая  то 1 начальная картинка была, на пример картинка с банером мод-пака, а вот если наводишь на мод уже картинка мода была, убираеш курсор опять банер мода


    Как убрать вот эти строки, на скрине выделено красным 

     

    post-6639-0-51408100-1398814771_thumb.png

  4. да так работает та всё, но хотелось бы дизайна, и информативности при выборе и установки модов, моя сборка вот - http://forum.worldoftanks.ru/index.php?/topic/1111250-

    XVM сборка моя, да и остальные моды переделанные потому что часто баги и лаги (конфликты) с другими модами, а вот инталятор не получается, мне проше сайт сделать чем эти инсталяторы :) по этому сижу учусь (мучаюсь) в 1 очередь добавить картинки вот скрипт скинули работает, только не пойму как визуально отредактировать раположение картинки

  5. случаем не это ищите?  :heh:

    [Setup]
    AppName=My Program
    AppVerName=My Program v.1.2
    DefaultDirName={pf}\My Program
    Compression=none
    
    [Components]
    Name: ZK1; Description: Звуковой мод звонок при крите модуля1.; Flags: disablenouninstallwarning exclusive
    Name: ZK2; Description: Звуковой мод звонок при крите модуля2.; Flags: disablenouninstallwarning exclusive
    
    [Files]
    //------- ваши картинки ------------
    Source: image\1.bmp; Flags: dontcopy nocompression
    Source: image\2.bmp; Flags: dontcopy nocompression
    
    [code]
    const
        UNDEF_INDEX = -777;
    
    
    function GetCursorPos(var lpPoint: TPoint): BOOL; external '[email protected] stdcall';
    
    
    var
        InfoPic: TBitmapImage;
        LastIndex: Integer;
        TempPath: String;
    
    
    procedure ShowPicHint(const PicFilePath: String);
    var
        pt: TPoint;
    begin
        if not GetCursorPos(pt) then Exit;
        InfoPic.Bitmap.LoadFromFile(PicFilePath);
        InfoPic.SetBounds(ScaleX(245), ScaleY(42), ScaleX(166), ScaleY(165));
        InfoPic.Show;
    end;
    
    
    procedure CompOnItemMouseMove(Sender: TObject; X, Y: Integer; Index: Integer; Area: TItemArea);
    var
        UndefPic: String;
    begin
        if Index = -1 then Exit;
        if Index = LastIndex then Exit;
        try
            case TNewCheckListBox(Sender).ItemCaption[Index] of
                'Звуковой мод звонок при крите модуля1.': UndefPic := '1.bmp';   // пишем точно так же, как прописано в компонентах
                'Звуковой мод звонок при крите модуля2.': UndefPic := '2.bmp';
            else
                begin
                    LastIndex := UNDEF_INDEX;
                    InfoPic.Hide;
                    Exit;
                end;
            end;
            if not FileExists(TempPath + UndefPic) then ExtractTemporaryFile(UndefPic);
            ShowPicHint(TempPath + UndefPic);
        finally
            LastIndex := Index;
        end;
    end;
    
    
    procedure CompOnMouseLeave(Sender: TObject);
    begin
        InfoPic.Hide;
        LastIndex := -1;
    end;
    
    
    procedure InitInfo();
    begin
        WizardForm.TypesCombo.Hide;
        WizardForm.ComponentsList.SetBounds(ScaleX(0), ScaleY(37), ScaleX(225), ScaleY(176));
        WizardForm.ComponentsList.OnItemMouseMove := @CompOnItemMouseMove;
        WizardForm.ComponentsList.OnMouseLeave := @CompOnMouseLeave;
        TempPath := AddBackslash(ExpandConstant('{tmp}'));
        LastIndex := UNDEF_INDEX;
    
        with TBevel.Create(WizardForm) do
        begin
          Parent := WizardForm.SelectComponentsPage;
          SetBounds(ScaleX(240), ScaleY(37), ScaleX(177), ScaleY(176));
          Shape := bsFrame;
        end;
    
        InfoPic := TBitmapImage.Create(WizardForm)
        with InfoPic do
        begin
            Parent := WizardForm.SelectComponentsPage;
            AutoSize := True;
        end;
    end;
    
    
    procedure InitializeWizard();
    begin
        InitInfo();
    end; 

    Вот вот) именно такое а ешё примеры есть? а за этот огромное спасибо

    Кто бы объяснил как менять дизайн кнопок и всего исталятора, не могу разобраться 

     

    и подскажи как визуально редактировать положение окна картинки? или нужен какой то плагин или что? зарание спасибо 

    InnoUltra визуальная редактирование очень хромает не даёт размеры изменять окон, не отображает прям всё как в инсталяторе, то есть показывает одно копилируеш расположения другие 

  6. liked, автор темы тут сам практически ничего не написал. Ну а я в свою очередь "путные вещи" (хотя опять же не понимаю что для вас это) просто не выкладываю. Шибко жирно будет.

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

    Так что без обид если обидел

     

    Отлично будет нарыть тот код который я выкинул скрин с верху, в нете нахожу хорошие работы но они 2010-2011г и в фаил обменниках файлов тех уже нет

  7. @aCHIVKA, @liked, вы уже тупо как дети начинаете клянчить.. Вам не кажется, что если автора этих скриптов не делают OpenSource - значит они не горят желанием раздавать свою работу кому-попало..

     Ведь вы даже не можете просто погуглить (открою вам секрет, в инете столько всего можно найти..).

    Рыл не нашол, именно того что хотел, есть хороший сайтик? подскажи буду только благодарен

    Kotyarko_O, ну вот как раз насчёт aCHIVKA у меня сложилось такое мнение. Клянчание стало напрягать, вот и свернул "аттракцион щедрости". Люди не просто не хотят думать, они хотят что бы их дали всё на блюде с голубой каёмочкой.

    Не видел не чего дельно именно от вас, только от автора темы

    Вот что нашёл, только именно того что мне нужно я не увидел http://innoultra.ru/?page_id=18

  8. Да и в обще кто бы выложил готовый скрипт хорошего инсталятора, по примеру проще делать. меня например заинтересовал вот такой вот инсталятор

     

    post-6639-0-75039600-1398715793_thumb.jpg


    я вот тоже этот скрипт прошу,нее кто не дает

    все жадины такие 

    Шас сижу леплю простенький как на 1 варианте который дали, но хотело бы вариант такой как на скрине выше

  9.  Полагаю, копируете вместе с процедурами InitializeWizard. В итоге ругается, как минимум, на присутствие двух таких.

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

    Нет ругается на OnClick:=@logoOnClick

     

    а именно на этот код 

    begin

      ExtractTemporaryFile('logo.bmp')

      BtnPanel:=TPanel.Create(WizardForm)

      with BtnPanel do begin

        Left:=0

        Top:=315

        Width:=179

        Height:=46

        Cursor:=crHand

        OnClick:=@logoOnClick

        Parent:=WizardForm

      end;

  10. Здравствуйте!

    Подскажите пожалуйста! Как исправить?

    Как переместить панель ушей пониже, а часы переместить в угол?

    Спасибо!

    По поводу времени боя это проблема у тебя в конкуляторе своей брони

    Вот тебе нормальный конкулятор Пробуй мой ARMOR.rar

    время боя должны на место встать

    По поводу ушей фаил playerspanel.xc

    изменить

    // Смещение относительно иконки уровня танка (по X, Y).

        "Xoffset": -20,

        "Yoffset": -7,

     

    по моему так

    Сразу были сделаны

    Подскажи где скачать то? ставил XVM 5.2.1.r3361 - 0.9.0 BIG OTM Standart m.Ak

    а то у меня вот так post-6639-0-18290200-1398098989_thumb.jpg

     

    Заранее спасибо, а по поводу значков?( так и не сделал? 

    • Upvote 1
  11. Максимум что я могу предложить! http://disk.tom.ru/g6ln7x8  Наверно есть еще, какая то программка для создания иконок! Или как то нужно хорошо разобраться в этой программке.

    не не то, но спасибо что пытался помочь

    похоже SafeShot

     

    Обновил

    - разработчики XVM исправили некоторые ошибки, в том числе и связанные с миникартой.

     

    attachicon.gifXVM 5.2.1.r3361 - 0.9.0 BIG OTM Standart m.Ak.zip

     

    attachicon.gifXVM 5.2.1.r3361 - 0.9.0 PNG FULL Alternative by Chesss m.Ak.zip

     

    attachicon.gifXVM 5.2.1.r3361 - 0.9.0 PNG FULL Commander by Chesss m.Ak.zip

     

    attachicon.gifXVM 5.2.1.r3361 - 0.9.0 PNG Light 3.1 m.Ak.zip

     

    Чтобы работала статистика, активируйте ее на сайте http://www.modxvm.com/

    Значки новых танков будут?

  12. Прикрепил скрипт с картинками.

    Вставляем картинки для компонентов:

    1- Вписываем картинку в файлы инстоллятора (script.iss).

    [Files]
    Source: img_mod\1.bmp; Flags: dontcopy noencryption noencryption
    2- Находим строчку с название мода и картинки (223-226 у меня). И дописываем свои.

    '1. Прицел.': UndefPic := '1.bmp';
    3- Добавляем флаг в компонентах для отображения картинки без косяков

    Name: KMP\P; Description: 1. Прицел.; Flags: disablenouninstallwarning

    Важно: Картинки идут с расширением BMP, так как инстолятор самый простой!

     

    attachicon.gifСнимок.PNG

     

    ScriptModPack2.rar 52,6 МБ

     

    чистый скрипт можно? а то там смотрю и путь установки игры тоже прописан, мож что ещё лишние есть, так же хотелось узнать как делать что картинка не озле курсора появлялась а в определённом месте

×
×
  • Create New...