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

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

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

Как заблокировать крестик форма

DelphiLexx © (2007-05-25 09:44:00)
У каждой формы в правом верхнем углу есть крестик. Как его на время заблокировать.

Ryan_xy (2007-06-18 08:08:00) [1]
<a href= ></a> *

(2007-06-01 03:50:00) [2]
Удалено модератором

SpellCaster (2007-05-28 10:41:00) [3]
procedure Tfrm.BtnDisCloseClick(Sender: TObject);
var Sysmenu:HMenu;
begin
SysMenu:=GetSystemMenu(handle,false);
Windows.EnableMenuItem(Sysmenu,
SC_CLOSE, MF_DISABLED or MF_GRAYED);
BtnDisClose.Enabled:=false;
BtnEnClose.Enabled:=true;
end;

procedure Tfrm.BtnEnCloseClick(Sender: TObject);
begin
BtnDisClose.Enabled:=true;
BtnEnClose.Enabled:=false;
GetSystemMenu(Handle,true);
Perform(WM_NCPAINT,Handle,0);
end;

Юрий Зотов (2007-05-27 14:58:00) [4]
OnCloseQuery?

Garacio (2007-05-25 10:07:00) [5]
Или ещё проще!!!

http://sources.codenet.ru/download/1343/pformhack.html

Johnmen (2007-05-25 10:06:00) [6]

> Anatoly Podgoretsky © (25.05.07 10:00) [2]
> И еще одна сотня методов

Во-во...:)

Garacio (2007-05-25 10:05:00) [7]
http://www.programmersforum.ru/archive/index.php/t-3506.html

Anatoly Podgoretsky (2007-05-25 10:00:00) [8]
> Johnmen (25.05.2007 09:57:01) [1]

И еще одна сотня методов

Johnmen (2007-05-25 09:57:00) [9]
А смысл? Продвинутый юзер нажмет Alt-F4.

http://sql.ru/forum/actualthread.aspx?tid=433208

Наверх

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