Enter - Общие вопросы Delphi

Slash · 24.03.2007, 11:40

Вопрос следующий: имеется Edit, в нём какой-то текст; как сделать, чтоб по нажатии клавиши Enter содержимое Edit'a передовалось другому компоненту (Label например)?

mihali4 · 24.03.2007, 13:50

procedure tform1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key=#13 then
Label.Caption:=Edit1.Text;
end;

Slash · 24.03.2007, 17:40

Понятно, спасибо

24.03.2007, 17:40	#3
Slash Пользователь Регистрация: 04.02.2007 Сообщений: 34	Понятно, спасибо Все мы когда-то начинали

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
как вставить Enter	Аlex	Общие вопросы Delphi	18	09.11.2018 16:26
По нажатию Enter	Andr	Общие вопросы Delphi	8	22.12.2008 16:58
Enter	PAVEL315	Помощь студентам	7	17.12.2007 20:41
String Grid обработка Enter	Nesta	Общие вопросы C/C++	3	18.11.2007 06:13
Ctrl+Enter	kisska	Win Api	3	22.08.2007 20:55

24.03.2007, 11:40	#1
Slash Пользователь Регистрация: 04.02.2007 Сообщений: 34	Enter Вопрос следующий: имеется Edit, в нём какой-то текст; как сделать, чтоб по нажатии клавиши Enter содержимое Edit'a передовалось другому компоненту (Label например)? Все мы когда-то начинали

24.03.2007, 13:50	#2
mihali4 * Старожил Регистрация: 22.11.2006 Сообщений: 9,201	procedure tform1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if key=#13 then Label.Caption:=Edit1.Text; end;