Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.05.20;
Скачать: [xml.tar.bz2];

Вниз

Запрет на перетаскивание   Найти похожие ветки 

 
VJar   (2002-05-07 14:15) [0]

Как запретить перетаскивать форму по экрану???
Как запретить пункт "Переместить", который вызывается
щелкнув правой клавишей мыши по заголовку окна???


 
MBo   (2002-05-07 14:21) [1]

WM_WINDOWPOSCHANGING обрабатывать


 
Song   (2002-05-07 14:29) [2]

DeleteMenu()


 
JC   (2002-05-07 15:14) [3]

В [Форма].OnResize пиши Left:=[Значение], Top:=[Значение].


 
VJar   (2002-05-08 01:39) [4]

Я не спей, а только учусь. Может кто-то поконкретней напишет???


 
SoftOne   (2002-05-08 02:48) [5]

Конкретнее MBo © (07.05.02 14:21)
быть не может.


 
MBo   (2002-05-08 07:04) [6]

Варианты
1)
TForm1 = class(TForm)
private
procedure WMWINDOWPOSCHANGING(var msg: TWMWINDOWPOSCHANGING);
message WM_WINDOWPOSCHANGING;

procedure TForm1.WMWINDOWPOSCHANGING(var msg: TWMWINDOWPOSCHANGING);
begin
msg.WindowPos^.flags:=msg.WindowPos^.flags or SWP_NOMOVE ;
end;

но это не очень хорошо работает- рамка двигается

2)
private
procedure WMNCHitTest(var M:TMessage); message WM_NCHITTEST;

procedure TForm1.WMNCHitTest(var M:TMessage);
begin
inherited;
if M.Result=2 then M.Result:=0;
end;

3)
private
procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND;

procedure TForm1.WMSysCommand(var Msg: TWMSysCommand);
begin
if (Msg.CmdType and $FFF0)=SC_MOVE then
Msg.Result := 0
else
inherited;
end;


 
Anatoly Podgoretsky   (2002-05-08 21:23) [7]

SoftOne © (08.05.02 02:48)
Ни фига, не только MBo © (07.05.02 14:21), но и Song © (07.05.02 14:29), у него же два вопроса.



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

Форум: "Основная";
Текущий архив: 2002.05.20;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.006 c
1-64650
Filat
2002-05-08 13:16
2002.05.20
Анализ и структуризация и накопление инфы из log-файлов.


3-64546
Novak
2002-04-24 12:02
2002.05.20
Интересно, просто очень интересно.


3-64480
UnShaved
2002-04-22 16:08
2002.05.20
Отслеживание действий с записями БД (log)


1-64617
Phil
2002-05-05 10:43
2002.05.20
Помогите!!! Надо посчитать интеграл!!! Диплом горит!!!


4-64873
matthew_v
2002-03-18 13:01
2002.05.20
Чтение и разбор spool-файла.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский