| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

дочернее окно [D7, WinXP]

npr2 ©   (2006-02-21 08:55:00) 

Можно ли как-то запретить пользователю передвигать дочернее окно,

---

npr2   (2006-02-22 07:16:00) [1]

Большое спасибо за ответ

---

tesseract   (2006-02-21 10:47:00) [2]

Если vcl то BorderStyle=bsNone

---

BiN   (2006-02-21 10:27:00) [3]

unit Unit1;

interface

uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
 Dialogs;

type
 TForm1 = class(TForm)
 private
   { Private declarations }
   procedure WMMoving(var Msg: TWMMoving); message WM_MOVING;
 public
   { Public declarations }
 end;

var
 Form1: TForm1;

implementation

{$R *.dfm}

{ TForm1 }

procedure TForm1.WMMoving(var Msg: TWMMoving);
begin
 Msg.DragRect.Left:=Left;
 Msg.DragRect.Top:=Top;
 Msg.DragRect.Right:=Left+Width;
 Msg.DragRect.Bottom:=Top+Height;
end;

end.

---

Наверх