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

Вниз

Создать свое событие   Найти похожие ветки 

 
elloner ©   (2004-03-07 10:01) [0]

Здраствуйте. Меня интересует  довольно простой вопрос на который не могу найти ответа уже месяц. На третьем курсе прикладной математики никто не помог с ответом. Если я програмно создаю объект, допустим Image (не кидаю его на форму, па пишу Image:=TImage.create(...)) то как мне создать процедуру, которая бы вызывалась всегда когда кликают на имедж? Короче как сделать свой обрботчик события OnClick? Мне говорили что-то типа Image.OnClick:=MyProc но че-то у меня не получалось. Если можно напишите кусок работающей программы если не затруднит скиньте на мыло.


 
Serge ©   (2004-03-07 10:10) [1]

Правильно тебе говорили - создаешь процедуру
Form1.ImageClick(Sender : TObject);
Begin
...
End;
потом эту процедуру присваиваешь обработчику Image.OnClick:=ImageClick;


 
Gero ©   (2004-03-07 10:10) [2]

procedure MyProc(Sender : TObject);
begin
 // Your code here
end;
...
Image.OnClick:=MyProc;


 
Юрий Зотов ©   (2004-03-07 10:14) [3]

Здесь найдете все этой по теме:
http://www.delphikingdom.com/asp/viewitem.asp?catalogid=342


 
Юрий Зотов ©   (2004-03-07 10:15) [4]

> Gero ©   (07.03.04 10:10) [2]

Сами пробовали?


 
Gero ©   (2004-03-07 10:20) [5]

> Юрий Зотов ©   (07.03.04 10:15) [4]

Да, я случайно ошибся, конечно обработчик события должен быть методом какого-либо класса.



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

Форум: "Основная";
Текущий архив: 2004.03.28;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.031 c
6-1073307972
Qwert622
2004-01-05 16:06
2004.03.28
Web сервер.


1-1078680567
$tranger
2004-03-07 20:29
2004.03.28
Создание пункта в меню


14-1078230163
_none_
2004-03-02 15:22
2004.03.28
какие-то уроды спамят по почте


7-1072692942
Romkin
2003-12-29 13:15
2004.03.28
TRichTextBox, определение размера текста


1-1078593609
Ivolg
2004-03-06 20:20
2004.03.28
Поиск





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский