Как динамически создать процедуру OnMouseDown

← →
Elena_ (2005-06-10 10:16) [0]

Создаю компонент:
x:=TImage.Create(self);
x.Name:="Image111";
x.Width:=33;
x.Height:=33;
x.Parent:=ScrollBox1;
x.Picture.LoadFromFile("3.bmp");

Теперь мне нужно создать процедуру OnMouseDown - помоги (ПЛИЗ)
Заранее спасибо всем отозвавшимся

← →
-=XP=- © (2005-06-10 10:23) [1]

Теперь мне нужно создать процедуру OnMouseDown - помоги (ПЛИЗ)

1. OnMouseDown - не процедура.
2. Процедуры не создают, а пишут.
3. В чем проблема-то?

P.S. OnMouseDown - метод.
P.P.S. Напишите в разделе private формы текст procedure OnMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); и нажмите Ctrl+Shift+C.

Ни как, Дельфи это компилятор, а не интерпритатор.
Поэтому создавать надо ранее, до компиляции программы, только не процедуру а метод объекта. Теперь ранее созданый метод можно динамически назначить свойству события в рантайм.

Как динамически создать процедуру OnMouseDown Найти похожие ветки