Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.10.21;
Скачать: CL | DM;

Вниз

Замена кода нажатой клавишы.   Найти похожие ветки 

 
Shadow ©   (2002-10-09 14:26) [0]

Т.е. Например: Вы нажали клавишу "г", а отображается она как "ы"


 
Song ©   (2002-10-09 14:29) [1]

В каком компоненте?


 
Zz_   (2002-10-09 14:33) [2]

procedure Tf.gKeyPress(Sender: TObject; var Key: Char);
begin
if( Key="г")then Key := "ы";


 
AngeL B.   (2002-10-09 14:41) [3]


> procedure Tf.gKeyPress(Sender: TObject; var Key: Char);
> begin
> if( Key="г")then Key := "ы";


Ну, предположим, тогда уж так

n := pos(Key, SourceTable);
if n > 0 then Key := DestTable[n];


+ если это делается не в одном компоненте, а на всей форме, то включить KeyPreview у формы и производить обработку там.


 
Shadow ©   (2002-10-10 19:48) [4]

эм.. Воощето я имел ввиду смену кода в ЛЮБОЙ программе. Как можно это сделать БЕЗ хуков?


 
TTCustomDelphiMaster ©   (2002-10-10 21:01) [5]

Перепаять клавиатуру или переделать все шрифты



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

Текущий архив: 2002.10.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.019 c
1-68769
Петя
2002-10-11 16:47
2002.10.21
exit Code


4-69072
Mic_2000
2002-09-08 14:14
2002.10.21
RAS


14-68999
бука
2002-09-30 02:08
2002.10.21
Реестр ХР


1-68778
123000
2002-10-11 19:20
2002.10.21
Richedit


1-68730
Wetnose
2002-10-11 09:20
2002.10.21
COM-server в design-time не выгружается...