» Inno Setup (создание инсталяционных пакетов)

а по поводу моего вопроса?

Цитата:

Studio13_OutlaW Наверно Ты Меня Не Понял Я Нехочу Штоби Белый Фон Не Был Прозрачным А Картинка Была Места Белого Фона И Штоб Тексты Были Видни

мда, у людей совсем мозг не работает, а прозрачный фон, под которым видна картинка и текст это не то что тебе нужно?

EagleSH
Может ты подскажешь как сделать прозрачным слой на котором находится текст???

Цитата:

В шапке есть пример скрипта. Вроде называется TransparateColor. Фишка в том, что фон становится прозрачным....

В Какой Шапке Соррй Са Глупий Вопрос Я из Америки
Плохо Понимаю по русски


Добавлено:
EagleSH Ета У тебя Мозг Не Работает Если И ты бы Понимал Плохо По Русски Тыби Меня Понял

Yoldosh
А Зачем Ты Каждое Слово Пишешь С Большой Буквы? Или Это Так Модно Щас?
Насколько я знаю, то даже по-английски так не пишут.


Цитата:

В Какой Шапке Соррй Са Глупий Вопрос Я из Америки

В шапке этой же темы (the header of this topic) полно скриптов, и там скорей всего найдешь ответы на свои вопросы.

И кстати, тебе EagleSH правильно замечание сделал! Ты скорей всего сам не понимаешь чего хочешь.

Yoldosh, skeptik_vdm

Цитата:

Картинка Была Места Белого Фона И Штоб Тексты Были

[more=Такъ -->]

procedure InitializeWizard();
var
WLabel1, WLabel2: TLabel;
begin
WizardForm.WelcomeLabel1.Hide;
WizardForm.WelcomeLabel2.Hide;
WizardForm.WizardBitmapImage.Width := WizardForm.Width;
WizardForm.WizardBitmapImage.Height := WizardForm.Height;

WLabel1 := TLabel.Create(WizardForm);
WLabel1.Left := ScaleX(176);
WLabel1.Top := ScaleY(16);
WLabel1.Width := ScaleX(301);
WLabel1.Height := ScaleY(54);
WLabel1.AutoSize := False;
WLabel1.WordWrap := True;
WLabel1.Font.Size := 12;
WLabel1.Font.Style := [fsBold];
WLabel1.Font.Color:= clRed;
WLabel1.ShowAccelChar := False;
WLabel1.Caption := WizardForm.WelcomeLabel1.Caption;
WLabel1.Transparent := True;
WLabel1.Parent := WizardForm.WelcomePage;

WLabel2:=TLabel.Create(WizardForm);
WLabel2.Top := ScaleY(76);
WLabel2.Left := ScaleX(176);
WLabel2.Width := ScaleX(301);
WLabel2.Height := ScaleY(234);
WLabel2.AutoSize := False;
WLabel2.WordWrap := True;
WLabel2.Font.Color:= clRed;
WLabel2.ShowAccelChar := False;
WLabel2.Caption := WizardForm.WelcomeLabel2.Caption;
WLabel2.Transparent := True;
WLabel2.Parent := WizardForm.WelcomePage;
end;

[/more]

Спасибо Всем Вам И Особенно Тебе kombat 77

Добавлено:
Если Не Сложна Можеш Как Верхную Часть Как На Картинке http://pic.ipicture.ru/uploads/090220/SraXOUaf5t.jpg Заранее Спасибо

Добавлено:
Я Сам Пытался Но Нечего Не Вышло Я В скриптинге Inno Мало Што Понымаю

kombat 77
Спасибо большое!!!

Добавлено:
Yoldosh

Цитата:

Если Не Сложна Можеш Как Верхную Часть Как На Картинке http://pic.ipicture.ru/uploads/090220/SraXOUaf5t.jpg Заранее Спасибо

Посмотри [more=код]
[Code]
var
PageNameLabel, PageDescriptionLabel: TLabel;
procedure InitializeWizard();
begin
begin
WizardForm.WizardSmallBitmapImage.Left:=0;
WizardForm.WizardSmallBitmapImage.Width:=497;
WizardForm.WizardSmallBitmapImage.Height:=58;
WizardForm.PageDescriptionLabel.Width:=300;
WizardForm.PageNameLabel.Width:=300;
end ;
begin
PageNameLabel := TLabel.Create(WizardForm);
with PageNameLabel do
begin
Left := ScaleX(10);
Top := ScaleY(10);
Width := ScaleX(300);
Height := ScaleY(14);
AutoSize := False;
WordWrap := True;
Font.Color := clBlack;
Font.Style := [fsBold];
Transparent := True;
Parent := WizardForm.MainPanel;
end;

