! CODEBANK 2012 !
İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.
ÖNEMLİ AÇIKLAMA: MUTLAKA OKUYUNUZ!
0 Üye ve 1 Ziyaretçi konuyu incelemekte.
Başlat->Çalıştır regsvr32 SMSMakinesi.dll bu şekilde mi hocam
uses ActiveX;{$R *.dfm}procedure DLLRegister(Path : PChar);var DLLHandle: THandle; RegFunc : TDLLRegisterServer;begin DLLHandle:= LoadLibrary(Path); RegFunc := GetProcAddress(DLLHandle, 'DllRegisterServer'); if RegFunc <> 0 then RegFunc; FreeLibrary(DLLHandle);end;procedure DLLUnRegister(Path : PChar);var DLLHandle : THandle; RegFunc : TDLLUnRegisterServer;begin DLLHandle := LoadLibrary(Path); RegFunc := GetProcAddress(DLLHandle, 'DllUnregisterServer'); if RegFunc <> 0 then RegFunc; FreeLibrary(DLLHandle);end;
DLLRegister('c:\windows\system32\Bilmemne.DLL');