событие в другом юните.

← →
MetalFan © (2003-03-03 13:11) [0]

Вопрос такой:
есть юнит с формой (unForm1)
в uses MyUnit прописан.
на форме TEdit.
есть юнит с процедурой-обработчиком события, ну допустим:
unit MyUnit; interface Procedure DateEditKeyPress(Sender: TObject; var Key: Char); implementation Procedure DateEditKeyPress(Sender: TObject; var Key: Char); begin {делаем что надо} end;
как сделать, чтобы при выборе в Инспекторе в событии нажатии на клавишу (OnKeyPress) для Edit"a можно было сразу выбрать DateEditKeyPress? а то не хотит DateEditKeyPress отображаться в доступных событиях в ObjectInspector для Edita(

← →
JibSkeart © (2003-03-03 13:20) [1]

Ты сам то понял что сказал ??

TForm1 = class(TForm)
...
public:
Procedure DateEditKeyPress(Sender: TObject; var Key: Char);

end;
prcedure TForm1.DateEditKeyPress(Sender: TObject; var Key: Char)
{
...
}
помойму енто ты должен включить в Класс Формы где
находится Едит

← →
Digitman © (2003-03-03 13:22) [2]

>MetalFan

Прочувствуй разницу между посто процедурой и процедурным методом класса/объекта

← →
KDS © (2003-03-03 13:25) [3]

А ты обьяви обработчик не в интерфейсной састи , а "публик" формы
type TunForm1 = class(TForm) ***** public procedure DateEditKeyPress(Sender: TObject; var Key: Char); end;

А в implementation укажи procedure unForm1.DateEditKeyPress(Sender: TObject; var Key: Char);

← →
MetalFan © (2003-03-03 13:25) [4]

может я во что-то не въезжаю...
есть юнит, в котором есть обработчик нажатия на клавишу...
как его подключить к эдиту на форме в другом юните?
что-то я торможу) грипп сказывается)

← →
KDS © (2003-03-03 13:29) [5]

Программно так

EditForm1.OnKeyPress:=Form2.EditForm2.OnKeyPress

← →
Digitman © (2003-03-03 13:31) [6]

> есть юнит, в котором есть обработчик нажатия на клавишу

нет у тебя такого юнита !
есть у тебя просто модуль с декларацией и реализацией обычных процедур.
обычная процедура не может быть/стать обработчиком события с т.з. Object Pascal, сделать эту процедуру методом какого-либо класса, декларированного и реализованного в твоем юните.

← →
Dms (2003-03-03 13:33) [7]

наверно грипп ...

обработчик события, чтобы он отображался в инспекторе должен быть описан в классе формы

> Digitman ©

thanks) за объяснения!
я савсем расклеился, пойду лучче бороться с гриппом)))
всем здоровья! а то грыпп не есть хорошо)

P.S.
сделал так
... TForm1.EditKeyPress(Sender: TObject; var Key: Char); begin {вызываю процедуру из MyUnit"a} DateEditKeyPress(Sender,Key); end; ...

событие в другом юните. Найти похожие ветки