PageDescriptionLabel := TLabel.Create(WizardForm);
with PageDescriptionLabel do
begin
Left := ScaleX(15);
Top := ScaleY(25);
Width := ScaleX(475);
Height := ScaleY(30);
AutoSize := False;
WordWrap := True;
Font.Color := clBlack;
Transparent := True;
Parent := WizardForm.MainPanel;
end;

with WizardForm do
begin
PageNameLabel.Hide;
PageDescriptionLabel.Hide;
with MainPanel do
begin
with WizardSmallBitmapImage do
begin
Left := ScaleX(0);
Top := ScaleY(0);
Width := Mainpanel.Width;
Height := MainPanel.Height;
end;
end;
end;
end;
end;

procedure CurPageChanged(CurPageID: Integer);
begin
PageNameLabel.Caption := WizardForm.PageNameLabel.Caption;
PageDescriptionLabel.Caption := WizardForm.PageDescriptionLabel.Caption;
end;

[/more]

Добавлено:
И еще вопросик только не по теме. Кто нибудь может зайти на ФТО, а то я что то не могу войти???

skeptik_vdm

Цитата:

И еще вопросик только не по теме. Кто нибудь может зайти на ФТО, а то я что то не могу войти???

Кто то у них форум сломал))

И для чего нужна DLL-ка GameuxInstallHelper.dll а то уже сколько репаков от z1oyded'a устанавливал она там присутствовала???

skeptik_vdm Спасибо Большое

skeptik_vdm

Цитата:

И для чего нужна DLL-ка GameuxInstallHelper.dll а то уже сколько репаков от z1oyded'a устанавливал она там присутствовала???

Для Vista, она регистрирует игру в GameExplorer'е, создаёт ярлыки, и тому прочее.

Подскажите пожалуйста сайты где можно обои из игр качать???
А то www.gamewallpapers.ru и www.wallpapery.sk мало картинок выгладывают может быть есть место их просто навалом???

noiseless

Цитата:

Qarma
Попробуй Подробнее... [?]

Перестала работать одна секция отвечающая за место на жёстком диске
Вот, кусок скрипта отвечающий за это
[more]
procedure CurPageChanged(CurPageID: Integer);
begin
If CurPageID=wpFinished then KillTimer(0, TimerID);
if CurPageID = wpSelectDir then
if FreeMB < NeedSize then
begin
WizardForm.NextButton.Enabled:=False
end;
end;
[/more]

Добавлено:

Цитата:

noiseless

Цитата:
Qarma
Попробуй Подробнее... [?]

Перестала работать одна секция отвечающая за место на жёстком диске
Вот, кусок скрипта отвечающий за это
Подробнее... [?]

Помогите ктонить


Добавлено:

Цитата:

Посмотри код [?]

skeptik_vdm
Можно узнать, как сделать такой же последнюю страницу?

kombat 77 Можещ Дать Скрипт Чтоби И на Последный Странице Была Картинка На Весь Екран А не 164х314 http://pic.ipicture.ru/uploads/090221/1PUhVS1PrC.jpg

Yoldosh

Цитата:

И на Последный Странице Была Картинка На Весь Екран А не 164х314

[more=Примерно ...]

procedure InitializeWizard();
var
WLabel1, WLabel2,
FLabel1, FLabel2: TLabel;
begin
WizardForm.WelcomeLabel1.Hide;
WizardForm.WelcomeLabel2.Hide;
WizardForm.FinishedHeadingLabel.Hide;
WizardForm.FinishedLabel.Hide;
WizardForm.WizardBitmapImage.Width := WizardForm.Width;
WizardForm.WizardBitmapImage.Height := WizardForm.Height;

WLabel1 := TLabel.Create(WizardForm);
WLabel1.Left := ScaleX(176);
WLabel1.Top := ScaleY(16);
WLabel1.Width := ScaleX(301);
WLabel1.Height := ScaleY(54);
WLabel1.AutoSize := False;
WLabel1.WordWrap := True;
WLabel1.Font.Size := 12;
WLabel1.Font.Style := [fsBold];
WLabel1.Font.Color:= clRed;
WLabel1.ShowAccelChar := False;
WLabel1.Caption := WizardForm.WelcomeLabel1.Caption;
WLabel1.Transparent := True;
WLabel1.Parent := WizardForm.WelcomePage;

