Выход из программы при нажатии кнопки или клавиши

@Vladimir1988 · Регистрация: 20.11.2009

Author24 — интернет-сервис помощи студентам

Подскажите пожалуйста, как сделать так чтобы при нажатии кнопки программа закрывалась, чтобы каждый раз не нажимать Programm reset

@Mixer FM · 21.01.2010, 10:28

Сообщение от Vladimir1988

Подскажите пожалуйста, как сделать так чтобы при нажатии кнопки программа закрывалась, чтобы каждый раз не нажимать Programm reset

Для главной формы пишишь

Delphi

procedure TForm1.Button1Click(Sender: TObject);
begin
Form1.close;
end;
 
end.

deathNC · 21.01.2010, 10:36

а ещё лучше печатай в кнопке такой код:

Delphi

Halt;

@NemiroFFyo · 21.01.2010, 10:40

Mixer FM, то, что вы написали это закрытие формы, а не проекта, поэтому не всегда срабатывает если Form1 не является "главной"

Delphi

procedure TForm1.Button1Click(Sender: TObject);
begin
Application.Terminate;
end;
end.

@Андрей Борисови · 21.01.2010, 10:40

Сообщение от deathNC

а ещё лучше печатай в кнопке такой код:
Код Delphi1 Halt;

Windows 7 сказал что я плохой и недолжен больше так завршать программу

а на close не ругается

deathNC · 21.01.2010, 10:45

Сообщение от Андрей Борисови

Windows 7 сказал что я плохой и недолжен больше так завршать программу

а на close не ругается

сколько систем за жизнь Delphi повидал, не раз такого не видел... И семёрка обновлённая (Windows Seven Максимальная) не раз подобного не выдавала...

может, вы допустили в слове из четырёх букв ошибку?

Close, для не посвящённых, тоже выходит ИЗ ФОРМЫ, А НЕ ИЗ ПРОЕКТА!!!

@~~Inna Vashchuk~~ · 24.09.2014, 00:33

А как запрограммировать закрытие формы при нажатии клавиши F10?

@ZfoxAK · 24.09.2014, 07:14

расположите на форме MainMenu1
создайте элемент и назовите "Выход" - это делается в свойстве Caption данного элемента
В испекторе объектов для этого элемента необходимо установить в свойстве ShortCut - F10
На форме нажмите на элемент в менюшке тем самым создатся процедура для обработки события.
В теле процедуры напишите

Delphi

1	Form1.close;

@droider · 26.09.2014, 08:55

Сообщение от Inna Vashchuk

запрограммировать закрытие формы при нажатии клавиши F10

Сообщение от ZfoxAK

расположите на форме MainMenu1

зачем прикручивать сюда меню? Можно и без него, сразу обрабатывать нажатие функциональной клавиши

Delphi

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if Key =VK_F10 then Form1.Close;
end;
end.

Inna Vashchuk, если под закрытием формы подразумевается закрытие всей программы, то лучше написать так

Delphi

1	if Key =VK_F10 then Application.Terminate;

@ZfoxAK · 26.09.2014, 09:20

Сообщение от droider

зачем прикручивать сюда меню? Можно и без него, сразу обрабатывать нажатие функциональной клавиши

Проверил бы для начала код. Если на форме есть еще парочка компонет, то это событие просто так не сработает... И у ТС-а сразу возникнет еще вопрос.

Delphi

1	Form1.KeyPreview:=true;

Тогда сработает. И через меню прикольней...

@droider · 26.09.2014, 10:46

Сообщение от ZfoxAK

Проверил бы для начала код

Я проверил как раз-таки, выставив предварительно KeyPreview - это у меня правило

Все работало без проблем.

Сообщение от ZfoxAK

через меню прикольней

тебе возможно, но ТС вряд ли

Добавлено через 1 минуту

Сообщение от ZfoxAK

у ТС-а сразу возникнет еще вопрос

надо тогда рассмотреть свойства формы.

@ZfoxAK · 26.09.2014, 11:10

Не по теме:

Сообщение от droider

надо тогда рассмотреть свойства формы.

Тот кто не знает, как форму закрыть. Тому зависимость не срабатывания процедур Form1KeyDown и т.д. .... от свойств формы - не совсем очевидна )). Скорее всего совсем не очевидна

