создание функций в run

← →
bober (2003-12-12 14:01) [0]

Добрый день!
создал в run-time edit
присваиваю
edit.onkeypress:=keypress;

сама процедура обрабатывает нажатие клавиш

procedure Tform1.keypress(sender:Tobject;var KEY:char);
begin
end;

Как в процедуру передать параметр Key и как в параметр поместить код клавиши?

← →
Erik © (2003-12-12 14:05) [1]

А в чем проблема? Key содержит нажатую клавишу при возникновении события. А второе Key := "a";

← →
bober (2003-12-12 14:21) [2]

не получается скомпилировать
на
edit.onkeypress:=keypress;
ругается
incompatible types: "parametr list differ"
а на процедуру
declaration of "keypress" differs from previous declaration

не могу понять в чём трабла

← →
Erik © (2003-12-12 14:40) [3]

Наверное сегодня день перезагрузок, перегрузи винды.

← →
bober (2003-12-12 14:55) [4]

А в чем проблема?

как параметр key передать в выражении
edit.onkeypress:=keypress;

если
edit.onkeypress:=keypress(key);
то где присваиватся код нажатой клавиши key?

>bober (12.12.03 14:55) [4]
Параметр передаешь не ты, а система обрабатывает нажатие кнопки на клавиатуре и передает код нажатой клавиши в твою процедуру обработки.

А ошибка при компиляции возникает из-за того, что определение твоей процедуры обработки в классе формы и в секции реализации отличается. Исправь различия.

создание функций в run_time Найти похожие ветки