Вниз
Скачать: CL | DM;

дочернее окно   Найти похожие ветки 

← →
npr2   (2006-02-21 08:55) [0]

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


← →
BiN ©   (2006-02-21 10:27) [1]

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.


← →
tesseract ©   (2006-02-21 10:47) [2]

Если vcl то BorderStyle=bsNone


← →
npr2   (2006-02-22 07:16) [3]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.034 c
2-1146039167
dera
2006-04-26 12:12
2006.05.14
Несоответсвие форматов дат?


2-1145774100
manevil
2006-04-23 10:35
2006.05.14
Прозрачная панель


2-1146066746
chai
2006-04-26 19:52
2006.05.14
Аналог IntToStr в Win API


15-1145038495
tesseract
2006-04-14 22:14
2006.05.14
ReactOS News - ReactOS is dead, Welcome to ReactOS !:


3-1142621927
Megabyte
2006-03-17 21:58
2006.05.14
Как мне узнать, есть ли у юзера права на данную роль




   Наверх