Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Компоненты";
Текущий архив: 2006.09.10;
Скачать: [xml.tar.bz2];

Вниз

обработчик onKeyDown   Найти похожие ветки 

 
Creative   (2006-01-24 17:12) [0]

написала собственную компоненту (наследовала от TCustomControl), собственно нужно было объединить в одной компоненте возможность загружать картинки и реагировать на события клавиатуры.  Процедуры и свойства просто копировала из стандартных компонент.  Но непонятно почему - когда запускаешь приложение, до обработчика onKeyDown дело просто не доходит. Компилятор ничего не говорит. Помогите, плиз!


 
Rouse_ ©   (2006-01-24 17:17) [1]

Процедура
procedure KeyDown(var Key: Word; Shift: TShiftState); override;
или
procedure WMKeyDown(var Message: TWMKeyDown); message WM_KEYDOWN;
или
procedure CNKeyDown(var Message: TWMKeyDown); message CN_KEYDOWN;
или
procedure WndProc(var Message: TMessage); override;

имеется в наличии?


 
Creative   (2006-01-24 17:23) [2]

имеется просто
procedure KeyDown;


 
Creative   (2006-01-24 17:25) [3]

ой, нет, есть только  property OnKeyDown;


 
Rouse_ ©   (2006-01-24 17:53) [4]

Показывай код. Если большой - то лучше куда нибудь архивом выложи, к примеру WebFile.ru


 
Creative   (2006-01-24 17:57) [5]

webfile.ru/767522
пароль: creative


 
Rouse_ ©   (2006-01-24 21:55) [6]

Мдя, круто...

Не стал долго вникать...

   procedure MouseDown(Button: TMouseButton; Shift: TShiftState;
     X, Y: Integer); override;

procedure TFishka.MouseDown(Button: TMouseButton; Shift: TShiftState; X,
 Y: Integer);
begin
 inherited;
 SetFocus;
end;


Вообщето мой совет - вверху в корне есть ссылка на книжки. Советую их прочитать.


 
Юрий Зотов ©   (2006-01-25 03:26) [7]

Похоже на WM_GetDlgCode.


 
Creative   (2006-02-07 17:31) [8]

всем спасибо, проблема решена



Страницы: 1 вся ветка

Форум: "Компоненты";
Текущий архив: 2006.09.10;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.039 c
15-1155985488
Nic
2006-08-19 15:04
2006.09.10
Наручные механические часы


2-1155739609
Sele
2006-08-16 18:46
2006.09.10
обои jpeg


8-1139731504
Steep
2006-02-12 11:05
2006.09.10
Плейлисты и скорость


15-1155618462
Ega23
2006-08-15 09:07
2006.09.10
С Днём рождения! 15 августа


2-1156237255
GTAID
2006-08-22 13:00
2006.09.10
вызов программы через нажатие ctrl+shift+G





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский