кодировки клавишь...

← →
delkos (2003-03-23 22:45) [0]

помогите где можно найти кодировки клавишь вот например например
у клавиши F4 такая VK_f4 там у ентера если не ошбаюсь #13 или #10
вот где это всё можно ухнать или в самой делфе есть?
помогите да и заодно скаэите какая кодировка у клавиши delete.
Спасибо жду ответов!

← →
jack128 © (2003-03-23 22:50) [1]

вот набрал ты в делфе VK_F4, и что неужели Find Declaration сложно нажать??? (если не знаешь - это первый пункт в контекстном меню)

← →
delkos (2003-03-24 21:44) [2]

Да где это обьясни по человечески нажимаю я правую клавишу мыши вылазиет контекстное меню нет там найти декларацию!

← →
delkos (2003-03-24 21:46) [3]

Хотя что то нашел в Windows.pas но есть где нить пожробнее и мне
кажется я не то нашел...или то?

← →
Anatoly Podgoretsky © (2003-03-24 21:48) [4]

Проще, простого: справка, тема Virtual-key codes

← →
delkos (2003-03-24 21:59) [5]

так вот такой вопрос вот код:

if ((ssalt in shift) and (ssctrl in shift) and (key=vk_delete))
then
key:=0;

что данный код не может заблокировать алт ктрл дел в виндовсе хп?

или хп так устроен что не возможно?
или код не верен если чт не так исправте пожплусто!

← →
jack128 © (2003-03-24 21:59) [6]

курсор поставь на VK_F4 и нажми правую кнопку мыши...
Это самая полезная фича в Дельфи

← →
delkos (2003-03-24 22:01) [7]

Да народ вроде бы понял а как дело обстоит с простыми клавишами типа буквы r,w,t, и так далее...?

← →
jack128 © (2003-03-24 22:03) [8]

ord("d"), а вообще help почаще читать надо

← →
delkos (2003-03-24 22:17) [9]

ага попобуем!
ну и спасибо конечно огромное !

← →
delkos (2003-03-24 22:33) [10]

if ((ssalt in shift) and (key=ord("m"))) then
showmessage("Трям!!!");
компилируется но если нажать алт+m нечего не просходит...
Почему???

в каком обработчике это написано?? в смысле событие формы или , например, кнопки?? и у кого фокус ввода при нажатии алт + м??
Поиграйся с TCustomForm.KeyPreview мозможно поможет

← →
delkos (2003-03-24 23:03) [12]

нет
keypreview:=true
ещё при создании формы..
так это процедурка при зажатии клавишь на форме..
procedure tform1.formkeydown(......)
begin
if ((ssalt in shift) and (key=ord("m"))) then
showmessage("Трям!!!");
end;
Вот только вот не получается!

да кстати вот ещё есть поле ввода телефонного номера там надо чтоб только цифры были...(маскедит не придлагать!)
вот такой код
procedure tform1.edit1keypress(........)
if (key<"0") or (key>"9") then key:=#0
вот тут теперь только цифры но теперь нельзя стереть тоесть
не пашет backspase :)
что надо добавить or (key=vk_back) ???
не пашет вроде...

да и ещё вопрос напримеесть тожеполе ввода но надо чтоб первые
две буквы всегда оставалисьтоесть их нельзя было стереть просто к ним бобавить еще
вот напимер едит5 в нем первые две буквы xx потом просто чтоб можно было добавить так как первыебуквы не изменяются как сделать?

1. procedure TForm1.Edit_TelKeyPress(Sender: TObject; var Key: Char);
begin
if ((Key>="0")and(Key<="9"))or(Key="-")or
(Key="(")or(Key=")")or (Key=#08) then
else Key:=#0;
end;

2.procedure TForm1.Edit_TelKeyPress(Sender: TObject; var Key: Char);
begin
if (Key=#08) and (length(Edit1.Text)=2) then Key:=#0;
end;

кодировки клавишь... Найти похожие ветки