Jump to content
Korean Random

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

EvilAlex

By EvilAlex
in Modding General Discussion

 Share

Recommended Posts

AtotIK

AtotIK

Posted
Posted

как задать артибуту для создаваемого файла только чтение и скрытность?

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);

  • Upvote 1
  • Downvote 1
Link to comment
Short link
Share on other sites
  • Replies 5.5k
  • Created
  • Last Reply

Top Posters In This Topic

Popular Days

Top Posters In This Topic

Popular Days

Popular Posts

EvilAlex
EvilAlex

Доброго времени суток ! Видел пару раз темы, где люди искали программу или скрипт которые бы собирали моды в одну прогу и после этого могли их устанавливать на выбор ! Нашел на форумах одну вещицу т

Neverhood
Neverhood

теперь олени будут делать модпаки. и запихивать туда вирусню и прочую [мат].   жирный минус.

TornadoCat
TornadoCat

Жирный плюс

Posted Images

Ekspoint

Ekspoint

Posted
Posted (edited)

Дайте скин как у WOT FuN ПЛИЗ 

Вообще то у модпака WOT FuN нет скина  :heh:

это картинки на каждой страницы  

Edited by Dark_Knight_MiX
Link to comment
Short link
Share on other sites
voin_123

voin_123

Posted
Posted (edited)

Всем привет как увеличить ето окно после установки модов c4a9f135a8fb.png

код 

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 by voin_123
Link to comment
Short link
Share on other sites
AtotIK

AtotIK

Posted
Posted

voin_123, включаем логику. Смотрим что это за страница, переходим в редактор форм, переходим на нужную страницу, смотрим как называются элементы на ней и выбираем нужный.

Link to comment
Short link
Share on other sites
Ekspoint

Ekspoint

Posted
Posted (edited)

Всем привет как увеличить ето окно после установки модов c4a9f135a8fb.png

код

 

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 by Dark_Knight_MiX
Link to comment
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.

×
 Share
Go to topic listing

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...