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

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

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

Нажатие Enter

delphino © (2007-08-14 04:08:00)
Как при нажатии Enter сгенерировать нажатие кнопки.
if key = ord(13) then Button1.Click - так не работает (обработчик OnKeyDown)

{RASkov} (2007-08-14 09:34:00) [1]
> Похоже, что "а" и "то" - здесь лишние.

:) Ну да.... т.е. лишнее начало сообщения.... не проснулся еще) т.е. у TButton'а его(Kind) - нет.... сорри :)

Leonid Troyanovsky (2007-08-14 09:30:00) [2]

> {RASkov} © (14.08.07 08:35) [10]

> Могу добавить, что у кнопки есть свойство Kind, которое
> разом выставляет такие свойства, как Default, Escape, Caption,
> ModalResult...
> А если это TBitBtn - то

Похоже, что "а" и "то" - здесь лишние.

--
Regards, LVT.

{RASkov} (2007-08-14 08:35:00) [3]
> Выставьте кнопке OK свойство Default, кнопке Cancel свойство
> Escape и обеим кнопкам свойство ModalResult.

Могу добавить, что у кнопки есть свойство Kind, которое разом выставляет такие свойства, как Default, Escape, Caption, ModalResult...
А если это TBitBtn - то еще и картинку(Glyph)......

delphino (2007-08-14 07:31:00) [4]
Удалено модератором
Примечание: Дубль

delphino (2007-08-14 07:30:00) [5]

> Мисс, если Вы не читаете ответов, то зачем Вы задаете вопросы?

Инет тупит, не успела ответить:)

delphino (2007-08-14 07:29:00) [6]

>
> Выставьте кнопке OK свойство Default, кнопке Cancel свойство
> Escape и обеим кнопкам свойство ModalResult.
>
> И все. Ни строчки кода.

Здорово! Спасибо!

Юрий Зотов (2007-08-14 07:28:00) [7]
Ord(13) - оригинально...
:о)

Мисс, если Вы не читаете ответов, то зачем Вы задаете вопросы?

delphino (2007-08-14 07:25:00) [8]
единственное delphi ругается на это выражение

> if key = ord(13) then

"Comparing signed and unsigned types - widened both operands" - не пойму почему?

Юрий Зотов (2007-08-14 07:23:00) [9]
> delphino (14.08.07 07:09) [2]

Выставьте кнопке OK свойство Default, кнопке Cancel свойство Escape и обеим кнопкам свойство ModalResult.

И все. Ни строчки кода.

delphino (2007-08-14 07:12:00) [10]
разобралась...:-)
я вставила код if key = ord(13) then Button1.Click для всей формы, а надо было для поля..

delphino (2007-08-14 07:09:00) [11]

> Если фокус на кнопке, она сама нажмется

Это понятно, но я хочу, чтобы пользователь входил в программу по нажатию enter после ввода логина и пароля

MBo (2007-08-14 06:42:00) [12]
Если фокус на кнопке, она сама нажмется

Наверх

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