![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как преобразовать коды нажимаемых клавиш в слова и обратно ? [D7]
Добавить © (2005-01-17 06:05:00)Чтобы одна функция преобразовывала бы, скажем, 27 в строчку тексат "VK_ESCAPE", а другая, обратно из строки давала бы соответсвующую цифру ? Это нужно, для сохранения клавиш в текстовый файл, и возможности ручного подредактирования, в случае чего.
Kerk (2005-01-17 08:23:00) [1]
> И когда придёт Мастер Дельфи, то он нам ресскажет ?
Если у тебя вопросы к кому-то лично, то пиши ему мылом.
Поручик (2005-01-17 08:17:00) [2]Добавить (17.01.05 7:18) [7]
То что я написал делать - 7 минут. За то время, что прошло с моего поста до твоего, ты бы все сделал
MBo (2005-01-17 08:10:00) [3]GetKeyNameText (но не в виде VK_***)
Добавить (2005-01-17 07:18:00) [4]
> Поручик © (17.01.05 07:08) [6]
> Нет,
Точно нет ? А может есть ? И когда придёт Мастер Дельфи, то он нам ресскажет ?
Поручик (2005-01-17 07:08:00) [5]Нет, проще всего создать 2 массива - один числа, другой - соответствующие наименования
Потом подставлять...
Добавить (2005-01-17 07:07:00) [6]
> Antonn © (17.01.05 07:01) [3]
> :-)
>
> Function InttoKey(I:integer):string;
> begin
> case i of
> 27: result:='VK_ESCAPE';
> ...//и так перебрать все
> end;
> end;
Три метра кода вставлять в свою программу. Неужели нет готовой функции ?
Kerk (2005-01-17 07:03:00) [7]Antonn © (17.01.05 7:01) [3]
Почти готовая функция.. :)
Antonn (2005-01-17 07:01:00) [8]:-)
Function InttoKey(I:integer):string;
begin
case i of
27: result:='VK_ESCAPE';
...//и так перебрать все
end;
end;
Добавить (2005-01-17 06:25:00) [9]
> Kerk © (17.01.05 06:06) [1]
> ну.. видимо руками.
А может функции готовые есть ?
Kerk (2005-01-17 06:06:00) [10]ну.. видимо руками.