Форум: "Основная";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];
ВнизКак убрать возможность Resize окна ? Найти похожие ветки
← →
sunwheel (2002-01-11 10:26) [4]Самый надежный способ перехватывать WM_GETMINMAXINFO
private
{ Private declarations }
procedure WMGetMinMaxInfo(var Message : TMessage); message WM_GETMINMAXINFO;
...
procedure TForm.WMGetMinMaxInfo(var Message: TMessage);
type
PTMinMaxInfo = ^TMinMaxInfo;
begin
with PTMinMaxInfo(Message.LParam)^.ptMinTrackSize
do begin
x := 480;
y := 330;
end;
inherited;
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.004 c