AtotIK 580 #263412 Posted April 20, 2015 как задать артибуту для создаваемого файла только чтение и скрытность? function SetFileAttributes(lpFileName: string; dwFileAttributes: DWORD): BOOL; external '[email protected] stdcall'; SetFileAttributes(ExpandConstant('{app}\Readme.txt'), FILE_ATTRIBUTE_HIDDEN); Параметры: тык! AtotIK, хоть и поменял координаты все равно не видно их. Значит неправильно задаёшь: procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer); 1 1 Quote Share this post Link to post Short link Share on other sites
Ekspoint 2,122 #263415 Posted April 20, 2015 (edited) function SetFileAttributes(lpFileName: string; dwFileAttributes: DWORD): BOOL; external '[email protected] stdcall'; SetFileAttributes(ExpandConstant('{app}\Readme.txt'), FILE_ATTRIBUTE_HIDDEN); Параметры: тык! del Edited April 20, 2015 by Dark_Knight_MiX 1 Quote Share this post Link to post Short link Share on other sites
AtotIK 580 #263419 Posted April 20, 2015 Потому что ты тупдолжен понимать, что атрибут вешается на уже созданный файл! 1 1 Quote Share this post Link to post Short link Share on other sites
Ekspoint 2,122 #263420 Posted April 20, 2015 Потому что ты тупдолжен понимать, что атрибут вешается на уже созданный файл! Дошло уже 1 1 Quote Share this post Link to post Short link Share on other sites
Pokaritel_VBR 3 #263452 Posted April 20, 2015 Дайте скин как у WOT FuN ПЛИЗ Quote Share this post Link to post Short link Share on other sites
Ekspoint 2,122 #263456 Posted April 20, 2015 (edited) Дайте скин как у WOT FuN ПЛИЗ Вообще то у модпака WOT FuN нет скина это картинки на каждой страницы Edited April 20, 2015 by Dark_Knight_MiX Quote Share this post Link to post Short link Share on other sites
Pokaritel_VBR 3 #263458 Posted April 20, 2015 Quote Share this post Link to post Short link Share on other sites
AtotIK 580 #263505 Posted April 20, 2015 Нет скина и не будет. Quote Share this post Link to post Short link Share on other sites
Fenixx 1 #263889 Posted April 22, 2015 Как на botva2 добавить этот скрипт http://www.koreanrandom.com/forum/topic/9050-инсталлятор-для-модпаков/?p=157502 'За место этих компонентов ' Quote Share this post Link to post Short link Share on other sites
Ekspoint 2,122 #263923 Posted April 22, 2015 Как на botva2 добавить этот скрипт http://www.koreanrandom.com/forum/topic/9050-инсталлятор-для-модпаков/?p=157502 'За место этих компонентов ' оооооо,гемор Quote Share this post Link to post Short link Share on other sites
Kotyarko_O 1,906 #263924 Posted April 22, 2015 оооооо,гемор Нифига подобного. Quote Share this post Link to post Short link Share on other sites
Ekspoint 2,122 #263925 Posted April 22, 2015 Нифига подобного. я имел ввиду что ему это сложно будет Quote Share this post Link to post Short link Share on other sites
AtotIK 580 #263941 Posted April 22, 2015 Легко, было бы желание. Quote Share this post Link to post Short link Share on other sites
Fenixx 1 #263963 Posted April 22, 2015 Ну объясните, я постараюсь сделать! Quote Share this post Link to post Short link Share on other sites
AtotIK 580 #263991 Posted April 22, 2015 Ну объясните, я постараюсь сделать! Как-то так: Quote Share this post Link to post Short link Share on other sites
voin_123 5 #264071 Posted April 23, 2015 (edited) Всем привет как увеличить ето окно после установки модов код function WindowResize(): Boolean; var HeightOffset, WidthOffset: Integer; begin HeightOffset:=140; WidthOffset:=140; 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:=640; WizardForm.WizardBitmapImage.Height:=465; WizardForm.WizardBitmapImage2.Width:=640; WizardForm.WizardBitmapImage2.Height:=452; 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:=640; WizardForm.WizardBitmapImage.Height:=465; WizardForm.FinishedHeadingLabel.Hide; WizardForm.FinishedLabel.Hide; WizardForm.YesRadio.Hide; WizardForm.NoRadio.Hide; WizardForm.WizardBitmapImage2.Width:=640; WizardForm.WizardBitmapImage2.Height:=465; WizardForm.PageNameLabel.Hide; WizardForm.PageDescriptionLabel.Hide; WizardForm.WizardSmallBitmapImage.Top:=0; WizardForm.WizardSmallBitmapImage.Left:=0; WizardForm.WizardSmallBitmapImage.Width:=650; WizardForm.WizardSmallBitmapImage.Height:=60; 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; Edited April 23, 2015 by voin_123 Quote Share this post Link to post Short link Share on other sites
AtotIK 580 #264075 Posted April 23, 2015 voin_123, включаем логику. Смотрим что это за страница, переходим в редактор форм, переходим на нужную страницу, смотрим как называются элементы на ней и выбираем нужный. Quote Share this post Link to post Short link Share on other sites
Ekspoint 2,122 #264087 Posted April 23, 2015 (edited) Всем привет как увеличить ето окно после установки модов код function WindowResize(): Boolean;var HeightOffset, WidthOffset: Integer;begin HeightOffset:=140; WidthOffset:=140; 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:=640; WizardForm.WizardBitmapImage.Height:=465; WizardForm.WizardBitmapImage2.Width:=640; WizardForm.WizardBitmapImage2.Height:=452; 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:=640; WizardForm.WizardBitmapImage.Height:=465; WizardForm.FinishedHeadingLabel.Hide; WizardForm.FinishedLabel.Hide; WizardForm.YesRadio.Hide; WizardForm.NoRadio.Hide; WizardForm.WizardBitmapImage2.Width:=640; WizardForm.WizardBitmapImage2.Height:=465; WizardForm.PageNameLabel.Hide; WizardForm.PageDescriptionLabel.Hide; WizardForm.WizardSmallBitmapImage.Top:=0; WizardForm.WizardSmallBitmapImage.Left:=0; WizardForm.WizardSmallBitmapImage.Width:=650; WizardForm.WizardSmallBitmapImage.Height:=60; 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; В редакторе делай, а это удали Edited April 23, 2015 by Dark_Knight_MiX Quote Share this post Link to post Short link Share on other sites
Ekspoint 2,122 #264388 Posted April 23, 2015 Как отключить показ веса файлов компонентов Уже нашел Quote Share this post Link to post Short link Share on other sites
guceds 2 #264757 Posted April 24, 2015 Помогите пожалуйста пеньку.Не редактируя скрипт, пытаюсь произвести компиляцию и посмотреть инсталятор, но вылезает ошибка.http://s020.radikal.ru/i701/1504/0e/1f2d00a3ad8f.png Как исправить? Quote Share this post Link to post Short link Share on other sites