📄 new.pas
字号:
|
004B4958 E82F49F5FF call 0040928C
004B495D FFB594FBFFFF push dword ptr [ebp+$FFFFFB94]
* Possible String Reference to: 'Placements\'
|
004B4963 686C4C4B00 push $004B4C6C
004B4968 8D8D8CFBFFFF lea ecx, [ebp+$FFFFFB8C]
004B496E 8B45D8 mov eax, [ebp-$28]
* Reference to field TFileListBox.OFFS_0218
|
004B4971 8B8018020000 mov eax, [eax+$0218]
004B4977 8B55F8 mov edx, [ebp-$08]
004B497A 8B38 mov edi, [eax]
004B497C FF570C call dword ptr [edi+$0C]
004B497F 8B858CFBFFFF mov eax, [ebp+$FFFFFB8C]
004B4985 8D9590FBFFFF lea edx, [ebp+$FFFFFB90]
* Reference to: Unit_0040780C.Proc_00409354
|
004B498B E8C449F5FF call 00409354
004B4990 FFB590FBFFFF push dword ptr [ebp+$FFFFFB90]
004B4996 8D45E4 lea eax, [ebp-$1C]
004B4999 BA03000000 mov edx, $00000003
* Reference to: System.Proc_0040456C
|
004B499E E8C9FBF4FF call 0040456C
004B49A3 8D8D88FBFFFF lea ecx, [ebp+$FFFFFB88]
* Possible String Reference to: '.txt'
|
004B49A9 BA804C4B00 mov edx, $004B4C80
004B49AE 8B45E4 mov eax, [ebp-$1C]
* Reference to: Unit_0040780C.Proc_004091F8
|
004B49B1 E84248F5FF call 004091F8
004B49B6 8B9588FBFFFF mov edx, [ebp+$FFFFFB88]
004B49BC 8D45E4 lea eax, [ebp-$1C]
* Reference to: System.Proc_00404284
|
004B49BF E8C0F8F4FF call 00404284
004B49C4 8B45E4 mov eax, [ebp-$1C]
* Reference to: Unit_0040780C.Proc_00408F50
|
004B49C7 E88445F5FF call 00408F50
004B49CC 84C0 test al, al
004B49CE 0F8401010000 jz 004B4AD5
004B49D4 8B55E4 mov edx, [ebp-$1C]
004B49D7 8B45E0 mov eax, [ebp-$20]
004B49DA 8B08 mov ecx, [eax]
* Possible reference to virtual method TStringList.OFFS_68
|
004B49DC FF5168 call dword ptr [ecx+$68]
004B49DF 8D4DE8 lea ecx, [ebp-$18]
004B49E2 33D2 xor edx, edx
004B49E4 8B45E0 mov eax, [ebp-$20]
004B49E7 8B18 mov ebx, [eax]
* Possible reference to virtual method TStringList.OFFS_0C
|
004B49E9 FF530C call dword ptr [ebx+$0C]
004B49EC 8D55EC lea edx, [ebp-$14]
004B49EF 8B45E8 mov eax, [ebp-$18]
* Reference to: System.Proc_00402E58
|
004B49F2 E861E4F4FF call 00402E58
004B49F7 8BD8 mov ebx, eax
004B49F9 8D4DE8 lea ecx, [ebp-$18]
004B49FC BA01000000 mov edx, $00000001
004B4A01 8B45E0 mov eax, [ebp-$20]
004B4A04 8B30 mov esi, [eax]
* Possible reference to virtual method TStringList.OFFS_0C
|
004B4A06 FF560C call dword ptr [esi+$0C]
004B4A09 8D55EC lea edx, [ebp-$14]
004B4A0C 8B45E8 mov eax, [ebp-$18]
* Reference to: System.Proc_00402E58
|
004B4A0F E844E4F4FF call 00402E58
004B4A14 8BF0 mov esi, eax
004B4A16 E9BA000000 jmp 004B4AD5
004B4A1B 33C0 xor eax, eax
004B4A1D 55 push ebp
004B4A1E 68C74A4B00 push $004B4AC7
***** TRY
|
004B4A23 64FF30 push dword ptr fs:[eax]
004B4A26 648920 mov fs:[eax], esp
004B4A29 8D55E8 lea edx, [ebp-$18]
* Reference to Formnew
|
004B4A2C 8B45FC mov eax, [ebp-$04]
* Reference to control TFormnew.editxy : TsuiEdit
|
004B4A2F 8B8024030000 mov eax, [eax+$0324]
* Reference to: Controls.Proc_004504F0
|
004B4A35 E8B6BAF9FF call 004504F0
004B4A3A 8D45E8 lea eax, [ebp-$18]
004B4A3D 50 push eax
004B4A3E 8B55E8 mov edx, [ebp-$18]
004B4A41 B8904C4B00 mov eax, $004B4C90
* Reference to: System.Proc_004047F0
|
004B4A46 E8A5FDF4FF call 004047F0
004B4A4B 8BC8 mov ecx, eax
004B4A4D 49 dec ecx
004B4A4E BA01000000 mov edx, $00000001
004B4A53 8B45E8 mov eax, [ebp-$18]
* Reference to: System.Proc_0040470C
|
004B4A56 E8B1FCF4FF call 0040470C
004B4A5B 8D55EC lea edx, [ebp-$14]
004B4A5E 8B45E8 mov eax, [ebp-$18]
* Reference to: System.Proc_00402E58
|
004B4A61 E8F2E3F4FF call 00402E58
004B4A66 8BD8 mov ebx, eax
004B4A68 8D55E8 lea edx, [ebp-$18]
* Reference to Formnew
|
004B4A6B 8B45FC mov eax, [ebp-$04]
* Reference to control TFormnew.editxy : TsuiEdit
|
004B4A6E 8B8024030000 mov eax, [eax+$0324]
* Reference to: Controls.Proc_004504F0
|
004B4A74 E877BAF9FF call 004504F0
004B4A79 8D45E8 lea eax, [ebp-$18]
004B4A7C 50 push eax
004B4A7D 8B55E8 mov edx, [ebp-$18]
004B4A80 B8904C4B00 mov eax, $004B4C90
* Reference to: System.Proc_004047F0
|
004B4A85 E866FDF4FF call 004047F0
004B4A8A 50 push eax
004B4A8B 8B45E8 mov eax, [ebp-$18]
* Reference to: System.Proc_004044AC
|
004B4A8E E819FAF4FF call 004044AC
004B4A93 5A pop edx
004B4A94 2BC2 sub eax, edx
004B4A96 50 push eax
004B4A97 8B55E8 mov edx, [ebp-$18]
004B4A9A B8904C4B00 mov eax, $004B4C90
* Reference to: System.Proc_004047F0
|
004B4A9F E84CFDF4FF call 004047F0
004B4AA4 8BD0 mov edx, eax
004B4AA6 42 inc edx
004B4AA7 8B45E8 mov eax, [ebp-$18]
004B4AAA 59 pop ecx
* Reference to: System.Proc_0040470C
|
004B4AAB E85CFCF4FF call 0040470C
004B4AB0 8D55EC lea edx, [ebp-$14]
004B4AB3 8B45E8 mov eax, [ebp-$18]
* Reference to: System.Proc_00402E58
|
004B4AB6 E89DE3F4FF call 00402E58
004B4ABB 8BF0 mov esi, eax
004B4ABD 33C0 xor eax, eax
004B4ABF 5A pop edx
004B4AC0 59 pop ecx
004B4AC1 59 pop ecx
004B4AC2 648910 mov fs:[eax], edx
004B4AC5 EB0E jmp 004B4AD5
****** EXCEPT
|
004B4AC7 E950EEF4FF jmp 0040391C
004B4ACC 33DB xor ebx, ebx
004B4ACE 33F6 xor esi, esi
* Reference to: System.Proc_00403C84
|
004B4AD0 E8AFF1F4FF call 00403C84
****** END
|
004B4AD5 56 push esi
004B4AD6 8BCB mov ecx, ebx
004B4AD8 8B55D4 mov edx, [ebp-$2C]
004B4ADB 8B45DC mov eax, [ebp-$24]
* Reference to: mywil.Proc_0049703C
|
004B4ADE E85925FEFF call 0049703C
004B4AE3 FF45F8 inc dword ptr [ebp-$08]
004B4AE6 FF4DD0 dec dword ptr [ebp-$30]
004B4AE9 0F85F0FDFFFF jnz 004B48DF
004B4AEF 33C0 xor eax, eax
004B4AF1 5A pop edx
004B4AF2 59 pop ecx
004B4AF3 59 pop ecx
004B4AF4 648910 mov fs:[eax], edx
004B4AF7 EB0A jmp 004B4B03
****** EXCEPT
|
004B4AF9 E91EEEF4FF jmp 0040391C
* Reference to: System.Proc_00403C84
|
004B4AFE E881F1F4FF call 00403C84
****** END
|
* Reference to Formnew
|
004B4B03 8B45FC mov eax, [ebp-$04]
* Reference to control TFormnew.suiProgressBar1 : TProgressBar
|
004B4B06 8B8034030000 mov eax, [eax+$0334]
004B4B0C 33D2 xor edx, edx
* Reference to: Controls.Proc_00450410
|
004B4B0E E8FDB8F9FF call 00450410
004B4B13 8B45D4 mov eax, [ebp-$2C]
* Reference to: System.Proc_0040347C
|
004B4B16 E861E9F4FF call 0040347C
* Reference to TFormMain instance
|
004B4B1B A1C0B14B00 mov eax, dword ptr [$004BB1C0]
004B4B20 8B00 mov eax, [eax]
* Possible String Reference to: '建立新文件成功!'
|
004B4B22 BA9C4C4B00 mov edx, $004B4C9C
* Reference to : TFormMain.showMessage()
|
004B4B27 E8A82F0000 call 004B7AD4
* Reference to Formnew
|
004B4B2C 8B45FC mov eax, [ebp-$04]
* Reference to : TApplication._PROC_0046D560()
|
004B4B2F E82C8AFBFF call 0046D560
004B4B34 33C0 xor eax, eax
004B4B36 5A pop edx
004B4B37 59 pop ecx
004B4B38 59 pop ecx
004B4B39 648910 mov fs:[eax], edx
****** FINALLY
|
004B4B3C 68CD4B4B00 push $004B4BCD
004B4B41 8D8588FBFFFF lea eax, [ebp+$FFFFFB88]
004B4B47 BA05000000 mov edx, $00000005
* Reference to: System.Proc_00404210
|
004B4B4C E8BFF6F4FF call 00404210
004B4B51 8D859CFBFFFF lea eax, [ebp+$FFFFFB9C]
004B4B57 BA02000000 mov edx, $00000002
* Reference to: System.Proc_00404210
|
004B4B5C E8AFF6F4FF call 00404210
004B4B61 8D85A4FBFFFF lea eax, [ebp+$FFFFFBA4]
* Reference to: System.Proc_004041EC
|
004B4B67 E880F6F4FF call 004041EC
004B4B6C 8D85A8FBFFFF lea eax, [ebp+$FFFFFBA8]
* Reference to: System.Proc_004041EC
|
004B4B72 E875F6F4FF call 004041EC
004B4B77 8D85ACFBFFFF lea eax, [ebp+$FFFFFBAC]
* Reference to: System.Proc_004041EC
|
004B4B7D E86AF6F4FF call 004041EC
004B4B82 8D85B0FBFFFF lea eax, [ebp+$FFFFFBB0]
* Reference to: System.Proc_004041EC
|
004B4B88 E85FF6F4FF call 004041EC
004B4B8D 8D85B4FBFFFF lea eax, [ebp+$FFFFFBB4]
* Reference to: System.Proc_004041EC
|
004B4B93 E854F6F4FF call 004041EC
004B4B98 8D85B8FBFFFF lea eax, [ebp+$FFFFFBB8]
004B4B9E BA06000000 mov edx, $00000006
* Reference to: System.Proc_00404210
|
004B4BA3 E868F6F4FF call 00404210
004B4BA8 8D45E4 lea eax, [ebp-$1C]
004B4BAB BA02000000 mov edx, $00000002
* Reference to: System.Proc_00404210
|
004B4BB0 E85BF6F4FF call 00404210
004B4BB5 8D45F0 lea eax, [ebp-$10]
004B4BB8 BA02000000 mov edx, $00000002
* Reference to: System.Proc_00404210
|
004B4BBD E84EF6F4FF call 00404210
004B4BC2 C3 ret
004B4BC3 E908F0F4FF jmp 00403BD0
004B4BC8 E974FFFFFF jmp 004B4B41
****** END
|
004B4BCD 5F pop edi
004B4BCE 5E pop esi
004B4BCF 5B pop ebx
004B4BD0 8BE5 mov esp, ebp
004B4BD2 5D pop ebp
004B4BD3 C3 ret
*)
end;
procedure TFormnew.suiButton4Click(Sender : TObject);
begin
(*
004B4CAC 55 push ebp
004B4CAD 8BEC mov ebp, esp
004B4CAF 6A00 push $00
004B4CB1 53 push ebx
004B4CB2 8BD8 mov ebx, eax
004B4CB4 33C0 xor eax, eax
004B4CB6 55 push ebp
* Possible String Reference to: '槿铘
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -