Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2005.09.25;
Скачать: [xml.tar.bz2];

Вниз

Как можна сделать, чтоб при нажатии на Enter, курсор переходил   Найти похожие ветки 

 
Гость22   (2005-08-17 19:44) [0]

сгласно списка табуляции (Tab Order...)?
На форме много едитов и не хочется для каждого писать обработчик


 
KilkennyCat ©   (2005-08-17 20:21) [1]

отловить сообщение о нажатии клавиши Ентер.
выполнить следующее: Perform(WM_NEXTDLGCTL, 0, 0);


 
alex_***   (2005-08-18 08:58) [2]

FindNextControl


 
Leonid Troyanovsky ©   (2005-08-18 09:22) [3]


> Гость22   (17.08.05 19:44)  
> сгласно списка табуляции (Tab Order...)?
> На форме много едитов и не хочется для каждого писать обработчик


procedure TForm1.CMDialogKey(var msg: TCMDialogKey); // message cm_DialogKey;
begin
 if (msg.CharCode = vk_return) and (msg.KeyData ..) then
   begin
     if ActiveControl is TEdit then
       msg.CharCode := vk_tab;
   end;
 inherited;
end;


--
Regards, LVT.


 
alex_***   (2005-08-18 10:58) [4]

прикольно :)



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2005.09.25;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.036 c
1-1125376948
Darkwing
2005-08-30 08:42
2005.09.25
Как убрать звук при нажатии Enter а в TEdit e.


8-1115611310
Viktop
2005-05-09 08:01
2005.09.25
Проиграть музыку из ресурса


9-1117187265
Архитектор
2005-05-27 13:47
2005.09.25
[GlScene] SkyDome


4-1122984668
MooSE
2005-08-02 16:11
2005.09.25
Чтение ресурсов из DLL


2-1124359908
Валя
2005-08-18 14:11
2005.09.25
Как сделать поле для записи.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский