del

vint56

Ветеран
Проверенный
Rexar, тогда придется писать весь установщик с нуля форму лейбалы и все остальное для тебя проще изменить уже готовый под свой нужды
 

ZVSRus

Участник
Rexar Как изменить цвет инсталлятора? Полностью серым хочу сделать. И как сделать исталлятор, с прямыми углами, а то на 7ёрке он с округленными углами.
Код:
[Setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}\My Application

[Code]
procedure InitializeWizard();
begin
with WizardForm do
begin
BorderStyle := bsToolWindow;
end;

with WizardForm.WelcomePage do
begin
Color := clBtnFace;
end;

with WizardForm.MainPanel do
begin
Color := clBtnFace;
end;

with WizardForm.FinishedPage do
begin
Color := clBtnFace;
end;
end;
 

ZVSRus

Участник
Rexar
Если вы откроете персонализацию то увидите что как выглядит на том или ином стиле системы.
На классическом все углы острые, кнопка свернуть скрыта.
На упрощённом стиле сверху углы скруглены, снизу острые.
На стиле Aero все углы скруглены. Это не прикол Windows 7, а стили системы.
Если вы хотите сделать установщик с острыми углами, серого цвета и т.д. и т.п., то не факт что у другого пользователя будет выглядеть как у вас.
 

ZVSRus

Участник
Rexar
Создай установщик своим стандартным методом, и по экспериментируй со стилями системы.
На классическом стиле системы углы будут острые со всеми кнопками.
PS: Не совсем ясна сия затея
 

Avengerz13

Участник
Та главное что бы я его таким видел
Установить Windows 8, 8.1, 10.
как мне оставить с острыми углами и что бы была кнопка свернуть?
Установить Windows 8, 8.1, 10.
Класический вид виндовс
Установить Windows 95, 98, 2000 или сменить тему оформления на "Класический" ведь главное это
главное что бы я его таким видел
и нет кнопки свернуть!
Все параметры которые поддерживает "Windows Forms" - bsNone, bsSingle, bsSizeable, bsDialog, bsToolWindow, bsSizeToolWin.


это не "Класический" вид.
 

Avengerz13

Участник
причём тут винда,не пишите бред!
Вы определитесь.
главное что бы я его таким видел
Просто идет противоречие.
Мне нужен инсталлятор,который будет с прямыми углами,в независимости от винды!
Например попробовать использовать библиотеку IsClassic.
Теперь понятно?Класический вид виндовс и нет кнопки свернуть!
Такое не возможно сделать штатно.
 

nik1967

Old Men
Проверенный
Код:
[Setup]
AppName=My Program
AppVerName=My Program v 1.5
DefaultDirName={pf}\My Program
OutputDir=.

[Languages]
Name: RUS; MessagesFile: "compiler:Languages\Russian.isl"

[Code]
function InitializeUninstall:boolean;
var
  rcode: Integer;
begin
  Result:= False;
    if not UninstallSilent then begin
        Exec(ExpandConstant('{uninstallexe}'), '/SILENT', '', SW_SHOW, ewNoWait, RCode);
        Exit;
    end;
    if MsgBox('Удалить программу?', mbConfirmation, MB_YESNO) = IDYES then
    Result:= True;
end;
 
Последнее редактирование:

nik1967

Old Men
Проверенный
это в коде косяк
А что в таком простейшем коде может косячить? Сам подумай. Тут либо у тебя система не даёт удалить, либо ты используешь данный пример в составе своего кода, вот в котором то и есть косяк.
 

ZVSRus

Участник
Rexar. Проверил ваш выложенный код на Inno Setup Ultra 5.5.1 ANSI все работает на ура. Не надо в чем то винить nik1967. Если у вас версия стандартная, это не повод указывать у кого какие руки.
 

ZVSRus

Участник
nik1967, не за что!
Просто противно читать когда поливают грязью людей, у которых ответы (подсказки) вразумительные и по уму! Для меня таких людей как вы (на данном форуме, на OSZone и на RU-Board'e) можно по пальцам одной руки сосчитать!
Не обращайте внимания просто у человека агония.
 
Сверху