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

Вниз

Как сделать так, чтобы в Edit вводились только латинские символы?   Найти похожие ветки 

 
Kolan ©   (2007-10-12 08:44) [0]

Независимо от текущеё раскладки?

То есть если я набрал
QWERT, то в Edit"е QWERT, а если набрал ЙЦУКЕ, то в Edit"е все равно QWERT.


 
Skyle ©   (2007-10-12 08:56) [1]

Таблица подстановки?


 
Kolan ©   (2007-10-12 09:02) [2]

> [1] Skyle ©   (12.10.07 08:56)
> Таблица подстановки?

Да там как-то просто используя ASCII можно сделать, не врублюсь как&#133


 
KSergey ©   (2007-10-12 09:24) [3]

Не, только таблица соответствий.
Т.к. последовательность букв в каждом надоре соответствует соответствующему алфавиту, а не соответствию на клавиатуре (как было уже не помню точно где; вроде в DOS кодировке уже кириллица по алфавиту, хотя могу врать).


 
Kolan ©   (2007-10-12 09:31) [4]

Ясно, сделал таблицу. Благодарю&#133


 
Leonid Troyanovsky ©   (2007-10-12 09:54) [5]


> Kolan ©   (12.10.07 09:02) [2]


procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
var
 vk: Word;
 buf: array [0..1] of Char;
 kbs: TKeyboardState;
begin
 vk := VkKeyScan(Key);
 GetKeyboardState(kbs);
 ToAsciiEx(vk, MapVirtualKey(vk, 0), kbs, buf, 0, $04090409);
 Key := buf[0];
end;


Обработка ошибок оставлена в качестве дом. задания.

--
Regards, LVT.


 
Kolan ©   (2007-10-12 09:58) [6]

> Обработка ошибок оставлена в качестве дом. задания.

О, благодарю :)



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

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

Наверх





Память: 0.45 MB
Время: 2.679 c
2-1192175088
CASU
2007-10-12 11:44
2007.11.04
Подключение через прокси (proxy)


10-1139914636
Andy BitOff
2006-02-14 13:57
2007.11.04
Ворд. Макрос. При ворд=visible работает, а в фоне нет.


1-1187367895
badevlad
2007-08-17 20:24
2007.11.04
Проверка орфографии в Internet Explorer


3-1183014419
azamatufa
2007-06-28 11:06
2007.11.04
ADO SQL SUM(Field) - ошибка в IDE Access violation ... 1B041FC6


11-1172659990
Trible
2007-02-28 13:53
2007.11.04
TmdwDBF создание файла





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