Показать сообщение отдельно
  #2  
Старый 12.12.2005, 13:25
Аватар для Aristarh Dark
Aristarh Dark Aristarh Dark вне форума
Модератор
 
Регистрация: 07.10.2005
Адрес: Москва
Сообщения: 2,906
Версия Delphi: Delphi XE
Репутация: выкл
По умолчанию

Интересно, как на основе преведенных данных понять, что как и чем нужно нажать???
Допустим на форме (FORM) есть масса картинок с кнопками (ImageWithButton), у этих картинок есть свойтво НАЖАТА (pressed), логическое.
Порядок действий:
Задаем полю tag картинок значения которые соответствуют VK кодам для этих кнопок (смотри Windows.pas)
Для формы задаем скойство KeyPreview:=true
тогда
Код:
Form.KeyDown(бла-бла-бла, не помню что там есть)
var
i:integer;
begin
  for i:=0 to ComponentCount-1 do
    if (Components[i] is TImageWithButton) and (Components[i] as TImageWithButton).tag=key then
      (Components[i] as TImageWithButton).Pressed:=true;
end;
Ну а как, и через сколько отжимать - домашнее задание
Ответить с цитированием