![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ShiftState [D6]
Ola © (2002-09-03 08:58:00)Приветики мастера!!!
Из кода нужно вызвать процедуру KeyDown, проблема в том, что не понятно что передавать в параметр Shift, если должна быть нажата просто клавиша F6... заранее спасибо
ЮЮ (2002-09-03 09:37:00) [1]Меня тоже :-) У меня, как и у Анатолия значок по-прежнему тёмно синий, а у остальных поголубели :-)
Anatoly Podgoretsky (2002-09-03 09:21:00) [2]К психологу, но вообще поздравляю обоих
Ola (2002-09-03 09:17:00) [3]спасибо все заработало!!!!
Song (2002-09-03 09:16:00) [4]2Внук © (03.09.02 09:09)
Это обман зрения, у меня тоже со вчерашнего дня такое.. :-)
Сегодня к окулисту пойду..
Внук (2002-09-03 09:09:00) [5]Черт подери, у меня цвет значка изменился, караул ...
ЮЮ (2002-09-03 09:08:00) [6]А что подразумевается под "процедуру KeyDown"
Если обработчик, должно работать. Вот пример (вызова, а не работы :-) из работающего приложения:
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
//
end;
procedure TForm1.Edit2KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
Edit1KeyDown(Edit1,Key,[]);
end;
Внук (2002-09-03 09:07:00) [7]Попробуйте еще раз :)
Скорее всего, дело не в третьем, а во втором параметре, который объявлен как var, то есть туда нужно передавать переменную, но никак не константу
Внук (2002-09-03 09:07:00) [8]Точно, я угадал :)
Ola (2002-09-03 09:06:00) [9]вот так FormInf.dbgInfDealsKeyDown(Self,vk_F6,[]);
MBo (2002-09-03 09:05:00) [10]как пробовали? код...
Ola (2002-09-03 09:01:00) [11]пробывали не получаеться
Внук (2002-09-03 09:00:00) [12]Передавайте []