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

Kotyarko_O · May 21, 2014

@ventura69, неплохо. Вот только картинки-то бывают разные, и большинство придётся подгонять по размерам.

AtotIK · May 21, 2014

ventura69, э-э-э-э... А это кому?

ventura69 · May 21, 2014

@ventura69, неплохо. Вот только картинки-то бывают разные, и большинство придётся подгонять по размерам.

Естественно. Я ж их сам и делаю. Подгоняю в ПэйтНете. Я себе все модели так подогнал на работе.

ventura69, э-э-э-э... А это кому?

post-11632-0-21296000-1400692191.jpg

А можно попонятнее? Картинку сверху убрать можно так ВzardForm.ВizardSmallBitmapImage.Вidth := ScaleX(0) (исковеркал надпись, а то не грузит). А чем кнопочки вперед/назад не угодили?

Я не понял Вас.

Edited May 21, 2014 by ventura69

Kotyarko_O · May 21, 2014

Картинку сверху убрать можно так ВzardForm.ВizardSmallBitmapImage.Вidth := ScaleX(0)

Лучше так:

WizardForm.WizardSmallBitmapImage.Visible:=False;

ventura69 · May 21, 2014

Лучше так:

WizardForm.WizardSmallBitmapImage.Visible:=False;

Согласен. А вот, как переименовать кнопочку "Далее" - самому интересно стало. :-)

Kotyarko_O · May 21, 2014

Согласен. А вот, как переименовать кнопочку "Далее" - самому интересно стало. :-)

[Messages]
russian.ButtonBack=< Назад
russian.ButtonNext=Далее >
russian.ButtonInstall=Установить
russian.ButtonFinish=Завершить

ventura69 · May 21, 2014

[Messages]
russian.ButtonBack=< Назад
russian.ButtonNext=Далее >
russian.ButtonInstall=Установить
russian.ButtonFinish=Завершить

Хехе... А я первый это в справке нашел, только зачитался и Вы опередили! :-)

AtotIK · May 21, 2014

ventura69, я о том, что нужно ещё "продлить" MainPanel, Bevel и Bevel1. Да и кнопки рациональнее располагать группой, а не в разнобой.

ventura69 · May 21, 2014

ventura69, я о том, что нужно ещё "продлить" MainPanel, Bevel и Bevel1. Да и кнопки рациональнее располагать группой, а не в разнобой.

Понял Вас. Это все в процессе. Вся беда в том, что из-за травмы глаз у меня проблемы со зрением и, соответственно, чувство прекрасного у меня отмерло еще в 7 лет (когда получил травму)... Внешний вид - для меня всегда была БААААЛШАЯ беда :-)

Я думал не продлевать Bevel, а присобачить к ним еще одну (вертикальную)

Bevel2 := TBevel.Create(WizardForm);

with Bevel2 do

begin

Parent := WizardForm;

Left := ScaleX(536);

Top := ScaleY(0);

Width := ScaleX(5);

Height := ScaleY(350);

end;

чтобы область картинок визуально отделить

Edited May 21, 2014 by ventura69

AtotIK · May 22, 2014

ventura69, можно ещё поместить их в TPanel.

ventura69 · May 22, 2014

ventura69, можно ещё поместить их в TPanel.

Спасибо за идею. Покумекаю на эту тему.

Ckaym · May 22, 2014

'Хелп !'

Нужна помощь профи если тут есть такие ссылка

Kotyarko_O · May 22, 2014

@Ckaym, хм, уголка не наблюдаю.

UPD: Минутка урока русского языка.. "Вернуться" (что делать?)

UPDUPD: с положением элементов не заморачивался, сам решишь, что и куда переместить.

Наброски.rar

Edited May 22, 2014 by Kotyarko_O

Ckaym · May 22, 2014

Спасибо за помощь уголок появляется сразу как только загружается до того как мышкой начинаешь шарить еще как инстолятор выкатить на центр!

Kotyarko_O · May 22, 2014

как инстолятор выкатить на центр!

procedure InitializeWizard();
begin
  WizardForm.Position:=poScreenCenter;
end;

liked · May 23, 2014

liked, разве это было так сложно?

BigMusic_1.rar

Для других страниц по аналогии. Открываешь редактор форм, выбираешь нужное на странице и копируешь его имя в столбце справа, после изменяешь положение.

чё та не понял как добавить правильно для других страниц содержимое данных страниц не растягивается по размеру окна

[code]
function WindowResize(): Boolean;
var
  HeightOffset, WidthOffset: Integer;
begin
  HeightOffset:=174;
  WidthOffset:=206;

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

procedure InitializeWizard();
begin
  InitializeWizard1(); {из BackUpPage.iss, если что}
begin
  WindowResize();
 end;
end;

не получается выравнить страницу Welcome и страницу InitializeWizard1

Edited May 23, 2014 by liked

Kotyarko_O · May 23, 2014

чё та не понял как добавить правильно для других страниц

И почему я не удивлён..

Открываешь редактор форм, выбираешь нужное на странице и копируешь его имя в столбце справа, после изменяешь положение.

AtotIK · May 23, 2014

liked, уйди из этой темы, удали Inno Setup и забудь про эту затею. Прожевали всё и положили в рот уже, но нет - всё равно не дошло.

liked · May 23, 2014

И почему я не удивлён..

Вот и я не понял какой столбец с права? имя я нашёл и так куда копировать я не понял

liked, уйди из этой темы, удали Inno Setup и забудь про эту затею. Прожевали всё и положили в рот уже, но нет - всё равно не дошло.

Если бы всё прожували я бы не спрашивал, имя страницы я вижу, куда копировать? вижу управление элементами страницы типа WizardForm.WelcomeLabel1.Hide; Удаляет элемент label1

как заставить растянутся данный элемент, порпорцеонально WizardForm

или растянуть можно только таким методом

WizardForm.WelcomeLabel1.Width:=600;

WizardForm.WelcomeLabel1.Height:=400;

или есть другие варианты?

Edited May 23, 2014 by liked

Kotyarko_O · May 23, 2014

или есть другие варианты?

А зачем тебе ещё другие варианты знать? Этого хватит.

Sign In

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

Recommended Posts

Link to comment

Short link

Share on other sites

Top Posters In This Topic

Popular Days

Top Posters In This Topic

Popular Days

Popular Posts

EvilAlex

Neverhood

TornadoCat

Posted Images

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Link to comment

Short link

Share on other sites

Join the conversation

Recently Browsing 0 members