Страница 1 из 1
нажатие "Enter" в поле Edit
Добавлено: 28 янв 2007, 08:05
Oleg_Rus
Здравтсвуйте все!
Допустим, у меня есть поле Edit в которое вводится пароль.
Задачи такая: при нажатии "Энтер" выполняются те же действия, что и при нажатии на кнопку. Как это реализовать?
Re: нажатие "Enter" в поле Edit
Добавлено: 28 янв 2007, 11:05
Duncon
Таки у Эдита есть эвент OnKeyDown
Таки и проверяешь если клавиша энтер делаешь свои действия..
Re: нажатие "Enter" в поле Edit
Добавлено: 28 янв 2007, 20:27
Сейчас_не_спящий
Вот тебе код, может понятнее будет:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Edit1: TEdit;
procedure Edit1KeyPress(Sender: TObject; var Key: Char);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then
ShowMessage('OK'); // вместо этой строки пишешь операции, которые
//должны происходить что и при нажати на кнопку.
end;
end.
Re: нажатие "Enter" в поле Edit
Добавлено: 28 янв 2007, 20:38
Сейчас_не_спящий
Когда начинал, у меня этот вопрос сразу перефразировался: как вызвать procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); <-- эту строчку я видел во многих тогда учебниках, НО НИ ОДИН, кроме "Программирование в Delphi" Архангельского не дал мне на это ответ, так что если у тебя возникнет анологичная проблема делай следкющее:
1. Ищешь окно Object TreeView
2. Выбираешь там свой Edit1
3. Ищешь окно Object Inspector
4. Открываешь вкладку Events
5. Находишь там OnKeyPress и нажимаешь по полю двойным щелчком.
Всё.
Всё, просто, но никто мне тогда не объяснил, пришлось пол часа искать самому=))
Re: нажатие "Enter" в поле Edit
Добавлено: 29 янв 2007, 02:25
Oleg_Rus
бальшое всем пасибо!
Не отходя далеко хочу спросить, можно ли по нажатии на кнопку перейти на Html-файл, и если да, то как?
Re: нажатие "Enter" в поле Edit
Добавлено: 29 янв 2007, 09:02
Duncon
Собственно это не по теме нужно создавать новую тему
uses ShellAPI;
ShellExecute(handle, 'open', 'http://...ru/', nil, nil, SW_SHOW);
Да и KeyPress-ом не очень хорошо подобные операции проделывать процедурка забойная..
Re: нажатие "Enter" в поле Edit
Добавлено: 29 янв 2007, 09:12
Oleg_Rus
Duncon, а если по-подробней?
как я понял 'Open' - команда открытия 'http://....ru/', sw_show - показать окно, но вот что за handle, nil?
Re: нажатие "Enter" в поле Edit
Добавлено: 29 янв 2007, 17:57
Duncon
смотри help ShellExecute или может где в инете описалово валяется, мне лень объяснять у нее много возможностей..
зы F1 рулит, а так же google..