Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.01.30;
Скачать: [xml.tar.bz2];

Вниз

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

 
Юра   (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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.007 c
1-96878
Tundra
2003-01-21 09:26
2003.01.30
Создание инсталята BDE, Sql Explorer и INTERBASE + ехе-шник


3-96616
Kurt_
2003-01-12 17:08
2003.01.30
Люди есть какое-нибудь событие возникающее при какой-либо ошибке


3-96545
Berg
2003-01-15 09:55
2003.01.30
Table и ADOTable


3-96620
mate
2003-01-10 15:38
2003.01.30
Создание БД


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





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский