Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Свойство формы

Игорь_ © (2004-07-21 15:53:00)
Подскажите новичку свойство окна и его значение для работающей программы, которое позволит перемещать окно при работе программы

Игорь_ (2004-07-21 17:56:00) [1]
Для Ega23 Вопрос был задан: "... которое ПОЗВОЛИТ ПЕРЕМЕЩАТЬ окно при работе программы ..." так он был задан в учебном пособии. Теперь понимаю - что вопрос поставлен неправильно.Спасибо

Игорь_ (2004-07-21 17:52:00) [2]
Ха полдня мучился. Спасибо grom.

Ega23 (2004-07-21 17:51:00) [3]
Вопрос был задан: "... которое ПОЗВОЛИТ ПЕРЕМЕЩАТЬ окно при работе программы ..."

bsNone подойдёт?

grom (2004-07-21 17:49:00) [4]
Align:=alCustom;

Игорь_ (2004-07-21 17:44:00) [5]
Для Ega23. К сожалению свойство TForm.BorderStyle =bsSingle
Отключает только возможность изменения размеров формы, а не отключает возможность перемещения ее по экрану.
Для clickmaker - мне нужно свойство, а не процедура.

Игорь_ (2004-07-21 16:16:00) [6]
Спасибо всем. Буду разбираться.

clickmaker (2004-07-21 16:08:00) [7]
type
TYourForm
procedure WMNCHitTest(var Message: TMessage); message WM_NCHITTEST;
FAllowMove: boolean;

...

procedure TYourForm.WMNCHitTest(var Message: TMessage);
begin
Message.Result := DefWindowProc(Handle, Message.Msg, Message.WParam, Message.LParam);
if (Message.Result = HTCAPTION) and (not FAllowMove) then
Message.Result := HTCLIENT
end;

Ega23 (2004-07-21 16:02:00) [8]
Понял. Это
TForm.BorderStyle
Почитай про все стили.

Игорь_ (2004-07-21 15:59:00) [9]
свойство разрешающее/запрещающее перетаскивать мышкой окно работающей формы

DK (2004-07-21 15:57:00) [10]
Left и Top

Ega23 (2004-07-21 15:55:00) [11]
??? Изложи по-понятнее.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »