i have no time to convert all it code, but the LibMain is a DLL main, use in delphi like this
Code:
procedure LibraryProc(Reason: Integer);
begin
case (Reason) of
DLL_PROCESS_ATTACH:
begin
end;
DLL_PROCESS_DETACH:
begin
end;
end;
end;
begin
DLLProc := @LibraryProc;
DLLProc(DLL_PROCESS_ATTACH);
end.| Code: procedure LibraryProc(Reason: Integer);
begin
case (Reason) of
DLL_PROCESS_ATTACH:
begin
DisableThreadLibraryCalls (hInstance);
end;
end;
end;
begin
DLLProc := @LibraryProc;
DLLProc(DLL_PROCESS_ATTACH);
end.change to g_szPath : PWideChar = NULL change to nil &si, &g_pi change to si, g_pi 0xDEADBEEF -> $DEADBEEF that's all (: Thanks & Thanks Freeware iCoolPlayer : Play/Convert/Rip/Burn/Record/Radio/... http://kenshin1101.googlepages.com |



0 comentarios:
Publicar un comentario