Тааак.... список непонятных моментов в Дельфи начинает расти

← →
vecna © (2005-10-19 12:41) [0]

с угрожающей быстротой... =)
Объясните (лучше линком на документацию) почему неполучается установить у формы Height > 876.

← →
DiamondShark © (2005-10-19 12:44) [1]

У меня получается.

← →
Sandman29 (2005-10-19 12:46) [2]

Не совсем так.
Я работаю в 800x600, при попытке указать Height 876 получается 612.

← →
vecna © (2005-10-19 12:46) [3]

да, я уже разобрался.... это какой-то коварный design-пакет =))))))))
спасибо

← →
vecna © (2005-10-19 12:47) [4]

> Sandman29 (19.10.05 12:46) [2]
значит не разобрался =)

2 DiamondShark
при каком разрешении какую высоту?

← →
DiamondShark © (2005-10-19 13:11) [5]

> 2 DiamondShark
> при каком разрешении какую высоту?

1280х1024

При присваивании Height := 2000 получается 1036.

Хм... Однако...

А нет ли связи этого с тем, что канвас (или как там оно зовется) формы (и не только формы) имеет ограниченный размер? А то попытка задать TBitmap.Width(Height) порядка 3000 вызывает ошибку вроде как "Не хватает памяти"...

афаик, виндовс сам не дает устанавливать размеры окон больше, чем разрешение главного монитора + некие (небольшие) константы....

> А нет ли связи этого с тем, что канвас (или как там оно
> зовется) формы (и не только формы) имеет ограниченный размер?
> А то попытка задать TBitmap.Width(Height) порядка 3000
> вызывает ошибку вроде как "Не хватает памяти"...

HandleType у битмапа какой?.... поскольку для каждого типа используются свои функции API...

private { Private declarations } procedure WMGETMINMAXINFO(var m:TWMGETMINMAXINFO);message WM_GETMINMAXINFO; procedure TForm1.Button1Click(Sender: TObject); begin Height:=2000; Width:=2000; Caption:=Format("W=%d H=%d",[Width,Height]); end; procedure TForm1.WMGETMINMAXINFO(var m: TWMGETMINMAXINFO); begin inherited; m.MinMaxInfo^.ptMaxTrackSize:=Point(3000,3000); ///try to remove line above end;

Тааак.... список непонятных моментов в Дельфи начинает расти Найти похожие ветки