با سلام خدمت اساتید

نحوه decompile delphi 7 چطوریه؟!
با نرم افزار DeDe و Delphidecompiler تست کردم فقط فورم ها decompile شد و اصل کار یعنی سورس ها با پسوند pas باز نشدن!

مثلا


procedure TfrmChangeUserPassword._PROC_004F5021(Sender : TObject);
begin
(*
004F5021 8BEC mov ebp, esp
004F5023 33C0 xor eax, eax
004F5025 55 push ebp
004F5026 6845504F00 push $004F5045
004F502B 64FF30 push dword ptr fs:[eax]
004F502E 648920 mov fs:[eax], esp
004F5031 FF05B00D5000 inc dword ptr [$00500DB0]
004F5037 33C0 xor eax, eax
004F5039 5A pop edx
004F503A 59 pop ecx
004F503B 59 pop ecx
004F503C 648910 mov fs:[eax], edx


****** FINALLY
|


* Possible String Reference to: ']أ‹ہƒ-°P'
|
004F503F 684C504F00 push $004F504C
004F5044 C3 ret


004F5045 E906EBF0FF jmp 00403B50
004F504A EBF8 jmp 004F5044


****** END
|
004F504C 5D pop ebp
004F504D C3 ret


*)
end;