AtotIK Posted April 20, 2015 Share 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 Link to comment Short link Share on other sites More sharing options...
Ekspoint Posted April 20, 2015 Share 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 Link to comment Short link Share on other sites More sharing options...
AtotIK Posted April 20, 2015 Share Posted April 20, 2015 Потому что ты тупдолжен понимать, что атрибут вешается на уже созданный файл! 1 1 @ Quote Link to comment Short link Share on other sites More sharing options...
Ekspoint Posted April 20, 2015 Share Posted April 20, 2015 Потому что ты тупдолжен понимать, что атрибут вешается на уже созданный файл! Дошло уже 1 1 @ Quote Link to comment Short link Share on other sites More sharing options...
Pokaritel_VBR Posted April 20, 2015 Share Posted April 20, 2015 Дайте скин как у WOT FuN ПЛИЗ @ Quote Link to comment Short link Share on other sites More sharing options...
Ekspoint Posted April 20, 2015 Share Posted April 20, 2015 (edited) Дайте скин как у WOT FuN ПЛИЗ Вообще то у модпака WOT FuN нет скина это картинки на каждой страницы Edited April 20, 2015 by Dark_Knight_MiX @ Quote Link to comment Short link Share on other sites More sharing options...
Pokaritel_VBR Posted April 20, 2015 Share Posted April 20, 2015 @ Quote Link to comment Short link Share on other sites More sharing options...
AtotIK Posted April 20, 2015 Share Posted April 20, 2015 Нет скина и не будет. @ Quote Link to comment Short link Share on other sites More sharing options...
Fenixx Posted April 22, 2015 Share Posted April 22, 2015 Как на botva2 добавить этот скрипт http://www.koreanrandom.com/forum/topic/9050-инсталлятор-для-модпаков/?p=157502 'За место этих компонентов ' @ Quote Link to comment Short link Share on other sites More sharing options...
Ekspoint Posted April 22, 2015 Share Posted April 22, 2015 Как на botva2 добавить этот скрипт http://www.koreanrandom.com/forum/topic/9050-инсталлятор-для-модпаков/?p=157502 'За место этих компонентов ' оооооо,гемор @ Quote Link to comment Short link Share on other sites More sharing options...
Kotyarko_O Posted April 22, 2015 Share Posted April 22, 2015 оооооо,гемор Нифига подобного. @ Quote Link to comment Short link Share on other sites More sharing options...
Ekspoint Posted April 22, 2015 Share Posted April 22, 2015 Нифига подобного. я имел ввиду что ему это сложно будет @ Quote Link to comment Short link Share on other sites More sharing options...
AtotIK Posted April 22, 2015 Share Posted April 22, 2015 Легко, было бы желание. @ Quote Link to comment Short link Share on other sites More sharing options...
Fenixx Posted April 22, 2015 Share Posted April 22, 2015 Ну объясните, я постараюсь сделать! @ Quote Link to comment Short link Share on other sites More sharing options...
AtotIK Posted April 22, 2015 Share Posted April 22, 2015 Ну объясните, я постараюсь сделать! Как-то так: @ Quote Link to comment Short link Share on other sites More sharing options...
voin_123 Posted April 23, 2015 Share 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 Link to comment Short link Share on other sites More sharing options...
AtotIK Posted April 23, 2015 Share Posted April 23, 2015 voin_123, включаем логику. Смотрим что это за страница, переходим в редактор форм, переходим на нужную страницу, смотрим как называются элементы на ней и выбираем нужный. @ Quote Link to comment Short link Share on other sites More sharing options...
Ekspoint Posted April 23, 2015 Share 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 Link to comment Short link Share on other sites More sharing options...
Ekspoint Posted April 23, 2015 Share Posted April 23, 2015 Как отключить показ веса файлов компонентов Уже нашел @ Quote Link to comment Short link Share on other sites More sharing options...
guceds Posted April 24, 2015 Share Posted April 24, 2015 Помогите пожалуйста пеньку.Не редактируя скрипт, пытаюсь произвести компиляцию и посмотреть инсталятор, но вылезает ошибка.http://s020.radikal.ru/i701/1504/0e/1f2d00a3ad8f.png Как исправить? @ Quote Link to comment Short link Share on other sites More sharing options...
Recommended Posts
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.