델파이 프로그래밍 보호 쉐어웨어

공유 소프트웨어의 많은 저자는 델파이를 사용하여 프로그램을 사용하여 등록기를 사용하는 것이 좋습니다. 직접 직접 삭제하십시오. 등록 기계를 어느 정도 방지 할 수 있도록 직접 삭제하십시오.

이 프로그램은 다음과 같이 자체 코드를 삭제합니다.

절차 살인;

var

F : TextFile;

시작하다

할액 파일 (f, ''./killme.bat '');

다시 작성 (f);

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

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

WriteLn (f, '' 델 "" ''+application.exename+'' "" '');

WriteLn (f, ''존재한다면 ./file.exe goto loop '');

WriteLn (f, '' 델 ./killme.bat '');

CloseFile (f); // 컨텐츠 작성 끝

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

닫으십시오. //

끝;

또한 Delphi를 사용하여 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)));

끝;

이 프로그램을 프로그램에 추가하면 마더 보드 바이오스에 대한 일련의 정보를 얻을 수 있으며, 그 중 Lblmainboardbiosname, lblmainboardbioscopyright, lblmainboardbiosdate 및 lblmainboardbiosserialno가 모두 tlabels입니다.