Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 31.01.2010, 22:07
Аватар для Тупой
Тупой Тупой вне форума
Прохожий
 
Регистрация: 03.11.2008
Сообщения: 22
Репутация: 10
По умолчанию Запрет на закрытие формы

Подскажите пожалуйста как сделать так, чтобы при нажатии на одну кнопку закрытие формы становилось невозможным никаким образом(даже на Alt+F4), и чтобы на другую кнопку форма снова могла закрыться.
Ответить с цитированием
  #2  
Старый 31.01.2010, 22:15
Аватар для Konrad
Konrad Konrad вне форума
Эксперт
 
Регистрация: 19.03.2009
Сообщения: 1,261
Репутация: 45834
По умолчанию

Цитата:
Сообщение от Тупой
Подскажите пожалуйста как сделать так, чтобы при нажатии на одну кнопку закрытие формы становилось невозможным никаким образом(даже на Alt+F4), и чтобы на другую кнопку форма снова могла закрыться.
Ну и зщачем это?
Для кого вы делаете программы?
Для пользователя, и именно у пользователя должна быть масса возможностей прервать работу программы или закрыть её. Иначе не человек управляет компом, а комп создает проблемы человеку.

Вот представь ситуацию:
пользователь случайно(а это происходит не так редко как может показаться неопытному программеру) запустил твою программу и не может закрыть?

Кстати, написать всякую хрень - не проблема, а вот написать действительно удобную, толкову, быструю и небольшую программу - под силу единицам.

Последний раз редактировалось Konrad, 31.01.2010 в 22:26.
Ответить с цитированием
  #3  
Старый 31.01.2010, 22:30
Аватар для Тупой
Тупой Тупой вне форума
Прохожий
 
Регистрация: 03.11.2008
Сообщения: 22
Репутация: 10
По умолчанию

Мне это надо при добавлении инфы в базы что после начала добавления пользователь не смог закрыть форму пока не введет все данные.
Ответить с цитированием
  #4  
Старый 31.01.2010, 22:45
Аватар для Konrad
Konrad Konrad вне форума
Эксперт
 
Регистрация: 19.03.2009
Сообщения: 1,261
Репутация: 45834
По умолчанию

Цитата:
Сообщение от Тупой
Мне это надо при добавлении инфы в базы что после начала добавления пользователь не смог закрыть форму пока не введет все данные.
А нельзя это сделать иначе?)
Например, просто, если пользователь нажмет кнопку "Добавить данные" и не введет все нужные данные, вывести ему сообщение "Не введены все данные". По крайней мере так делают во всех нормальных программах.
Ответить с цитированием
  #5  
Старый 31.01.2010, 23:24
Аватар для Тупой
Тупой Тупой вне форума
Прохожий
 
Регистрация: 03.11.2008
Сообщения: 22
Репутация: 10
По умолчанию

Нет нельзя так сделать. Мне влом описывать все ньюяансы, но мне нужно именно то что я прошу))
Ответить с цитированием
  #6  
Старый 31.01.2010, 23:35
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,097
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Код:
procedure TForm1.CloseQuery(var CanClose : Boolean);
begin
  CanClose := FAllowUserCloseForm; // флаг возможн. закрытия.
end;
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 02:34.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025