MEDNIKs 2 #210245 Posted August 31, 2014 @Kotyarko_O,извеняй за тупость,но у меня походу опять запара с совместимостью процедур. Вообщем у меня уже имеется CurStepChanged 'вот' procedure CurStepChanged(CurStep: TSetupStep);beginIf CurStep=ssInstall thenbeginDeleteMods();BackUpMods();end;end; Если я сосздам CurStepChanged1,что ещё нужно дописать? Quote Share this post Link to post Short link Share on other sites
Kotyarko_O 1,906 #210247 Posted August 31, 2014 (edited) @Shpyrny, под спойлер прятать такие большие коды нужно. @Kotyarko_O,извеняй за тупость,но у меня походу опять запара с совместимостью процедур. Вообщем у меня уже имеется CurStepChanged Если я сосздам CurStepChanged1,что ещё нужно дописать? procedure CurStepChanged(CurStep: TSetupStep); begin If CurStep=ssInstall then begin DeleteMods(); BackUpMods(); end; CurStepChanged1(CurStep); end; Edited August 31, 2014 by Kotyarko_O Quote Share this post Link to post Short link Share on other sites
Shpyrny 0 #210248 Posted August 31, 2014 Shpyrny, под спойлер прятать такие большие коды нужно. Извеняюсь редко пишу на форуме, не знаю все BB коды, но поможешь? Quote Share this post Link to post Short link Share on other sites
Kotyarko_O 1,906 #210249 Posted August 31, 2014 Извеняюсь редко пишу на форуме, не знаю все BB коды, но поможешь? [_spoiler]...[/_spoiler] (без "_"). Вот твой скрипт с привязанным слешем: Script.rar Дополнительная библиотека внутри. Рядом с ней (в папке Files) закинь изображение самого сплеша (*.png). Quote Share this post Link to post Short link Share on other sites
MEDNIKs 2 #210250 Posted August 31, 2014 Ребят кто может припелить 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);vari: Integer;begini := GetArrayLength(CompDescs);SetArrayLength(CompDescs, i + 1);CompDescs[i].Description := ADescription;CompDescs[i].ImageName := AImageName;CompDescs[i].Index := AIndex - 1end;procedure InitializeWizard();beginRedesignWizardForm;InitializeWizard1(); {из BackUpPage.iss}RedesignWizardForm2;RedesignWizardForm3;WindowResize(); beginWizardForm.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 dobeginParent := WizardForm.SelectComponentsPage;SetBounds(ScaleX(0), ScaleY(20), ScaleX(253), ScaleY(203)); //рамка картинкиBevelInner := bvLowered;end; CompDescText[1] := TLabel.Create(WizardForm);with CompDescText[1] dobeginParent := 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 dobeginParent := CompDescImgPanel;SetBounds(ScaleX(5), ScaleY(5), CompDescImgPanel.Width - ScaleX(10), CompDescImgPanel.Height - ScaleY(10));Stretch := True;Hide;end; CompDescPanel := TPanel.Create(WizardForm);with CompDescPanel dobeginParent := WizardForm.SelectComponentsPage;SetBounds(ScaleX(0), ScaleY(230), ScaleX(253), ScaleY(123)); //Нижния рамкаBevelInner := bvLowered;end; CompDescText[2] := TLabel.Create(WizardForm);with CompDescText[2] dobeginParent := 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 Quote Share this post Link to post Short link Share on other sites
Ekspoint 2,122 #210251 Posted August 31, 2014 [_spoiler]...[/_spoiler] (без "_"). Вот твой скрипт с привязанным слешем: Script.rar Дополнительная библиотека внутри. Рядом с ней (в папке Files) закинь изображение самого сплеша (*.png). хахахаах автор ekspoint хотя бы поменяй на свой ник 1 Quote Share this post Link to post Short link Share on other sites
Kotyarko_O 1,906 #210252 Posted August 31, 2014 (edited) хахахаах автор ekspoint хотя бы поменяй на свой ник Это мне? вот пример на версии 5.5 MsgBoxEx, вроде, в расширенной только есть. Edited August 31, 2014 by Kotyarko_O Quote Share this post Link to post Short link Share on other sites
Ekspoint 2,122 #210253 Posted August 31, 2014 Это мне? MsgBoxEx поддерживается в Inno уже давно. Не в версии проблема. Ищи ошибку со своей стороны. ок нет ему Quote Share this post Link to post Short link Share on other sites
Kotyarko_O 1,906 #210254 Posted August 31, 2014 нет ему В таком случае нужно цитировать его сообщение, а не моё.Тут по поводу расширенного мсджбокса обновил ответ. Quote Share this post Link to post Short link Share on other sites
MEDNIKs 2 #210255 Posted August 31, 2014 @Kotyarko_O, Вот так процедуры можно совмещать? procedure CurStepChanged(CurStep: TSetupStep);beginIf CurStep=ssInstall thenbeginDeleteMods();BackUpMods();end;end;Procedure CurStepChanged1(CurStep: TSetupStep);beginIf CurStep = ssDone thenbeginIf NewCheckBox3.Checked thenbeginExec(ExpandConstant('{app}\WOTLauncher.exe'), '', '', SW_SHOW, ewNoWait, ResCode);end;end;end; Quote Share this post Link to post Short link Share on other sites
Ekspoint 2,122 #210256 Posted August 31, 2014 (edited) В таком случае нужно цитировать его сообщение, а не моё. Тут по поводу расширенного мсджбокса обновил ответ. а где расширенную версию найти или че делать Edited August 31, 2014 by Ekspoint 1 Quote Share this post Link to post Short link Share on other sites
Shpyrny 0 #210257 Posted August 31, 2014 Вот твой скрипт с привязанным слешем: Script.rar 35,01 Кб 0 раз скачано Дополнительная библиотека внутри. Рядом с ней (в папке Files) закинь изображение самого сплеша (*.png). Спасибо тебе большое, и еще раз изменяюсь что без сполера скрипт кинул) Quote Share this post Link to post Short link Share on other sites
Kotyarko_O 1,906 #210259 Posted August 31, 2014 (edited) @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 August 31, 2014 by Kotyarko_O 2 Quote Share this post Link to post Short link Share on other sites
Shpyrny 0 #210260 Posted August 31, 2014 (edited) хахахаах автор ekspoint хотя бы поменяй на свой ник Извиняюсь за основу взят твой скрипт правда, надеюсь ты не против? Edited August 31, 2014 by Shpyrny Quote Share this post Link to post Short link Share on other sites
MEDNIKs 2 #210261 Posted August 31, 2014 Нет. Вот так: Блин,спасибо тебе друган ОГРОМНЕЙШЕЕ!!! Quote Share this post Link to post Short link Share on other sites
Kotyarko_O 1,906 #210264 Posted August 31, 2014 а где расширенную версию найти или че делать Даже гуглить уже разучились. тык. Quote Share this post Link to post Short link Share on other sites
Ekspoint 2,122 #210265 Posted August 31, 2014 Извиняюсь за основу взят твой скрипт правда, надеюсь ты не против? нет Даже гуглить уже разучились. тык. это версия 5.5.1 а надо 5.5.5 Quote Share this post Link to post Short link Share on other sites
Kotyarko_O 1,906 #210266 Posted August 31, 2014 (edited) это версия 5.5.1 а надо 5.5.5 Тебе подойдёт расширенная 5.5.1. Edited August 31, 2014 by Kotyarko_O Quote Share this post Link to post Short link Share on other sites
Ekspoint 2,122 #210267 Posted August 31, 2014 Тебе подойдёт расширенная 5.5.1. она вин8 не поддерживает вроде Quote Share this post Link to post Short link Share on other sites
Kotyarko_O 1,906 #210268 Posted August 31, 2014 (edited) она вин8 не поддерживает вроде пруф? з.ы. на восьмёрке сидел, пользовался. Всё нормально. Edited August 31, 2014 by Kotyarko_O Quote Share this post Link to post Short link Share on other sites