Форум: "Основная";
Текущий архив: 2003.04.07;
Скачать: [xml.tar.bz2];
Внизкодировки клавишь... Найти похожие ветки
← →
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 нечего не просходит...
Почему???
← →
jack128 (2003-03-24 22:38) [11]в каком обработчике это написано?? в смысле событие формы или , например, кнопки?? и у кого фокус ввода при нажатии алт + м??
Поиграйся с 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 потом просто чтоб можно было добавить так как первыебуквы не изменяются как сделать?
← →
Leshiy (2003-03-25 07:43) [13]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;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.04.07;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.008 c