На нашем сайте ежедневно публикуются десятки качественных и свежих материалов, которые Вы можете скачать абсолютно бесплатно. Рекомендуем Вам добавить Наш сайт в закладки, а также подписаться на RSS ленту, чтобы не пропускать интересных новостей.
Главная » 2013»Март»28 » Пример 2. Как сделать перемещение по полям ввода при нажатии клавиши Enter
03:21
Пример 2. Как сделать перемещение по полям ввода при нажатии клавиши Enter
Пример 2. Как сделать перемещение по полям ввода при нажатии клавиши Enter
// все очень просто, меняем свойство формы KeyPreview := True // и пишем в обработчике FormKeyDown всего одну строчку procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key = VK_RETURN then SendMessage(Handle, WM_NEXTDLGCTL, 0, 0); end;
|