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

Delphi Sources



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

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 23.12.2009, 20:04
Йогурт Йогурт вне форума
Начинающий
 
Регистрация: 20.11.2009
Сообщения: 109
Репутация: 5
По умолчанию Кнопка Enter

Здравствуйте! Вопрос: Есть авторизация программы, Логин и пароль и кнопка войти! Вот чтобы не тыкать постоянно мышкой на Войти как прописать это на кнопку Enter? Чтобы при нажатии на Enter нажимался Button?

Заранее спасибо!
Ответить с цитированием
  #2  
Старый 23.12.2009, 20:15
Аватар для Ferra
Ferra Ferra вне форума
Местный
 
Регистрация: 12.03.2006
Адрес: Минск
Сообщения: 527
Репутация: 1336
По умолчанию

Код:
button1.Default := true;

или в коде или в инспекторе объектов
__________________
Нет повести печальнее на свете, чем повесть о заклиневшем Resete.
Ответить с цитированием
  #3  
Старый 23.12.2009, 20:21
Йогурт Йогурт вне форума
Начинающий
 
Регистрация: 20.11.2009
Сообщения: 109
Репутация: 5
По умолчанию

В событие онкейпрес писать это?
Ответить с цитированием
  #4  
Старый 23.12.2009, 20:22
Аватар для Ferra
Ferra Ferra вне форума
Местный
 
Регистрация: 12.03.2006
Адрес: Минск
Сообщения: 527
Репутация: 1336
По умолчанию

нет, при показе формы. или лучше установи у кнопки это свойство в инспекторе объектов (свойство компонента)
__________________
Нет повести печальнее на свете, чем повесть о заклиневшем Resete.
Ответить с цитированием
  #5  
Старый 23.12.2009, 20:25
Йогурт Йогурт вне форума
Начинающий
 
Регистрация: 20.11.2009
Сообщения: 109
Репутация: 5
По умолчанию

Default на него ошибка! Кнопка SpeedButton1 на нёё пробую!
Ответить с цитированием
  #6  
Старый 23.12.2009, 20:34
Аватар для Ferra
Ferra Ferra вне форума
Местный
 
Регистрация: 12.03.2006
Адрес: Минск
Сообщения: 527
Репутация: 1336
По умолчанию

ну уточнить надо было. Свойство default есть у TButton & TBitBtn. Может просто поставь другую кнопку?

или (любой из указанных способов подойдёт):
Код:
...
Form1.FeyPreview:=true;
...

//первый
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
 if Key = VK_Return then ShowMessage('Enter pressed!');
end;

//второй
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
  if Ord(Key) = 13 then ShowMessage('Enter pressed!');
end;
__________________
Нет повести печальнее на свете, чем повесть о заклиневшем Resete.
Ответить с цитированием
Ответ


Delphi Sources

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

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

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

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


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


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

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