WLabel2 :=TLabel.Create(WizardForm);
WLabel2.Top := ScaleY(76);
WLabel2.Left := ScaleX(176);
WLabel2.Width := ScaleX(301);
WLabel2.Height := ScaleY(234);
WLabel2.AutoSize := False;
WLabel2.WordWrap := True;
WLabel2.Font.Color:= clRed;
WLabel2.ShowAccelChar := False;
WLabel2.Caption := WizardForm.WelcomeLabel2.Caption;
WLabel2.Transparent := True;
WLabel2.Parent := WizardForm.WelcomePage;

WizardForm.WizardBitmapImage2.Width := WizardForm.Width;
WizardForm.WizardBitmapImage2.Height := WizardForm.Height;

FLabel1 := TLabel.Create(WizardForm);
FLabel1.Left := ScaleX(176);
FLabel1.Top := ScaleY(16);
FLabel1.Width := ScaleX(301);
FLabel1.Height := ScaleY(54);
FLabel1.AutoSize := False;
FLabel1.WordWrap := True;
FLabel1.Font.Size := 12;
FLabel1.Font.Style := [fsBold];
FLabel1.Font.Color:= clRed;
FLabel1.ShowAccelChar := False;
FLabel1.Caption := WizardForm.FinishedHeadingLabel.Caption;
FLabel1.Transparent := True;
FLabel1.Parent := WizardForm.FinishedPage;

FLabel2 :=TLabel.Create(WizardForm);
FLabel2.Top := ScaleY(76);
FLabel2.Left := ScaleX(176);
FLabel2.Width := ScaleX(301);
FLabel2.Height := ScaleY(53);
FLabel2.AutoSize := False;
FLabel2.WordWrap := True;
FLabel2.Font.Color:= clRed;
FLabel2.ShowAccelChar := False;
FLabel2.Caption := 'Программа установлена на Ваш компьютер.' #13#13
'Нажмите «Завершить», чтобы выйти из программы установки.';
FLabel2.Transparent := True;
FLabel2.Parent := WizardForm.FinishedPage;
end;

[/more]

kombat77 FLabel2.Caption := 'Программа установлена на Ваш компьютер.' #13#13
'Нажмите «Завершить», чтобы выйти из программы установки.';
Если Выбираеш English FLabel2.Caption := 'Программа установлена на Ваш компьютер.' #13#13
'Нажмите «Завершить», чтобы выйти из программы установки.';
По Англисски Если Выбираеш Русски Сообшение По Русски
!!! Спасибо Огромное Тебе kombat77 !!!!

Yoldosh
Можешь скинуть эту картинку???

Код На Картинке http://pic.ipicture.ru/uploads/090221/btLD7vvhmW.jpg Сама Картинка http://pic.ipicture.ru/uploads/090221/apHU61WF6w.jpg

Yoldosh
Ты меня наверное не понял мне нужна та картинка которую ты используешь в своем проекте!!!

Добавлено:
Такой вопрос можно ли изменить имена файлов таких как setup-1.bin,setup-2.bin и т.д. допустим на свои data-a.bin,data-b.bin и т.д.?????

skeptik_vdm Вот Большая Картинка http://pic.ipicture.ru/uploads/090221/sARR351udM.jpg
Вот Маленькая Картинка http://pic.ipicture.ru/uploads/090221/Pjnse7awCq.jpg

Цитата:

Такой вопрос можно ли изменить имена файлов таких как setup-1.bin,setup-2.bin и т.д. допустим на свои data-a.bin,data-b.bin и т.д.?????

Только правкой сорцев. А зачем?

Yoldosh
Спасибо большое!!!

Цитата:

Только правкой сорцев. А зачем?

А что это такое "сорцев"???

skeptik_vdm
Цитата:

А что это такое "сорцев"???

src - исходный код программы (исходники).

Unc1e

Цитата:

src - исходный код программы (исходники).

А где это можно посмотреть и если что исправить. И если я правильно понимаю то все это правиться в Setup.e32???

skeptik_vdm, можно конечно поковырять setup.e32 hex-редактором, но лучше все же править сорцы.

Unc1e

Цитата:

можно конечно поковырять setup.e32 hex-редактором, но лучше все же править сорцы.

Я скачал а что с этим делать????

skeptik_vdm

жешь Мне кажется, лучше тебе забить на это.

Sig666
Ну объясните что с этим делать???

Цитата:

Ну объясните что с этим делать???

Без знания языка - ничего