Проблема C инсталлятором во время увеличения шрифта в системе

[AtotIK]

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

Дело в том, что даже при 125% все элементы перекашиваются и выглядит это "не совсем".

Спойлер: 100%

Спойлер: 150%

 

[sergey3695]

ScaleX() - left, width.
ScaleY() - top, height.
SetBounds(ScaleX(),ScaleY(),ScaleX(),ScaleY());
В скобках соответственно координаты. Тогда и разъезжаться не будет.

 

[Edison007]

Ну тут два варианта:
1. Либо все координаты указывать, как писал выше sergey3695, через функции ScaleX/ScaleY. Тогда инсталл будет увеличиваться/уменьшаться вместе с изменением размера шрифта в системе.
2. Либо все координаты без ScaleX/ScaleY. Инсталл всегда будет одного и того же размера.

 

[Le9ent]

У меня похожая ситуация все так прописал как вы рекомендовали:

Спойлер: Кнопки, лейболы, полоса прокрутки - масштабируются:

with WizardForm.NextButton do begin
Left:=ScaleX(10);
Top:=ScaleY(565);
Width:=ScaleX(90);
Height:=ScaleY(25);
Parent:=WizardForm;
end;

Спойлер: Фоновое изображение не масштабируется:

var
Logo, Fon:TBitmapimage;

ExtractTemporaryFile('Fon.bmp');
WizardForm.Width:=ScaleX(600);
WizardForm.Height:=ScaleY(600);

Fon:=TBitmapImage.Create(WizardForm);
with Fon do begin
Left:=ScaleX(0);
Top:=ScaleY(0);
Width:=ScaleX(600);
Height:=ScaleY(600);
Parent:=WizardForm;
Bitmap.LoadFromFile(ExpandConstant('{tmp}\Fon.bmp'));
end;

Какие параметры можно добавить для изображения что бы фоновый рисунок масштабировался с остальными элементами?

 

[ReFLeXx]

roma_astafev,

Stretch := True;

 

[Le9ent]

reflexx.56, огромное спасибо вам. Хоть и смотрится не очень изображение после масштабирования, ну хотя бы растягивается.

 

[XLASER]

Проблема заключается вот в чём.

Удобство чтения с экрана 100%. Инсталлятор отображается нормально.

Удобство чтения с экрана 125% Инсталлятор отображается без кнопок установки и отмены + всё растянулось.

И удобство чтения с экрана 150% Инсталлятор отображается без кнопок установки и отмены + всё растянулось ещё больше.

Можно ли это как то исправить? Подскажите если кто знает.
Заранее благодарю!!!

 

[sergey3695]

XLASER,

  Left := ScaleX(тут значение);
  Top := ScaleY(тут значение);
  Width:= ScaleX(тут значение);
  Height := ScaleY(тут значение);

 

[XLASER]

sergey3695, По подробнее можно?

 

[sergey3695]

XLASER, координаты это, позиция объектов на форме. Подробней некуда

 

[XLASER]

sergey3695, А где это дописать? Что то не пойму!

 

[ExPlayer]

sergey3695, А где это дописать? Что то не пойму!

На примере скрипта от BlackBox:

MyCancelButton:=TButton.Create(WizardForm);
  with MyCancelButton do begin
    Parent:=WizardForm;
    Width:=ScaleX(150);
    Caption:='Выход';
    Left:=ScaleX(347);
    Height:=ScaleX(30);
    Left:=(480);
    Top:=WizardForm.cancelbutton.top;
    OnClick:=@CancelButtonOnClick;

 

[XLASER]

Наверное это всё не то.
Мне надо чтобы при Удобство чтения с экрана 125-150% было так же как Удобство чтения с экрана 100%.
Как на первом скрине

 

[Carlos]

Всё так и будет.

Только если значения стоят типа

Width:=150;
Caption:='Выход';
Left:=347;
Height:=30;
Left:=480;

надо заменить на

Width:=ScaleX(150);
Caption:='Выход';
Left:=ScaleY(347);
Height:=ScaleX(30);
Left:=ScaleY(480);

 

[XLASER]

Carlos, Да это всё по сути прописано в скрипте.

 

[Mailchik]

Это и есть решение проблемы для Inno.
Так же для картинок нужно изменить Stretch на True.

 

[Edison007]

Вариантов два:
1. Писать всё в относительных координатах, т.е с помощью функций ScaleX(x), ScaleY(y) + как выше написал Mailchik, для картинок нужно изменить Stretch на True.
2. Писать всё в абсолютных координатах, т.е все координаты без функций ScaleX(x), ScaleY(y).
Во втором случае еще придется размер шрифта заменить на высоту (TFont.Size -> TFont.Height).

В первом случае инсталл будет увеличиваться, во втором при любом увеличении - будет сохранять оригинальный размер.