Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.01.30;
Скачать: CL | DM;

Вниз

Адрес обработчика   Найти похожие ветки 

 
Юра   (2003-01-20 13:00) [0]

А можно ли вот так:
TableMain.AfterScroll:=TableMainAfterScroll;
@TableMain.AfterScroll:=pointer(
longint(@TableMain.AfterScroll)
);


 
Skier ©   (2003-01-20 13:09) [1]

А зачем сие ? Конечная цель какая ?


 
Юра   (2003-01-20 14:28) [2]

Цель странная, детская защита от копирования. В "жестоком" варианте адрес xor-ится с вычисленным значением функции от "пароль-ключ". Если функция вернет не 0 (или не какое-то другое наперед заданное число), то результат xor укажет не туда, что ведет к неработоспособности программы. Жестокость в том, что "не туда" может привести к сбою в работе не только программы, но и ОС. В "правильном" варианте создается несколько обработчиков события, их адреса заносятся в массив и потом в зависимости от значения функции от "пароль-ключ" один из них присваивается объекту.



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

Текущий архив: 2003.01.30;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.018 c
1-96692
Fill
2003-01-21 20:42
2003.01.30
Delphi-Excel


3-96556
Makhanev A.S.
2003-01-11 13:46
2003.01.30
Как добавить поле в TTable???


3-96594
AM
2003-01-13 14:14
2003.01.30
Что это за exception? Глюк в версии DBE или...


1-96794
Igit
2003-01-22 20:35
2003.01.30
Low_dword & High_dword


14-96990
RV
2003-01-13 10:34
2003.01.30
да, Всех с Новым Годом!