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

Вниз

Как игонорировать раскладку клавиатуры?   Найти похожие ветки 

 
ilya@scsc.ru ©   (2004-08-10 15:05) [0]

Здравствуйте!

Проблема в следующем. Нужна возможность при включенной русской раскладке клавиатуры получать заначения, соответсвующих символов которые были бы при текущей английской раскладке.

Прикладняа задача следующая: Есть ручной сканер для считывания баркодов он врубается между клавиатурой и компьютером. Т.е при считываниии баркода получается, что с клавиатуры веден код. Но при русской раскладке получается код "ASDF001" как "ФЫВА001".

Заранее спасибо.

Илья.


 
jack128 ©   (2004-08-10 15:10) [1]

заведи массив соответствия символов SymbolArr: array["а".."я"] of char = ("f", ",", "d", "u" ...);

и if (symbol >= "a") and (symbol <= "я") then symbol := SymbolArr[symbol];


 
ghg ©   (2004-08-10 15:14) [2]

когда считываешь меняй раскладку
после считывания верни обратно


 
ilya@scsc.ru ©   (2004-08-10 15:55) [3]

1/ А может быть уже есть уже готовые функции для такого вида преобразований?
2/ А что значет когда считываешь. Я считываю на собывтие FormKeyPress, а туда в var Key: Char приходит символ уже в соответвии с русской раскладкой. Менять ее поздно!


 
ilya@scsc.ru ©   (2004-08-10 16:03) [4]

Лучше, что бы был способ вообще игнорировать раскладки и чтобы что считал сканер, то и обрабатывать ...


 
MacroDenS ©   (2004-08-10 16:07) [5]

можешь конкретно по коду клавишь ориентироваться, только тебе нужно обрабатывать не FormKeyPress, а FormKeyDown или FormKeyUp
там Key возвращает код нажатой/отжатой КЛАВИШИ НЕ ЗАВИСИМО ОТ РАСКЛАДКИ КЛАВЫ


 
ilya@scsc.ru ©   (2004-08-12 17:51) [6]

Спасибо, как я забыл про FormKeyDown ума не проложу!



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

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

Наверх




Память: 0.45 MB
Время: 0.036 c
3-1091625059
serg128
2004-08-04 17:10
2004.08.29
Как выгрузить в TStringList содержимое CLOB-поля в Oracle?


3-1091623615
stud
2004-08-04 16:46
2004.08.29
преобразования типов


1-1092606277
Vetalich
2004-08-16 01:44
2004.08.29
Замена символов


14-1091855407
Daniel.
2004-08-07 09:10
2004.08.29
Что делать, если USB-устройств больше, чем USB-портов?


1-1092722107
СержК
2004-08-17 09:55
2004.08.29
Как закрыть OLE объект ?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский