Показать сообщение отдельно

  #1410  
Старый 27.04.2008, 15:49
De-visible
Banned
Регистрация: 06.01.2008
Сообщений: 904
С нами: 9655526

Репутация: 1821


По умолчанию

Цитата:
Сообщение от Metall  
Как назначить один обработчик двум событиям? Например, мне нужно, чтобы в компонент TMemo попадало то, что введет пользователь в TEdit, но не только по нажатию кнопки, а и по нажатию клавиши Enter.
------------
И еще. Почему конструкция case не работает для строки? Например:
Код:
var
   MyString: String;
begin
   case MyString of
      'привет': блок кода 1;
      'пока': блок кода 2;
   end;
end;
Цитата:
'привет': блок кода 1;
Такая запись неверна,(case не работает со строками) Здесь оператор If тебе в помощь

так:
Код:
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if key= vk_return then
   //Твой код:)
end;
??



Эмуляция нажатия enter
http://articles.org.ru/cfaq/index.php?qid=2112&frommostrecent=yes

Последний раз редактировалось De-visible; 27.04.2008 в 16:33..
 
Ответить с цитированием