Delphi Programming Protection Shareware Shareware

Многие из авторов программного обеспечения программного обеспечения запрограммированы с использованием Delphi. Сделайте это самостоятельно.

Программа удаляет свой собственный код следующим образом:

процедура убийства;

вар

F: Textfile;

Начинать

DessageFile (f, ''./killme.bat '');

Переписать (f);

writeeln (f, ''@echo off '');

writeeln (f, '': loop '');

writeeln (f, '' дель "''+Application.Exename+'' '' '' ');

writeeln (f, '' Если существует ./file.exe goto loop '');

writeeln (f, '' дель ./killme.bat '');

Fliefile (f);

Winexec ('./ killme.bat' ', sw_hide);

Закрыть;

конец;

Мы также можем использовать Delphi, чтобы вызвать информацию BIOS, чтобы шифровать код регистрации общего программного обеспечения. Чтобы исправить информацию BIOS, зашифрована. Подробный код заключается в следующем:

процедура getBiosInfo;

Начинать

lblmainboardbiosname.caption: =^i+string (pchar (ptr ($ fe061)));

lblmainboardbioscopyright.caption: =^i+string (pchar (ptr ($ fe091)));

lblmainboardbiosdate.caption: =^i+string (pchar (ptr ($ ffff5)));

lblmainboardbiosserialno.caption: =^i+string (pchar (ptr ($ fec71)));

конец;

Добавьте эту программу в свою программу, и вы можете получить серию информации о Bios Motherboard, среди которых lblmainboardbiosname, lblmainboardbioscopyright, lblmainboardbiosdate и lblmainboardbiosserialno - это все.