Логин: Пароль:    Регистрация Всеми возможностями сайта можно пользоваться
только после авторизации.
   Забыли пароль?
Поиск
L


Статистика
u
Пользователи онлайн: нет
Гостей онлайн: 5
Всего онлайн: 5
Зарегистрировано юзеров: 5683
Комментариев на сайте: 619
Новый юзер: `Alinka1997



Последние комментарии
c
baxodir прокомментировал "Урок 23 - Функции для работы с мышью":
Но Это мало можно ещё больше
pronin106 прокомментировал "Урок 27 - Создаем игру Ping-pong - часть(2/3)":
Все получилось! Спасибо за урок. У кого не получилось читайте внимательнее! Не делайте тупо копипаст



Мы в соцсетях
c
Delphi
Запрет на закрытие формы

  Чтобы запретить пользователю закрывать форму обычным способом (нажатием на крестик), используйте этот код:

procedure TForm3.FormCreate(Sender: TObject);
Var
SysMenu: HMenu;
begin
SysMenu:=GetSystemMenu(Handle,False);
Windows.EnableMenuItem(SysMenu,SC_CLOSE,MF_DISABLED Or MF_GRAYED);
end;

Вот и всё, Удачи!

Источник: www.thedelphi.ru
Автор: Савельев Александр
Опубликовано: 09 Июля 2012
Просмотров: 99117


Зарегистрируйтесь или авторизуйтесь, чтобы добавлять комментарии.



аватар Добавил: Denismen [Новичок] Дата: 2014-01-25
Этот сайт суперррр




аватар Добавил(а): ThunderLord [Новичок] Дата: 2014-04-14
А нельзя было так?: procedure TForm1.FormClose(Sender: TObject); begin Action:= caNone; end;