procedure Tzc.BitBtn3Click(Sender : TObject);
begin
(*
0041CB54 55 push ebp
0041CB55 8BEC mov ebp, esp
0041CB57 81C43CFFFFFF add esp, $FFFFFF3C
0041CB5D 53 push ebx
0041CB5E 56 push esi
0041CB5F 57 push edi
0041CB60 899550FFFFFF mov [ebp+$FFFFFF50], edx
0041CB66 898554FFFFFF mov [ebp+$FFFFFF54], eax
0041CB6C B810EB4C00 mov eax, $004CEB10
* Reference to : Tzc._PROC_0041F164()
|
0041CB71 E8EE250000 call 0041F164
0041CB76 66C78568FFFFFF0800 mov word ptr [ebp+$FFFFFF68], $0008
0041CB7F 8D45F0 lea eax, [ebp-$10]
|
0041CB82 E8095AFEFF call 00402590
0041CB87 8BD0 mov edx, eax
0041CB89 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041CB8F 8B8D54FFFFFF mov ecx, [ebp+$FFFFFF54]
0041CB95 8B81EC020000 mov eax, [ecx+$02EC]
* Reference to: @Controls@TControl@GetText$qqrv()
|
0041CB9B E8F4570A00 call 004C2394
0041CBA0 8D45F0 lea eax, [ebp-$10]
|
0041CBA3 E82CF5FFFF call 0041C0D4
0041CBA8 84C0 test al, al
0041CBAA 757C jnz 0041CC28
0041CBAC 8D45EC lea eax, [ebp-$14]
|
0041CBAF E8DC59FEFF call 00402590
0041CBB4 8BD0 mov edx, eax
0041CBB6 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041CBBC 8B8D54FFFFFF mov ecx, [ebp+$FFFFFF54]
0041CBC2 8B81EC020000 mov eax, [ecx+$02EC]
* Reference to: @Controls@TControl@GetText$qqrv()
|
0041CBC8 E8C7570A00 call 004C2394
0041CBCD 8D55EC lea edx, [ebp-$14]
0041CBD0 52 push edx
0041CBD1 8D45E8 lea eax, [ebp-$18]
|
0041CBD4 E8B759FEFF call 00402590
0041CBD9 8BD0 mov edx, eax
0041CBDB FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041CBE1 58 pop eax
|
0041CBE2 E8AD3F0A00 call 004C0B94
0041CBE7 8D45E8 lea eax, [ebp-$18]
|
0041CBEA E8056EFEFF call 004039F4
0041CBEF 83F823 cmp eax, +$23
0041CBF2 0F95C2 setnz dl
0041CBF5 83E201 and edx, +$01
0041CBF8 52 push edx
0041CBF9 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041CBFF 8D45E8 lea eax, [ebp-$18]
0041CC02 BA02000000 mov edx, $00000002
|
0041CC07 E8D43C0A00 call 004C08E0
0041CC0C FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041CC12 8D45EC lea eax, [ebp-$14]
0041CC15 BA02000000 mov edx, $00000002
|
0041CC1A E8C13C0A00 call 004C08E0
0041CC1F 59 pop ecx
0041CC20 85C9 test ecx, ecx
0041CC22 7504 jnz 0041CC28
0041CC24 33C0 xor eax, eax
0041CC26 EB05 jmp 0041CC2D
0041CC28 B801000000 mov eax, $00000001
0041CC2D 50 push eax
0041CC2E FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041CC34 8D45F0 lea eax, [ebp-$10]
0041CC37 BA02000000 mov edx, $00000002
|
0041CC3C E89F3C0A00 call 004C08E0
0041CC41 59 pop ecx
0041CC42 84C9 test cl, cl
0041CC44 7443 jz 0041CC89
0041CC46 6A10 push $10
* Possible String Reference to: '提示信息'
|
0041CC48 681DE24C00 push $004CE21D
* Possible String Reference to: '反馈注册码错误！'
|
0041CC4D 680CE24C00 push $004CE20C
0041CC52 8B8554FFFFFF mov eax, [ebp+$FFFFFF54]
* Reference to: @Controls@TW0041CC46inControl@GetHandle$qqrv()
|
0041CC58 E89B560A00 call 004C22F8
0041CC5D 50 push eax
* Reference to: MessageBoxA()
|
0041CC5E E81B5E0A00 call 004C2A7E
0041CC63 8B9554FFFFFF mov edx, [ebp+$FFFFFF54]
0041CC69 8B82EC020000 mov eax, [edx+$02EC]
0041CC6F 8B10 mov edx, [eax]
0041CC71 FF92B0000000 call dword ptr [edx+$00B0]
0041CC77 8B8D58FFFFFF mov ecx, [ebp+$FFFFFF58]
0041CC7D 64890D00000000 mov fs:[$00000000], ecx
0041CC84 E9C2080000 jmp 0041D54B
0041CC89 66C78568FFFFFF2000 mov word ptr [ebp+$FFFFFF68], $0020
0041CC92 8D45E4 lea eax, [ebp-$1C]
|
0041CC95 E8F658FEFF call 00402590
0041CC9A 8BD0 mov edx, eax
0041CC9C FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041CCA2 8B8D54FFFFFF mov ecx, [ebp+$FFFFFF54]
0041CCA8 8B81EC020000 mov eax, [ecx+$02EC]
* Reference to: @Controls@TControl@GetText$qqrv()
|
0041CCAE E8E1560A00 call 004C2394
0041CCB3 8D55E4 lea edx, [ebp-$1C]
0041CCB6 FF32 push dword ptr [edx]
0041CCB8 8D45FC lea eax, [ebp-$04]
|
0041CCBB E8D058FEFF call 00402590
0041CCC0 8BC8 mov ecx, eax
0041CCC2 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041CCC8 8B1500B45000 mov edx, [$0050B400]
0041CCCE 8B02 mov eax, [edx]
0041CCD0 5A pop edx
* Reference to : Tdljm.hy()
|
0041CCD1 E87E65FEFF call 00403254
0041CCD6 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041CCDC 8D45E4 lea eax, [ebp-$1C]
0041CCDF BA02000000 mov edx, $00000002
|
0041CCE4 E8F73B0A00 call 004C08E0
0041CCE9 66C78568FFFFFF1400 mov word ptr [ebp+$FFFFFF68], $0014
0041CCF2 8D45FC lea eax, [ebp-$04]
|
0041CCF5 E8DAF3FFFF call 0041C0D4
0041CCFA 84C0 test al, al
0041CCFC 7456 jz 0041CD54
0041CCFE 6A10 push $10
* Possible String Reference to: '提示信息'
|
0041CD00 6837E24C00 push $004CE237
* Possible String Reference to: '反馈注册码错误！'
|
0041CD05 6826E24C00 push $004CE226
0041CD0A 8B8554FFFFFF mov eax, [ebp+$FFFFFF54]
* Reference to: @Controls@TWinControl@GetHandle$qqrv()
|
0041CD10 E8E3550A00 call 004C22F8
0041CD15 50 push eax
* Reference to: MessageBoxA()
|
0041CD16 E8635D0A00 call 004C2A7E
0041CD1B 8B9554FFFFFF mov edx, [ebp+$FFFFFF54]
0041CD21 8B82EC020000 mov eax, [edx+$02EC]
0041CD27 8B10 mov edx, [eax]
0041CD29 FF92B0000000 call dword ptr [edx+$00B0]
0041CD2F FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041CD35 8D45FC lea eax, [ebp-$04]
0041CD38 BA02000000 mov edx, $00000002
|
0041CD3D E89E3B0A00 call 004C08E0
0041CD42 8B8D58FFFFFF mov ecx, [ebp+$FFFFFF58]
0041CD48 64890D00000000 mov fs:[$00000000], ecx
0041CD4F E9F7070000 jmp 0041D54B
0041CD54 66C78568FFFFFF2C00 mov word ptr [ebp+$FFFFFF68], $002C
0041CD5D 8D45F8 lea eax, [ebp-$08]
|
0041CD60 E82B58FEFF call 00402590
0041CD65 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041CD6B 66C78568FFFFFF1400 mov word ptr [ebp+$FFFFFF68], $0014
0041CD74 8D45FC lea eax, [ebp-$04]
|
0041CD77 E8786CFEFF call 004039F4
0041CD7C 89854CFFFFFF mov [ebp+$FFFFFF4C], eax
0041CD82 83BD4CFFFFFF00 cmp dword ptr [ebp+$FFFFFF4C], +$00
0041CD89 7E58 jle 0041CDE3
0041CD8B 66C78568FFFFFF3800 mov word ptr [ebp+$FFFFFF68], $0038
0041CD94 8D45E0 lea eax, [ebp-$20]
|
0041CD97 E8F457FEFF call 00402590
0041CD9C 50 push eax
0041CD9D FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041CDA3 8D45FC lea eax, [ebp-$04]
0041CDA6 B901000000 mov ecx, $00000001
0041CDAB 8B954CFFFFFF mov edx, [ebp+$FFFFFF4C]
|
0041CDB1 E8663E0A00 call 004C0C1C
0041CDB6 8D55E0 lea edx, [ebp-$20]
0041CDB9 8D45F8 lea eax, [ebp-$08]
|
0041CDBC E8633B0A00 call 004C0924
0041CDC1 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041CDC7 8D45E0 lea eax, [ebp-$20]
0041CDCA BA02000000 mov edx, $00000002
|
0041CDCF E80C3B0A00 call 004C08E0
0041CDD4 FF8D4CFFFFFF dec dword ptr [ebp+$FFFFFF4C]
0041CDDA 83BD4CFFFFFF00 cmp dword ptr [ebp+$FFFFFF4C], +$00
0041CDE1 7FA8 jnle 0041CD8B
0041CDE3 66C78568FFFFFF4400 mov word ptr [ebp+$FFFFFF68], $0044
0041CDEC 8D45F4 lea eax, [ebp-$0C]
|
0041CDEF E89C57FEFF call 00402590
0041CDF4 8BD0 mov edx, eax
0041CDF6 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041CDFC 8B0D00B45000 mov ecx, [$0050B400]
0041CE02 8B01 mov eax, [ecx]
* Reference to : Tlogo._PROC_004054B0()
|
0041CE04 E8A786FEFF call 004054B0
0041CE09 66C78568FFFFFF1400 mov word ptr [ebp+$FFFFFF68], $0014
0041CE12 8D45F4 lea eax, [ebp-$0C]
|
0041CE15 E8DA6BFEFF call 004039F4
0041CE1A 83F808 cmp eax, +$08
0041CE1D 7E48 jle 0041CE67
0041CE1F 66C78568FFFFFF5000 mov word ptr [ebp+$FFFFFF68], $0050
0041CE28 8D45DC lea eax, [ebp-$24]
|
0041CE2B E86057FEFF call 00402590
0041CE30 50 push eax
0041CE31 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041CE37 8D45F4 lea eax, [ebp-$0C]
0041CE3A B908000000 mov ecx, $00000008
0041CE3F BA01000000 mov edx, $00000001
|
0041CE44 E8D33D0A00 call 004C0C1C
0041CE49 8D55DC lea edx, [ebp-$24]
0041CE4C 8D45F4 lea eax, [ebp-$0C]
|
0041CE4F E8BC3A0A00 call 004C0910
0041CE54 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041CE5A 8D45DC lea eax, [ebp-$24]
0041CE5D BA02000000 mov edx, $00000002
|
0041CE62 E8793A0A00 call 004C08E0
0041CE67 8D55F4 lea edx, [ebp-$0C]
0041CE6A 8D45F8 lea eax, [ebp-$08]
|
0041CE6D E8523B0A00 call 004C09C4
0041CE72 84C0 test al, al
0041CE74 0F845A060000 jz 0041D4D4
0041CE7A 8B0D04B45000 mov ecx, [$0050B404]
0041CE80 8B01 mov eax, [ecx]
0041CE82 8B80EC000000 mov eax, [eax+$00EC]
* Reference to: @Db@TDataSet@Close$qqrv()
|
0041CE88 E811580A00 call 004C269E
0041CE8D 8B1504B45000 mov edx, [$0050B404]
0041CE93 8B0A mov ecx, [edx]
0041CE95 8B81EC000000 mov eax, [ecx+$00EC]
0041CE9B 0538020000 add eax, +$00000238
0041CEA0 898548FFFFFF mov [ebp+$FFFFFF48], eax
0041CEA6 8B9548FFFFFF mov edx, [ebp+$FFFFFF48]
0041CEAC 8B02 mov eax, [edx]
0041CEAE 8B10 mov edx, [eax]
0041CEB0 FF5240 call dword ptr [edx+$40]
0041CEB3 8B0D04B45000 mov ecx, [$0050B404]
0041CEB9 8B01 mov eax, [ecx]
0041CEBB 8B90EC000000 mov edx, [eax+$00EC]
0041CEC1 81C238020000 add edx, $00000238
0041CEC7 899544FFFFFF mov [ebp+$FFFFFF44], edx
0041CECD 66C78568FFFFFF5C00 mov word ptr [ebp+$FFFFFF68], $005C
* Possible String Reference to: 'update posreg set fkm1=:fkm1,fkm2=:
| fkm2,fkm3=:fkm3'
|
0041CED6 BA40E24C00 mov edx, $004CE240
0041CEDB 8D45CC lea eax, [ebp-$34]
|
0041CEDE E831380A00 call 004C0714
0041CEE3 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041CEE9 8B10 mov edx, [eax]
0041CEEB 8B8544FFFFFF mov eax, [ebp+$FFFFFF44]
0041CEF1 8B00 mov eax, [eax]
0041CEF3 8B08 mov ecx, [eax]
0041CEF5 FF5134 call dword ptr [ecx+$34]
0041CEF8 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041CEFE 8D45CC lea eax, [ebp-$34]
0041CF01 BA02000000 mov edx, $00000002
|
0041CF06 E8D5390A00 call 004C08E0
0041CF0B 8D45C4 lea eax, [ebp-$3C]
|
0041CF0E E87D56FEFF call 00402590
0041CF13 8BD0 mov edx, eax
0041CF15 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041CF1B 8B8D54FFFFFF mov ecx, [ebp+$FFFFFF54]
0041CF21 8B81EC020000 mov eax, [ecx+$02EC]
* Reference to: @Controls@TControl@GetText$qqrv()
|
0041CF27 E868540A00 call 004C2394
0041CF2C 8D55C4 lea edx, [ebp-$3C]
0041CF2F 52 push edx
0041CF30 8D45C0 lea eax, [ebp-$40]
|
0041CF33 E85856FEFF call 00402590
0041CF38 8BD0 mov edx, eax
0041CF3A FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041CF40 58 pop eax
|
0041CF41 E84E3C0A00 call 004C0B94
0041CF46 8D55C0 lea edx, [ebp-$40]
0041CF49 FF32 push dword ptr [edx]
0041CF4B 66C78568FFFFFF6800 mov word ptr [ebp+$FFFFFF68], $0068
* Possible String Reference to: 'fkm1'
|
0041CF54 BA73E24C00 mov edx, $004CE273
0041CF59 8D45C8 lea eax, [ebp-$38]
|
0041CF5C E8B3370A00 call 004C0714
0041CF61 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041CF67 8B10 mov edx, [eax]
0041CF69 A104B45000 mov eax, dword ptr [$0050B404]
0041CF6E 8B08 mov ecx, [eax]
0041CF70 8B81EC000000 mov eax, [ecx+$00EC]
* Reference to: @Dbtables@TQuery@ParamByName$qqrx17System@AnsiString()
|
0041CF76 E8FF570A00 call 004C277A
0041CF7B 5A pop edx
* Reference to: @Db@TParam@SetAsString$qqrx17System@AnsiString()
|
0041CF7C E82F570A00 call 004C26B0
0041CF81 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041CF87 8D45C0 lea eax, [ebp-$40]
0041CF8A BA02000000 mov edx, $00000002
|
0041CF8F E84C390A00 call 004C08E0
0041CF94 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041CF9A 8D45C4 lea eax, [ebp-$3C]
0041CF9D BA02000000 mov edx, $00000002
|
0041CFA2 E839390A00 call 004C08E0
0041CFA7 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041CFAD 8D45C8 lea eax, [ebp-$38]
0041CFB0 BA02000000 mov edx, $00000002
|
0041CFB5 E826390A00 call 004C08E0
0041CFBA 66C78568FFFFFF8000 mov word ptr [ebp+$FFFFFF68], $0080
0041CFC3 BA78E24C00 mov edx, $004CE278
0041CFC8 8D45D8 lea eax, [ebp-$28]
|
0041CFCB E844370A00 call 004C0714
0041CFD0 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041CFD6 66C78568FFFFFF7400 mov word ptr [ebp+$FFFFFF68], $0074
0041CFDF 66C78568FFFFFF8C00 mov word ptr [ebp+$FFFFFF68], $008C
0041CFE8 BA79E24C00 mov edx, $004CE279
0041CFED 8D45D4 lea eax, [ebp-$2C]
|
0041CFF0 E81F370A00 call 004C0714
0041CFF5 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041CFFB 66C78568FFFFFF7400 mov word ptr [ebp+$FFFFFF68], $0074
0041D004 C78540FFFFFF01000000 mov dword ptr [ebp+$FFFFFF40], $00000001
0041D00E 66C78568FFFFFF9800 mov word ptr [ebp+$FFFFFF68], $0098
0041D017 8D45BC lea eax, [ebp-$44]
|
0041D01A E87155FEFF call 00402590
0041D01F 50 push eax
0041D020 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
* Reference to: _rand()
|
0041D026 E8475B0A00 call 004C2B72
0041D02B B90A000000 mov ecx, $0000000A
0041D030 99 cdq
0041D031 F7F9 idiv ecx
0041D033 8BC2 mov eax, edx
0041D035 5A pop edx
* Reference to: @Sysutils@IntToStr$qqri()
|
0041D036 E8654E0A00 call 004C1EA0
0041D03B 8D55BC lea edx, [ebp-$44]
0041D03E 8D45D8 lea eax, [ebp-$28]
|
0041D041 E8DE380A00 call 004C0924
0041D046 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D04C 8D45BC lea eax, [ebp-$44]
0041D04F BA02000000 mov edx, $00000002
|
0041D054 E887380A00 call 004C08E0
0041D059 66C78568FFFFFFA400 mov word ptr [ebp+$FFFFFF68], $00A4
0041D062 8D45B8 lea eax, [ebp-$48]
|
0041D065 E82655FEFF call 00402590
0041D06A 50 push eax
0041D06B FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
* Reference to: _rand()
|
0041D071 E8FC5A0A00 call 004C2B72
0041D076 B90A000000 mov ecx, $0000000A
0041D07B 99 cdq
0041D07C F7F9 idiv ecx
0041D07E 8BC2 mov eax, edx
0041D080 5A pop edx
* Reference to: @Sysutils@IntToStr$qqri()
|
0041D081 E81A4E0A00 call 004C1EA0
0041D086 8D55B8 lea edx, [ebp-$48]
0041D089 8D45D4 lea eax, [ebp-$2C]
|
0041D08C E893380A00 call 004C0924
0041D091 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D097 8D45B8 lea eax, [ebp-$48]
0041D09A BA02000000 mov edx, $00000002
|
0041D09F E83C380A00 call 004C08E0
0041D0A4 FF8540FFFFFF inc dword ptr [ebp+$FFFFFF40]
0041D0AA 83BD40FFFFFF23 cmp dword ptr [ebp+$FFFFFF40], +$23
0041D0B1 0F8E57FFFFFF jle 0041D00E
0041D0B7 66C78568FFFFFFB000 mov word ptr [ebp+$FFFFFF68], $00B0
* Possible String Reference to: 'fkm2'
|
0041D0C0 BA7AE24C00 mov edx, $004CE27A
0041D0C5 8D45B4 lea eax, [ebp-$4C]
|
0041D0C8 E847360A00 call 004C0714
0041D0CD FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041D0D3 8B10 mov edx, [eax]
0041D0D5 A104B45000 mov eax, dword ptr [$0050B404]
0041D0DA 8B08 mov ecx, [eax]
0041D0DC 8B81EC000000 mov eax, [ecx+$00EC]
* Reference to: @Dbtables@TQuery@ParamByName$qqrx17System@AnsiString()
|
0041D0E2 E893560A00 call 004C277A
0041D0E7 8B55D8 mov edx, [ebp-$28]
* Reference to: @Db@TParam@SetAsString$qqrx17System@AnsiString()
|
0041D0EA E8C1550A00 call 004C26B0
0041D0EF FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D0F5 8D45B4 lea eax, [ebp-$4C]
0041D0F8 BA02000000 mov edx, $00000002
|
0041D0FD E8DE370A00 call 004C08E0
0041D102 66C78568FFFFFFBC00 mov word ptr [ebp+$FFFFFF68], $00BC
* Possible String Reference to: 'fkm3'
|
0041D10B BA7FE24C00 mov edx, $004CE27F
0041D110 8D45B0 lea eax, [ebp-$50]
|
0041D113 E8FC350A00 call 004C0714
0041D118 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041D11E 8B10 mov edx, [eax]
0041D120 A104B45000 mov eax, dword ptr [$0050B404]
0041D125 8B08 mov ecx, [eax]
0041D127 8B81EC000000 mov eax, [ecx+$00EC]
* Reference to: @Dbtables@TQuery@ParamByName$qqrx17System@AnsiString()
|
0041D12D E848560A00 call 004C277A
0041D132 8B55D4 mov edx, [ebp-$2C]
* Reference to: @Db@TParam@SetAsString$qqrx17System@AnsiString()
|
0041D135 E876550A00 call 004C26B0
0041D13A FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D140 8D45B0 lea eax, [ebp-$50]
0041D143 BA02000000 mov edx, $00000002
|
0041D148 E893370A00 call 004C08E0
0041D14D 8B0D04B45000 mov ecx, [$0050B404]
0041D153 8B01 mov eax, [ecx]
0041D155 8B80EC000000 mov eax, [eax+$00EC]
* Reference to: @Dbtables@TQuery@ExecSQL$qqrv()
|
0041D15B E814560A00 call 004C2774
0041D160 8B1504B45000 mov edx, [$0050B404]
0041D166 8B0A mov ecx, [edx]
0041D168 8B81EC000000 mov eax, [ecx+$00EC]
* Reference to: @Db@TDataSet@Close$qqrv()
|
0041D16E E82B550A00 call 004C269E
0041D173 8D45A4 lea eax, [ebp-$5C]
|
0041D176 E81554FEFF call 00402590
0041D17B 8BD0 mov edx, eax
0041D17D FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041D183 B828B55000 mov eax, $0050B528
|
0041D188 E8073A0A00 call 004C0B94
0041D18D 8D55A4 lea edx, [ebp-$5C]
0041D190 FF32 push dword ptr [edx]
* Possible String Reference to: '注册码'
|
0041D192 BA8BE24C00 mov edx, $004CE28B
0041D197 8D45A8 lea eax, [ebp-$58]
|
0041D19A E875350A00 call 004C0714
0041D19F FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041D1A5 FF30 push dword ptr [eax]
0041D1A7 66C78568FFFFFFC800 mov word ptr [ebp+$FFFFFF68], $00C8
* Possible String Reference to: '注册码'
|
0041D1B0 BA84E24C00 mov edx, $004CE284
0041D1B5 8D45AC lea eax, [ebp-$54]
|
0041D1B8 E857350A00 call 004C0714
0041D1BD FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041D1C3 8B10 mov edx, [eax]
0041D1C5 A104B45000 mov eax, dword ptr [$0050B404]
0041D1CA 8B08 mov ecx, [eax]
0041D1CC 8B818C010000 mov eax, [ecx+$018C]
0041D1D2 59 pop ecx
0041D1D3 8B18 mov ebx, [eax]
0041D1D5 FF5304 call dword ptr [ebx+$04]
0041D1D8 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D1DE 8D45A4 lea eax, [ebp-$5C]
0041D1E1 BA02000000 mov edx, $00000002
|
0041D1E6 E8F5360A00 call 004C08E0
0041D1EB FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D1F1 8D45A8 lea eax, [ebp-$58]
0041D1F4 BA02000000 mov edx, $00000002
|
0041D1F9 E8E2360A00 call 004C08E0
0041D1FE FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D204 8D45AC lea eax, [ebp-$54]
0041D207 BA02000000 mov edx, $00000002
|
0041D20C E8CF360A00 call 004C08E0
0041D211 8D4598 lea eax, [ebp-$68]
|
0041D214 E87753FEFF call 00402590
0041D219 8BD0 mov edx, eax
0041D21B FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041D221 8B8D54FFFFFF mov ecx, [ebp+$FFFFFF54]
0041D227 8B81EC020000 mov eax, [ecx+$02EC]
* Reference to: @Controls@TControl@GetText$qqrv()
|
0041D22D E862510A00 call 004C2394
0041D232 8D5598 lea edx, [ebp-$68]
0041D235 52 push edx
0041D236 8D4594 lea eax, [ebp-$6C]
|
0041D239 E85253FEFF call 00402590
0041D23E 8BD0 mov edx, eax
0041D240 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041D246 58 pop eax
|
0041D247 E848390A00 call 004C0B94
0041D24C 8D5594 lea edx, [ebp-$6C]
0041D24F FF32 push dword ptr [edx]
* Possible String Reference to: '反馈码'
|
0041D251 BA99E24C00 mov edx, $004CE299
0041D256 8D459C lea eax, [ebp-$64]
|
0041D259 E8B6340A00 call 004C0714
0041D25E FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041D264 FF30 push dword ptr [eax]
0041D266 66C78568FFFFFFD400 mov word ptr [ebp+$FFFFFF68], $00D4
* Possible String Reference to: '注册码'
|
0041D26F BA92E24C00 mov edx, $004CE292
0041D274 8D45A0 lea eax, [ebp-$60]
|
0041D277 E898340A00 call 004C0714
0041D27C FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041D282 8B10 mov edx, [eax]
0041D284 A104B45000 mov eax, dword ptr [$0050B404]
0041D289 8B08 mov ecx, [eax]
0041D28B 8B818C010000 mov eax, [ecx+$018C]
0041D291 59 pop ecx
0041D292 8B18 mov ebx, [eax]
0041D294 FF5304 call dword ptr [ebx+$04]
0041D297 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D29D 8D4594 lea eax, [ebp-$6C]
0041D2A0 BA02000000 mov edx, $00000002
|
0041D2A5 E836360A00 call 004C08E0
0041D2AA FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D2B0 8D4598 lea eax, [ebp-$68]
0041D2B3 BA02000000 mov edx, $00000002
|
0041D2B8 E823360A00 call 004C08E0
0041D2BD FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D2C3 8D459C lea eax, [ebp-$64]
0041D2C6 BA02000000 mov edx, $00000002
|
0041D2CB E810360A00 call 004C08E0
0041D2D0 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D2D6 8D45A0 lea eax, [ebp-$60]
0041D2D9 BA02000000 mov edx, $00000002
|
0041D2DE E8FD350A00 call 004C08E0
0041D2E3 66C78568FFFFFFE000 mov word ptr [ebp+$FFFFFF68], $00E0
0041D2EC 8D45D0 lea eax, [ebp-$30]
|
0041D2EF E89C52FEFF call 00402590
0041D2F4 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041D2FA 66C78568FFFFFF7400 mov word ptr [ebp+$FFFFFF68], $0074
0041D303 B201 mov dl, $01
0041D305 A1C8F35000 mov eax, dword ptr [$0050F3C8]
* Reference to: @Registry@TRegistry@$bctr$qqrv()
|
0041D30A E8FF520A00 call 004C260E
0041D30F 89853CFFFFFF mov [ebp+$FFFFFF3C], eax
0041D315 66C78568FFFFFFEC00 mov word ptr [ebp+$FFFFFF68], $00EC
0041D31E BA00000080 mov edx, $80000000
0041D323 8B853CFFFFFF mov eax, [ebp+$FFFFFF3C]
|
0041D329 E85A330A00 call 004C0688
0041D32E 66C78568FFFFFFF800 mov word ptr [ebp+$FFFFFF68], $00F8
* Possible String Reference to: 'Licenses\4250E830-6AC2-11cf-8ADB-00
| AA00C00905'
|
0041D337 BAA0E24C00 mov edx, $004CE2A0
0041D33C 8D4590 lea eax, [ebp-$70]
|
0041D33F E8D0330A00 call 004C0714
0041D344 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041D34A 8B10 mov edx, [eax]
0041D34C 33C9 xor ecx, ecx
0041D34E 8B853CFFFFFF mov eax, [ebp+$FFFFFF3C]
* Reference to: @Registry@TRegistry@OpenKey$qqrx17System@AnsiStringo()
|
0041D354 E8A3520A00 call 004C25FC
0041D359 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D35F 8D4590 lea eax, [ebp-$70]
0041D362 BA02000000 mov edx, $00000002
|
0041D367 E874350A00 call 004C08E0
* Possible String Reference to: 'kjljvjjjoquqmjjjvpqqkqmqykypoqjquou
| n'
|
0041D36C BAD2E24C00 mov edx, $004CE2D2
0041D371 8D4588 lea eax, [ebp-$78]
|
0041D374 E89B330A00 call 004C0714
0041D379 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041D37F FF30 push dword ptr [eax]
0041D381 66C78568FFFFFF0401 mov word ptr [ebp+$FFFFFF68], $0104
* Possible String Reference to: 'reg'
|
0041D38A BACEE24C00 mov edx, $004CE2CE
0041D38F 8D458C lea eax, [ebp-$74]
|
0041D392 E87D330A00 call 004C0714
0041D397 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041D39D 8B10 mov edx, [eax]
0041D39F 8B853CFFFFFF mov eax, [ebp+$FFFFFF3C]
0041D3A5 59 pop ecx
* Reference to: @Registry@TRegistry@WriteString$qqrx17System@AnsiStringt1()
|
0041D3A6 E84B520A00 call 004C25F6
0041D3AB FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D3B1 8D4588 lea eax, [ebp-$78]
0041D3B4 BA02000000 mov edx, $00000002
|
0041D3B9 E822350A00 call 004C08E0
0041D3BE FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D3C4 8D458C lea eax, [ebp-$74]
0041D3C7 BA02000000 mov edx, $00000002
|
0041D3CC E80F350A00 call 004C08E0
0041D3D1 66C78568FFFFFF1001 mov word ptr [ebp+$FFFFFF68], $0110
* Possible String Reference to: 'reg_cs'
|
0041D3DA BAF7E24C00 mov edx, $004CE2F7
0041D3DF 8D4584 lea eax, [ebp-$7C]
|
0041D3E2 E82D330A00 call 004C0714
0041D3E7 FF8574FFFFFF inc dword ptr [ebp+$FFFFFF74]
0041D3ED 8B10 mov edx, [eax]
0041D3EF B93C000000 mov ecx, $0000003C
0041D3F4 8B853CFFFFFF mov eax, [ebp+$FFFFFF3C]
* Reference to: @Registry@TRegistry@WriteInteger$qqrx17System@AnsiStringi()
|
0041D3FA E8EB510A00 call 004C25EA
0041D3FF FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D405 8D4584 lea eax, [ebp-$7C]
0041D408 BA02000000 mov edx, $00000002
|
0041D40D E8CE340A00 call 004C08E0
0041D412 66C78568FFFFFF7400 mov word ptr [ebp+$FFFFFF68], $0074
0041D41B 8B8D3CFFFFFF mov ecx, [ebp+$FFFFFF3C]
0041D421 898D7CFFFFFF mov [ebp+$FFFFFF7C], ecx
0041D427 83BD7CFFFFFF00 cmp dword ptr [ebp+$FFFFFF7C], +$00
0041D42E 742D jz 0041D45D
0041D430 8B857CFFFFFF mov eax, [ebp+$FFFFFF7C]
0041D436 8B10 mov edx, [eax]
0041D438 895580 mov [ebp-$80], edx
0041D43B 66C78568FFFFFF2801 mov word ptr [ebp+$FFFFFF68], $0128
0041D444 BA03000000 mov edx, $00000003
0041D449 8B857CFFFFFF mov eax, [ebp+$FFFFFF7C]
0041D44F 8B08 mov ecx, [eax]
0041D451 FF51FC call dword ptr [ecx-$04]
0041D454 66C78568FFFFFF1C01 mov word ptr [ebp+$FFFFFF68], $011C
0041D45D 6683BD6AFFFFFF00 cmp word ptr [ebp+$FFFFFF6A], +$00
0041D465 7401 jz 0041D468
0041D467 C3 ret
0041D468 6A00 push $00
* Possible String Reference to: '提示信息'
|
0041D46A 681EE34C00 push $004CE31E
* Possible String Reference to: '注册成功,感谢你对本软件的支持！'
|
0041D46F 68FEE24C00 push $004CE2FE
0041D474 8B8554FFFFFF mov eax, [ebp+$FFFFFF54]
* Reference to: @Controls@TWinControl@GetHandle$qqrv()
|
0041D47A E8794E0A00 call 004C22F8
0041D47F 50 push eax
* Reference to: MessageBoxA()
|
0041D480 E8F9550A00 call 004C2A7E
0041D485 8B8554FFFFFF mov eax, [ebp+$FFFFFF54]
* Reference to: @Forms@TCustomForm@Close$qqrv()
|
0041D48B E8124D0A00 call 004C21A2
0041D490 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D496 8D45D0 lea eax, [ebp-$30]
0041D499 BA02000000 mov edx, $00000002
|
0041D49E E83D340A00 call 004C08E0
0041D4A3 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D4A9 8D45D4 lea eax, [ebp-$2C]
0041D4AC BA02000000 mov edx, $00000002
|
0041D4B1 E82A340A00 call 004C08E0
0041D4B6 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D4BC 8D45D8 lea eax, [ebp-$28]
0041D4BF BA02000000 mov edx, $00000002
|
0041D4C4 E817340A00 call 004C08E0
0041D4C9 66C78568FFFFFF1400 mov word ptr [ebp+$FFFFFF68], $0014
0041D4D2 EB31 jmp 0041D505
0041D4D4 6A10 push $10
* Possible String Reference to: '提示信息'
|
0041D4D6 6835E34C00 push $004CE335
* Possible String Reference to: '注 册 失 败！'
|
0041D4DB 6827E34C00 push $004CE327
0041D4E0 8B8554FFFFFF mov eax, [ebp+$FFFFFF54]
* Reference to: @Controls@TWinControl@GetHandle$qqrv()
|
0041D4E6 E80D4E0A00 call 004C22F8
0041D4EB 50 push eax
* Reference to: MessageBoxA()
|
0041D4EC E88D550A00 call 004C2A7E
0041D4F1 8B9554FFFFFF mov edx, [ebp+$FFFFFF54]
0041D4F7 8B82EC020000 mov eax, [edx+$02EC]
0041D4FD 8B10 mov edx, [eax]
0041D4FF FF92B0000000 call dword ptr [edx+$00B0]
0041D505 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D50B 8D45F4 lea eax, [ebp-$0C]
0041D50E BA02000000 mov edx, $00000002
|
0041D513 E8C8330A00 call 004C08E0
0041D518 FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D51E 8D45F8 lea eax, [ebp-$08]
0041D521 BA02000000 mov edx, $00000002
|
0041D526 E8B5330A00 call 004C08E0
0041D52B FF8D74FFFFFF dec dword ptr [ebp+$FFFFFF74]
0041D531 8D45FC lea eax, [ebp-$04]
0041D534 BA02000000 mov edx, $00000002
|
0041D539 E8A2330A00 call 004C08E0
0041D53E 8B8D58FFFFFF mov ecx, [ebp+$FFFFFF58]
0041D544 64890D00000000 mov fs:[$00000000], ecx
0041D54B 8BBD30FFFFFF mov edi, [ebp+$FFFFFF30]
0041D551 8BB534FFFFFF mov esi, [ebp+$FFFFFF34]
0041D557 8B9D38FFFFFF mov ebx, [ebp+$FFFFFF38]
0041D55D 8BE5 mov esp, ebp
0041D55F 5D pop ebp
0041D560 C3 ret
*)
end;
【求助】这是某软件反编译的语句.请指点注册的关键部分,或者分析思路
[注意]APP应用上架合规检测服务，协助应用顺利上架！
