Создать форму

[trutre]

При нажатии "Файл/Создать форму" создается форма со Свойствами Height = 320; Widht = 240. Какие и в каком файле надо подкрутить настройки, чтоб создаваемая форма по умолчанию имела иные размеры?
Lazarus 1.2.0

[Little_Roo]

А какой в этом религиозный смысл????

[trutre]

А какой в этом религиозный смысл????

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

[stanilar]

Не знаю как в Lazarus, но в Delphi можно было создать форму из репозитория. Может и тут такое есть.

[Лекс Айрин]

trutre, если уж Вам так трудно растягивать, то воспользуйтесь Инспектором Объектов и выставьте ширину и высоту окна там. Lazarus, знаете ли, не может знать какие именно вам Настройки предпочтительны. А так как среда может быть запущена на устройстве с малым разрешением, то на это, имхо, и приходится опираться разработчикам.

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

Откройте Lazarus как проект и подредактируйте процедуру создания формы. Лично мне проще растянуть мышкой.

[trutre]

Откройте Lazarus как проект и подредактируйте процедуру создания формы. Лично мне проще растянуть мышкой.

И где найти эту процедуру создания формы?

[Лекс Айрин]

trutre, В исходниках Lazarusa, естественно. Если честно, то влом искать.

[Frolik]

customform.inc

Код: Выделить всё

class function TCustomForm.GetControlClassDefaultSize: TSize;
begin
  Result.CX := 320;
  Result.CY := 240;
end;

Ставим нужные размеры, пересобираем и будет вам счастье.

[trutre]

customform.inc

Код: Выделить всё

class function TCustomForm.GetControlClassDefaultSize: TSize;
begin
  Result.CX := 320;
  Result.CY := 240;
end;

Ставим нужные размеры, пересобираем и будет вам счастье.

Спасибо!