Новые блоги и статьи Все статьи Все блоги /
Почему могут не шифроваться русские символы в Java Wired 17.02.2025 При разработке на Java нередко возникают сложности с шифрованием русских символов. Эта проблема особенно актуальна для разработчиков, создающих программное обеспечение для русскоязычной аудитории. . . .	Отличия ОС для x86_64 и ARM Wired 17.02.2025 На данный момент сосуществуют две основные архитектуры процессоров - x86_64 и ARM. Эти архитектуры имеют принципиально разные подходы к организации вычислений и обработке данных, что накладывает. . .	Многопоточность в Python: как использовать Thread bytestream 17.02.2025 Поток выполнения (thread) - это наименьшая последовательность инструкций, которая может управляться планировщиком операционной системы. Представьте себе, что ваша программа - это книга, а потоки -. . .	Как воспроизвести Race Condition в Python bytestream 17.02.2025 В многопоточном программировании существует множество подводных камней, и одним из самых коварных является состояние гонки (Race Condition). Этот термин описывает ситуацию, когда результат выполнения. . .	Ошибка "node: --openssl-legacy-provider is not allowed in NODE_OPTIONS" bytestream 17.02.2025 Каждый разработчик рано или поздно сталкивается с ситуацией, когда при запуске проекта Node. js неожиданно выскакивает ошибка "node: --openssl-legacy-provider is not allowed in NODE_OPTIONS". Это. . .
Ошибка pip Python "AttributeError: module 'lib' has no attribute 'OpenSSL_add_all_algorithms'" bytestream 17.02.2025 При разработке на Python частенько сталкиваешься с разными сюрпризами, но ошибка AttributeError: module 'lib' has no attribute 'OpenSSL_add_all_algorithms' - это что-то особенное. Знаете, это как. . .	Сообщение Play Store "You must complete the advertising ID declaration before you can release an app that targets" bytestream 17.02.2025 Рекламный идентификатор - это уникальный, но восстанавливаемый строковый идентификатор для каждого устройства Android. Думаю, вы удивитесь, но даже если ваше приложение не показывает рекламу. . .	Отличия App Router от Pages Router в Next.js bytestream 17.02.2025 Next. js прошел длинный путь развития, и одним из самых значительных изменений стало появление App Router - революционного подхода к организации маршрутизации в приложении. Этот новый способ пришел на. . .	Топ10 лучших фреймворков JavaScript для изучения в 2025 bytestream 16.02.2025 В современной веб-разработке JavaScript занимает особое место, являясь одним из наиболее востребованных языков программирования. По мере развития веб-технологий появляется все больше фреймворков,. . .	Temporal в JavaScript - новый формат даты и времени bytestream 16.02.2025 В мире JavaScript скоро произойдет значимое событие - появление нового встроенного объекта Temporal, который призван полностью заменить устаревший объект Date. Это революционное изменение в работе с. . .

@Vladimir1988 0 / 0 / 1 Регистрация: 20.11.2009 Сообщений: 18
		1
	Выход из программы при нажатии кнопки или клавиши 21.01.2010, 10:25. Показов 48410. Ответов 11 Метки нет (Все метки) Подскажите пожалуйста, как сделать так чтобы при нажатии кнопки программа закрывалась, чтобы каждый раз не нажимать Programm reset 0

@Андрей Борисови 714 / 402 / 33 Регистрация: 04.10.2009 Сообщений: 1,686
	21.01.2010, 10:40	5
	Сообщение от deathNC а ещё лучше печатай в кнопке такой код: Код Delphi1 Halt; Windows 7 сказал что я плохой и недолжен больше так завршать программу а на close не ругается 1

deathNC 1905 / 1016 / 123 Регистрация: 08.12.2009 Сообщений: 2,792 Записей в блоге: 2
	21.01.2010, 10:45	6
	Сообщение от Андрей Борисови Windows 7 сказал что я плохой и недолжен больше так завршать программу а на close не ругается сколько систем за жизнь Delphi повидал, не раз такого не видел... И семёрка обновлённая (Windows Seven Максимальная) не раз подобного не выдавала... может, вы допустили в слове из четырёх букв ошибку? Close, для не посвящённых, тоже выходит ИЗ ФОРМЫ, А НЕ ИЗ ПРОЕКТА!!! 1

@~~Inna Vashchuk~~ Заблокирован
	24.09.2014, 00:33	7
	А как запрограммировать закрытие формы при нажатии клавиши F10? 0

@droider 4918 / 2786 / 855 Регистрация: 04.10.2012 Сообщений: 10,155
	26.09.2014, 10:46	11
	Сообщение от ZfoxAK Проверил бы для начала код Я проверил как раз-таки, выставив предварительно KeyPreview - это у меня правило Все работало без проблем. Сообщение от ZfoxAK через меню прикольней тебе возможно, но ТС вряд ли Добавлено через 1 минуту Сообщение от ZfoxAK у ТС-а сразу возникнет еще вопрос надо тогда рассмотреть свойства формы. 0

@ZfoxAK
	26.09.2014, 11:10 Выход из программы при нажатии кнопки или клавиши #12
	Не по теме: Сообщение от droider надо тогда рассмотреть свойства формы. Тот кто не знает, как форму закрыть. Тому зависимость не срабатывания процедур Form1KeyDown и т.д. .... от свойств формы - не совсем очевидна )). Скорее всего совсем не очевидна 0

	21.01.2010, 10:25