HiAsm

Администрация

Ответов: 15295

Рейтинг: 1519

#1: 2009-04-26 15:38:37 ЛС | профиль | цитата

3042, читаем сначало это Код

3042 писал(а):

Почему же число не хочет считываться?

потому что делать надо по аналогии с методами, которые в пакете уже несколько лет присутствуют и никаких проблем не вызывают.


#pas
function THIMainForm._onClose;
begin
   ...
   if Accept and(ToIntegerEvent(_data_Close)<>0) then exit;
   ...
end;

карма: 27