Jump to content
Korean Random
EvilAlex

Создание инсталляторов для модпаков на базе Inno Setup

Recommended Posts

@Kotyarko_O,извеняй за тупость,но у меня походу опять запара с совместимостью процедур.

Вообщем у меня уже имеется  CurStepChanged

'вот'

procedure CurStepChanged(CurStep: TSetupStep);
begin
If CurStep=ssInstall then
begin
DeleteMods();
BackUpMods();
end;
end;

Если я сосздам CurStepChanged1,что ещё нужно дописать?

Share this post


Link to post

Short link
Share on other sites

@Shpyrny, под спойлер прятать такие большие коды нужно.

 

@Kotyarko_O,извеняй за тупость,но у меня походу опять запара с совместимостью процедур.

Вообщем у меня уже имеется  CurStepChanged

Если я сосздам CurStepChanged1,что ещё нужно дописать?

procedure CurStepChanged(CurStep: TSetupStep);
begin
If CurStep=ssInstall then
begin
DeleteMods();
BackUpMods();
end;
CurStepChanged1(CurStep);
end;
Edited by Kotyarko_O

Share this post


Link to post

Short link
Share on other sites

 

 

Shpyrny, под спойлер прятать такие большие коды нужно.
 
Извеняюсь редко пишу на форуме, не знаю все BB коды, но поможешь?

Share this post


Link to post

Short link
Share on other sites

 Извеняюсь редко пишу на форуме, не знаю все BB коды, но поможешь?

[_spoiler]...[/_spoiler] (без "_").

 

Вот твой скрипт с привязанным слешем: Script.rar

Дополнительная библиотека внутри. Рядом с ней (в папке Files) закинь изображение самого сплеша (*.png).

Share this post


Link to post

Short link
Share on other sites

Ребят кто может припелить Splash к моему скрипту? Пожалуйста Вот скримт

 

попробуй так

'splash'

#define MyAppName "ModPack by Clan Brothers Time 0.9.2" ;Название инстоллятора

#define MyInfoVer "1.1" ;Версия инсталлятора

#define MyAppVer "0.9.2" ;Версия игры

#define MyAppPublisher "Expoint" ;Имя компании или человека кто делал

#define MyAppURL "http://yandex.ru"

#define MyAppSupportURL "http://yandex.ru" ;Ссылка для лого

#define Patch "0.9.2"

#define Patch1 "0.9.2-backup"

#define Splash

 

#include "Components.iss" ;Компаненты, они же моды

#include "Модули/Messages.iss" ;Сообщение, надписи на кнопках и т.д.

#include "Модули/BackUpPage.iss" ;Резерное копирование или удаление res_mods

#include "CustomMessages.iss" ;Описание модов

#include "Модули/Skins.iss" ;скин

#include "Check For Run.iss"

 

 

 

 

 

 

 

 

 

[setup]

