Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Адрес обработчика [D5, Win2k]


Юра ©   (2003-01-20 13:00:00) 

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


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

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


Skier   (2003-01-20 13:09:00) [2]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо