[Йогурт]

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

Заранее спасибо!

[Ferra]

Код:

1	button1.Default := true;

или в коде или в инспекторе объектов

[Йогурт]

В событие онкейпрес писать это?

[Ferra]

нет, при показе формы. или лучше установи у кнопки это свойство в инспекторе объектов (свойство компонента)

[Йогурт]

Default на него ошибка! Кнопка SpeedButton1 на нёё пробую!

[Ferra]

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

или (любой из указанных способов подойдёт):

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

... 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;

[Йогурт]

Вообщем на Спидбатоне не работает ваш код =)

[Йогурт]

FeyPreview:=true; куда это писать?

[Ferra]

в свойствах формы выставить, или при её показе.
А код будет работать только если форма отловит это сообщение. К примеру если фокус стоит на кнопке "Отмена", то при нажатии энтера будет выполнен код, закреплённый за нажатием кнопки "Отмена". Если же фокус будет на Edit, то нажатие энтера будет обработано формой.

[Йогурт]

Я ничего не понимаю! Попросил пример на кнопке Спидбатон, что и как сделать чтобы кнопка эта нажималась! Прописываю на форме в событии онкейпрес этот код

PHP код:

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
KeyPreview:=true;
if Ord(Key) = 13 then ShowMessage('Enter pressed!');
end; 


Ничего не пашет, можно подробнее?

[Йогурт]

Нет ответа на этот вопрос?)

И нужного фокуса на спидбатоне нет для события если что!

[Ferra]

Есть ответ на этот вопрос. Только я тут не круглосуточно сижу.

ты внимательно читай что я тебе пишу. Тогда и всё работать будет. Сегодня утром вышлю готовый исходник, а сейчас с телефона я ничего писать не буду

[Ferra]

вот пример