AppName={#MyAppName}

AppVersion={#MyAppVer}

;AppVerName={#MyAppName} {#MyAppVersion}

AppPublisher={#MyAppPublisher}

 

//====={ Ссылки }=====\\

AppPublisherURL={#MyAppURL}

AppSupportURL={#MyAppURL}

AppUpdatesURL={#MyAppURL}

 

//====={ Папка устанвки }=====\\

;DefaultDirName={pf}\{#MyAppName}

DefaultDirName={reg:HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{{1EAC1D02-C6AC-4FA6-9A44-96258C37C812RU%7d_is1,InstallLocation|{pf}\World_of_Tanks}

DefaultGroupName={#MyAppName}

 

//====={ Картинки }=====\\

SetupIconFile=Files\qqq.ico

WizardSmallImageFile=Files\Small.bmp

WizardImageFile=Files\img1.bmp

 

//====={ Отключение строниц }=====\\

DisableProgramGroupPage=yes

 

//====={ Лицензия и Фак }=====\\

LicenseFile=licensia.rtf

InfoBeforeFile=faq.rtf

 

//====={ Папка создания и название сетапа }=====\\

OutputDir=.\Output

OutputBaseFilename={#MyAppName}

 

//====={ Сжатие сетапа }=====\\

InternalCompressLevel=ultra64

Compression=lzma2/ultra64

 

 

 

//====={ Сюда прописываешь те файлы и папки которые закинул в Mods }=====\\

WizardImageBackColor=$0000CC99

DisableStartupPrompt=False

AlwaysShowDirOnReadyPage=True

FlatComponentsList=False

ShowTasksTreeLines=True

AlwaysShowGroupOnReadyPage=True

 

 

//====={ Основные файлы сетапа }=====\\

[Files]

Source: Files\logo.bmp; Flags: dontcopy noencryption noencryption

Source: Files\logo2.bmp; Flags: dontcopy noencryption noencryption

Source: "Files\img_mod\1.bmp"; DestName: "CompDescImg1.bmp"; Flags: dontcopy

Source: "Files\img_mod\2.bmp"; DestName: "CompDescImg3.bmp"; Flags: dontcopy

Source: "Files\img_mod\3.bmp"; DestName: "CompDescImg4.bmp"; Flags: dontcopy

Source: "Files\img_mod\1.bmp"; DestName: "CompDescImg2.bmp"; Flags: dontcopy

 

#ifdef Splash

Source: Splash\splash.png; DestDir: {tmp}; Flags: ignoreversion dontcopy nocompression

Source: Splash\isgsg.dll; DestDir: {tmp}; Flags: ignoreversion dontcopy nocompression

#endif

 

 

procedure ShowSplashScreen(p1:HWND;p2:string;p3,p4,p5,p6,p7:integer;p8:boolean;p9:Cardinal;p10:integer); external 'ShowSplashScreen@files:isgsg.dll stdcall delayload';{ RedesignWizardFormBegin } // Не удалять эту строку!// Не изменять эту секцию. Она создана автоматически.varOldEvent_LicenseAcceptedRadioClick: TNotifyEvent;procedure LicenseAcceptedRadioClick(Sender: TObject); forward;procedure RedesignWizardForm;beginwith WizardForm.LicenseAcceptedRadio dobeginLeft := ScaleX(392);Top := ScaleY(216);OldEvent_LicenseAcceptedRadioClick := OnClick;OnClick := @LicenseAcceptedRadioClick;end;{ ReservationBegin }// Вы можете добавить ваш код здесь.{ ReservationEnd }end;// Не изменять эту секцию. Она создана автоматически.{ RedesignWizardFormEnd } // Не удалять эту строку!procedure LicenseAcceptedRadioClick(Sender: TObject);beginOldEvent_LicenseAcceptedRadioClick(Sender);end;procedure LogoOnClick(Sender: TObject);var ResCode: Integer;beginShellExec('', '{#MyAppURL}', '' , '', SW_SHOW, ewNoWait, ResCode)end;varBitmapImage1: TBitmapImage;procedure RedesignWizardForm2;vari: integer;BtnPanel: TPanel;BtnImage: TBitmapImage;beginExtractTemporaryFile('logo.bmp')BtnPanel:=TPanel.Create(WizardForm)with BtnPanel do beginLeft:=0Top:=490Width:=120Height:=50Cursor:=crHandOnClick:=@logoOnClickParent:=WizardFormend;BtnImage:=TBitmapImage.Create(WizardForm)with BtnImage do beginAutoSize:=True;Enabled:=False;Bitmap.LoadFromFile(ExpandConstant('{tmp}')+'\logo.bmp')Parent:=BtnPanelend;end;//////////////////////////#ifdef SplashbeginExtractTemporaryFile('splash.png');ExtractTemporaryFile('isgsg.dll');ShowSplashScreen(WizardForm.Handle,ExpandConstant('{tmp}')+'\splash.png',1000,3000,1000,0,255,False,$FFFFFF,10);end;#endif///////////////////////procedure LogoOnClick1(Sender: TObject);varResCode: Integer;beginShellExec('', '{#MyAppSupportURL}', '' , '', SW_SHOW, ewNoWait, ResCode)end;procedure RedesignWizardForm3;varBtnPanel: TPanel;BtnImage: TBitmapImage;beginExtractTemporaryFile('logo2.bmp')BtnPanel:=TPanel.Create(WizardForm)with BtnPanel dobeginLeft:=130Top:=490Width:=120Height:=50Cursor:=crHandOnClick:=@logoOnClick1Parent:=WizardFormend;BtnImage:=TBitmapImage.Create(WizardForm)with BtnImage dobeginAutoSize:=True;Enabled:=False;Bitmap.LoadFromFile(ExpandConstant('{tmp}')+'\logo2.bmp')Parent:=BtnPanelend;end;function WindowResize(): Boolean;varHeightOffset, WidthOffset: Integer;beginHeightOffset:=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;/// --- /// --- /// --- /// --- /// --- /// --- /// --- /// --- /// --- /// --- /// --- ///typeTComponentDesc = recordDescription: String;ImageName: String;Index: Integer;end;varCompDescs: 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);vari: Integer;beginif Index = LastIndex then Exit;CompIndex := -1;for i := 0 to GetArrayLength(CompDescs) -1 dobeginif (CompDescs[i].Index = Index) thenbeginCompIndex := i;Break;end;end;if (CompIndex >= 0) and (Area = iaItem) thenbeginif not FileExists(ExpandConstant('{tmp}\') + CompDescs[CompIndex].ImageName) thenExtractTemporaryFile(CompDescs[CompIndex].ImageName);CompDescImg.Bitmap.LoadFromFile(ExpandConstant('{tmp}\') + CompDescs[CompIndex].ImageName);CompDescImg.Show;CompDescText[2].Caption := CompDescs[CompIndex].Description;CompDescText[2].Enabled := True;end elsebeginCompDescText[2].Caption := CustomMessage('ComponentsInfo');CompDescText[2].Enabled := False;CompDescImg.Hide;end;LastIndex := Index;end;procedure CompListMouseLeave(Sender: TObject);beginCompDescImg.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

RedesignWizardForm;

InitializeWizard1(); {из BackUpPage.iss}

RedesignWizardForm2;

RedesignWizardForm3;

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;

Font.Color :=clBlack;

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;

Font.Color :=clBlack;

Caption := CustomMessage('ComponentsInfo');

end;

 

AddCompDescription(1, CustomMessage('CompDesc1'), 'CompDescImg1.bmp');

AddCompDescription(2, CustomMessage('CompDesc2'), 'CompDescImg2.bmp');

AddCompDescription(3, CustomMessage('CompDesc3'), 'CompDescImg3.bmp');

AddCompDescription(4, CustomMessage('CompDesc4'), 'CompDescImg4.bmp');

 

 

 

end;

end;

 

[iSFormDesigner]

WizardForm=FF0A005457495A415244464F524D0030103702000054504630F10B5457697A617264466F726D0A57697A617264466F726D0C436C69656E744865696768740368010B436C69656E74576964746803F1010C4578706C696369744C65667402000B4578706C69636974546F7002000D4578706C6963697457696474680301020E4578706C69636974486569676874038E010D506978656C73506572496E636802600A54657874486569676874020D00F10C544E65774E6F7465626F6F6B0D4F757465724E6F7465626F6F6B00F110544E65774E6F7465626F6F6B506167650B57656C636F6D65506167650D4578706C69636974576964746803F1010E4578706C696369744865696768740339010000F110544E65774E6F7465626F6F6B5061676509496E6E6572506167650D4578706C69636974576964746803F1010E4578706C6963697448656967687403390100F10C544E65774E6F7465626F6F6B0D496E6E65724E6F7465626F6F6B00F110544E65774E6F7465626F6F6B506167650B4C6963656E73655061676500F10F544E6577526164696F427574746F6E144C6963656E73654163636570746564526164696F044C65667403880103546F7003D800074F6E436C69636B07194C6963656E73654163636570746564526164696F436C69636B0C4578706C696369744C6566740388010B4578706C69636974546F7003D8000000000000F110544E65774E6F7465626F6F6B506167650C46696E6973686564506167650D4578706C69636974576964746803F1010E4578706C6963697448656967687403390100000000

ток надо создать папку splash и закинуть туда библиотеку isgsg.dll,ну и сам сплеш в формате png

Share this post


Link to post

Short link
Share on other sites

[_spoiler]...[/_spoiler] (без "_").

 

Вот твой скрипт с привязанным слешем: attachicon.gifScript.rar

Дополнительная библиотека внутри. Рядом с ней (в папке Files) закинь изображение самого сплеша (*.png).

хахахаах автор ekspoint хотя бы поменяй на свой ник 

  • Downvote 1

Share this post


Link to post

Short link
Share on other sites

хахахаах автор ekspoint хотя бы поменяй на свой ник 

Это мне?

 

вот пример на версии 5.5

MsgBoxEx, вроде, в расширенной только есть.

Edited by Kotyarko_O

Share this post


Link to post

Short link
Share on other sites

 

Это мне?

 

 

MsgBoxEx поддерживается в Inno уже давно. Не в версии проблема. Ищи ошибку со своей стороны.

 

ок 

нет ему

Share this post


Link to post

Short link
Share on other sites

 

 

нет ему
В таком случае нужно цитировать его сообщение, а не моё.

Тут по поводу расширенного мсджбокса обновил ответ.

Share this post


Link to post

Short link
Share on other sites

@Kotyarko_O

Вот так процедуры можно совмещать?

procedure CurStepChanged(CurStep: TSetupStep);
begin
If CurStep=ssInstall then
begin
DeleteMods();
BackUpMods();
end;
end;

Procedure CurStepChanged1(CurStep: TSetupStep);
begin
If CurStep = ssDone then
begin
If NewCheckBox3.Checked then
begin
Exec(ExpandConstant('{app}\WOTLauncher.exe'), '', '', SW_SHOW, ewNoWait, ResCode);
end;
end;
end;

Share this post


Link to post

Short link
Share on other sites

В таком случае нужно цитировать его сообщение, а не моё.

Тут по поводу расширенного мсджбокса обновил ответ.

 

а где расширенную версию найти или че делать 

Edited by Ekspoint
  • Downvote 1

Share this post


Link to post

Short link
Share on other sites

 

 

Вот твой скрипт с привязанным слешем:  Script.rar   35,01 Кб   0 раз скачано Дополнительная библиотека внутри. Рядом с ней (в папке Files) закинь изображение самого сплеша (*.png).

Спасибо тебе большое, и  еще раз изменяюсь что без сполера скрипт кинул)
 

Share this post


Link to post

Short link
Share on other sites

@Kotyarko_O

Вот так процедуры можно совмещать?

procedure CurStepChanged(CurStep: TSetupStep);

begin

If CurStep=ssInstall then

begin

DeleteMods();

BackUpMods();

end;

end;

Procedure CurStepChanged1(CurStep: TSetupStep);

begin

If CurStep = ssDone then

begin

If NewCheckBox3.Checked then

begin

Exec(ExpandConstant('{app}\WOTLauncher.exe'), '', '', SW_SHOW, ewNoWait, ResCode);

end;

end;

end;

Нет.

Вот так:

Procedure CurStepChanged1(CurStep: TSetupStep);
begin
 If CurStep = ssDone then
 begin
  If NewCheckBox3.Checked then
  begin
   Exec(ExpandConstant('{app}\WOTLauncher.exe'), '', '', SW_SHOW, ewNoWait, ResCode);
  end;
 end;
end;

procedure CurStepChanged(CurStep: TSetupStep);
begin
 If CurStep=ssInstall then
 begin
  DeleteMods();
  BackUpMods();
 end;
 CurStepChanged1(CurStep);
end;
Edited by Kotyarko_O
  • Upvote 2

Share this post


Link to post

Short link
Share on other sites

 

хахахаах автор ekspoint хотя бы поменяй на свой ник 

Извиняюсь за основу взят твой скрипт правда, надеюсь ты не против?

Edited by Shpyrny

Share this post


Link to post

Short link
Share on other sites

 

 

Нет. Вот так:

Блин,спасибо тебе друган ОГРОМНЕЙШЕЕ!!! 

Share this post


Link to post

Short link
Share on other sites

а где расширенную версию найти или че делать 

 Даже гуглить уже разучились.

тык.

Share this post


Link to post

Short link
Share on other sites

Извиняюсь за основу взят твой скрипт правда, надеюсь ты не против?

нет

 Даже гуглить уже разучились.

тык.

это версия 5.5.1 а надо 5.5.5

Share this post


Link to post

Short link
Share on other sites

это версия 5.5.1 а надо 5.5.5

 Тебе подойдёт расширенная 5.5.1.

Edited by Kotyarko_O

Share this post


Link to post

Short link
Share on other sites

 Тебе подойдёт расширенная 5.5.1.

она вин8 не поддерживает вроде 

Share this post


Link to post

Short link
Share on other sites

она вин8 не поддерживает вроде 

пруф?

з.ы. на восьмёрке сидел, пользовался. Всё нормально.

Edited by Kotyarko_O

Share this post


Link to post

Short link
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.


  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...