addpic.pas

乐都wil编辑器 3.2 反编译delphi源代码

|
004B1B03   8B9618020000           mov     edx, [esi+$0218]
004B1B09   8BC3                   mov     eax, ebx

* Reference to : TFormadd.Add()
|
004B1B0B   E8BC0A0000             call    004B25CC
004B1B10   E9F6010000             jmp     004B1D0B

* Reference to control TFormadd.RabtnInsert : TsuiRadioButton
|
004B1B15   8B8348030000           mov     eax, [ebx+$0348]

* Reference to field TsuiRadioButton.OFFS_0210
|
004B1B1B   80B81002000000         cmp     byte ptr [eax+$0210], $00
004B1B22   0F84CF000000           jz      004B1BF7
004B1B28   8D55DC                 lea     edx, [ebp-$24]

* Reference to control TFormadd.editBegin : TsuiEdit
|
004B1B2B   8B8340030000           mov     eax, [ebx+$0340]

* Reference to: Controls.Proc_004504F0
|
004B1B31   E8BAE9F9FF             call    004504F0
004B1B36   8B45DC                 mov     eax, [ebp-$24]
004B1B39   8D55F4                 lea     edx, [ebp-$0C]

* Reference to: System.Proc_00402E58
|
004B1B3C   E81713F5FF             call    00402E58
004B1B41   8BF8                   mov     edi, eax
004B1B43   837DF400               cmp     dword ptr [ebp-$0C], +$00
004B1B47   7F13                   jnle    004B1B5C

* Reference to TWIL instance
|
004B1B49   A194B24B00             mov     eax, dword ptr [$004BB294]
004B1B4E   8B00                   mov     eax, [eax]

* Reference to field TWIL.OFFS_0038
|
004B1B50   8B4038                 mov     eax, [eax+$38]
004B1B53   48                     dec     eax
004B1B54   3BF8                   cmp     edi, eax
004B1B56   7F04                   jnle    004B1B5C
004B1B58   85FF                   test    edi, edi
004B1B5A   7D24                   jnl     004B1B80

* Reference to TFormMain instance
|
004B1B5C   A1C0B14B00             mov     eax, dword ptr [$004BB1C0]
004B1B61   8B00                   mov     eax, [eax]

* Possible String Reference to: '请输入正确的编号'
|
004B1B63   BA841D4B00             mov     edx, $004B1D84

* Reference to : TFormMain.showErrMessage()
|
004B1B68   E8DF5E0000             call    004B7A4C

* Reference to control TFormadd.editBegin : TsuiEdit
|
004B1B6D   8B8340030000           mov     eax, [ebx+$0340]
004B1B73   8B10                   mov     edx, [eax]

* Possible reference to virtual method TsuiEdit.OFFS_00C4
|
004B1B75   FF92C4000000           call    dword ptr [edx+$00C4]
004B1B7B   E98F010000             jmp     004B1D0F
004B1B80   8D55D8                 lea     edx, [ebp-$28]

* Reference to control TFormadd.EditEnd : TsuiEdit
|
004B1B83   8B833C030000           mov     eax, [ebx+$033C]

* Reference to: Controls.Proc_004504F0
|
004B1B89   E862E9F9FF             call    004504F0
004B1B8E   8B45D8                 mov     eax, [ebp-$28]
004B1B91   8D55F4                 lea     edx, [ebp-$0C]

* Reference to: System.Proc_00402E58
|
004B1B94   E8BF12F5FF             call    00402E58
004B1B99   8945F8                 mov     [ebp-$08], eax
004B1B9C   837DF400               cmp     dword ptr [ebp-$0C], +$00
004B1BA0   7F1B                   jnle    004B1BBD

* Reference to TWIL instance
|
004B1BA2   A194B24B00             mov     eax, dword ptr [$004BB294]
004B1BA7   8B00                   mov     eax, [eax]

* Reference to field TWIL.OFFS_0038
|
004B1BA9   8B4038                 mov     eax, [eax+$38]
004B1BAC   48                     dec     eax
004B1BAD   3B45F8                 cmp     eax, [ebp-$08]
004B1BB0   7C0B                   jl      004B1BBD
004B1BB2   837DF800               cmp     dword ptr [ebp-$08], +$00
004B1BB6   7C05                   jl      004B1BBD
004B1BB8   3B7DF8                 cmp     edi, [ebp-$08]
004B1BBB   7E24                   jle     004B1BE1

* Reference to TFormMain instance
|
004B1BBD   A1C0B14B00             mov     eax, dword ptr [$004BB1C0]
004B1BC2   8B00                   mov     eax, [eax]

* Possible String Reference to: '请输入正确的编号'
|
004B1BC4   BA841D4B00             mov     edx, $004B1D84

* Reference to : TFormMain.showErrMessage()
|
004B1BC9   E87E5E0000             call    004B7A4C

* Reference to control TFormadd.EditEnd : TsuiEdit
|
004B1BCE   8B833C030000           mov     eax, [ebx+$033C]
004B1BD4   8B10                   mov     edx, [eax]

* Possible reference to virtual method TsuiEdit.OFFS_00C4
|
004B1BD6   FF92C4000000           call    dword ptr [edx+$00C4]
004B1BDC   E92E010000             jmp     004B1D0F
004B1BE1   57                     push    edi
004B1BE2   8A4DF0                 mov     cl, byte ptr [ebp-$10]

* Reference to field TFileListBox.OFFS_0218
|
004B1BE5   8B9618020000           mov     edx, [esi+$0218]
004B1BEB   8BC3                   mov     eax, ebx

* Reference to : TFormadd.InSert()
|
004B1BED   E8B6100000             call    004B2CA8
004B1BF2   E914010000             jmp     004B1D0B

* Reference to control TFormadd.RabtnReplace : TsuiRadioButton
|
004B1BF7   8B834C030000           mov     eax, [ebx+$034C]

* Reference to field TsuiRadioButton.OFFS_0210
|
004B1BFD   80B81002000000         cmp     byte ptr [eax+$0210], $00
004B1C04   0F8401010000           jz      004B1D0B
004B1C0A   8D55D4                 lea     edx, [ebp-$2C]

* Reference to control TFormadd.editBegin : TsuiEdit
|
004B1C0D   8B8340030000           mov     eax, [ebx+$0340]

* Reference to: Controls.Proc_004504F0
|
004B1C13   E8D8E8F9FF             call    004504F0
004B1C18   8B45D4                 mov     eax, [ebp-$2C]
004B1C1B   8D55F4                 lea     edx, [ebp-$0C]

* Reference to: System.Proc_00402E58
|
004B1C1E   E83512F5FF             call    00402E58
004B1C23   8BF8                   mov     edi, eax
004B1C25   837DF400               cmp     dword ptr [ebp-$0C], +$00
004B1C29   7F13                   jnle    004B1C3E

* Reference to TWIL instance
|
004B1C2B   A194B24B00             mov     eax, dword ptr [$004BB294]
004B1C30   8B00                   mov     eax, [eax]

* Reference to field TWIL.OFFS_0038
|
004B1C32   8B4038                 mov     eax, [eax+$38]
004B1C35   48                     dec     eax
004B1C36   3BF8                   cmp     edi, eax
004B1C38   7F04                   jnle    004B1C3E
004B1C3A   85FF                   test    edi, edi
004B1C3C   7D24                   jnl     004B1C62

* Reference to TFormMain instance
|
004B1C3E   A1C0B14B00             mov     eax, dword ptr [$004BB1C0]
004B1C43   8B00                   mov     eax, [eax]

* Possible String Reference to: '请输入正确的编号'
|
004B1C45   BA841D4B00             mov     edx, $004B1D84

* Reference to : TFormMain.showErrMessage()
|
004B1C4A   E8FD5D0000             call    004B7A4C

* Reference to control TFormadd.editBegin : TsuiEdit
|
004B1C4F   8B8340030000           mov     eax, [ebx+$0340]
004B1C55   8B10                   mov     edx, [eax]

* Possible reference to virtual method TsuiEdit.OFFS_00C4
|
004B1C57   FF92C4000000           call    dword ptr [edx+$00C4]
004B1C5D   E9AD000000             jmp     004B1D0F
004B1C62   8D55D0                 lea     edx, [ebp-$30]

* Reference to control TFormadd.EditEnd : TsuiEdit
|
004B1C65   8B833C030000           mov     eax, [ebx+$033C]

* Reference to: Controls.Proc_004504F0
|
004B1C6B   E880E8F9FF             call    004504F0
004B1C70   8B45D0                 mov     eax, [ebp-$30]
004B1C73   8D55F4                 lea     edx, [ebp-$0C]

* Reference to: System.Proc_00402E58
|
004B1C76   E8DD11F5FF             call    00402E58
004B1C7B   8945F8                 mov     [ebp-$08], eax
004B1C7E   837DF400               cmp     dword ptr [ebp-$0C], +$00
004B1C82   7F1B                   jnle    004B1C9F

* Reference to TWIL instance
|
004B1C84   A194B24B00             mov     eax, dword ptr [$004BB294]
004B1C89   8B00                   mov     eax, [eax]

* Reference to field TWIL.OFFS_0038
|
004B1C8B   8B4038                 mov     eax, [eax+$38]
004B1C8E   48                     dec     eax
004B1C8F   3B45F8                 cmp     eax, [ebp-$08]
004B1C92   7C0B                   jl      004B1C9F
004B1C94   837DF800               cmp     dword ptr [ebp-$08], +$00
004B1C98   7C05                   jl      004B1C9F
004B1C9A   3B7DF8                 cmp     edi, [ebp-$08]
004B1C9D   7E21                   jle     004B1CC0

* Reference to TFormMain instance
|
004B1C9F   A1C0B14B00             mov     eax, dword ptr [$004BB1C0]
004B1CA4   8B00                   mov     eax, [eax]

* Possible String Reference to: '请输入正确的编号'
|
004B1CA6   BA841D4B00             mov     edx, $004B1D84

* Reference to : TFormMain.showErrMessage()
|
004B1CAB   E89C5D0000             call    004B7A4C

* Reference to control TFormadd.EditEnd : TsuiEdit
|
004B1CB0   8B833C030000           mov     eax, [ebx+$033C]
004B1CB6   8B10                   mov     edx, [eax]

* Possible reference to virtual method TsuiEdit.OFFS_00C4
|
004B1CB8   FF92C4000000           call    dword ptr [edx+$00C4]
004B1CBE   EB4F                   jmp     004B1D0F

* Reference to field TFileListBox.OFFS_0218
|
004B1CC0   8B8618020000           mov     eax, [esi+$0218]
004B1CC6   8B10                   mov     edx, [eax]
004B1CC8   FF5214                 call    dword ptr [edx+$14]

* Reference to FormMain
|
004B1CCB   8B55F8                 mov     edx, [ebp-$08]
004B1CCE   2BD7                   sub     edx, edi
004B1CD0   42                     inc     edx
004B1CD1   3BC2                   cmp     eax, edx
004B1CD3   7D21                   jnl     004B1CF6

* Reference to TFormMain instance
|
004B1CD5   A1C0B14B00             mov     eax, dword ptr [$004BB1C0]
004B1CDA   8B00                   mov     eax, [eax]

* Possible String Reference to: '图片数目不够！'
|
004B1CDC   BAA01D4B00             mov     edx, $004B1DA0

* Reference to : TFormMain.showErrMessage()
|
004B1CE1   E8665D0000             call    004B7A4C

* Reference to control TFormadd.EditEnd : TsuiEdit
|
004B1CE6   8B833C030000           mov     eax, [ebx+$033C]
004B1CEC   8B10                   mov     edx, [eax]

* Possible reference to virtual method TsuiEdit.OFFS_00C4
|
004B1CEE   FF92C4000000           call    dword ptr [edx+$00C4]
004B1CF4   EB19                   jmp     004B1D0F
004B1CF6   57                     push    edi

* Reference to FormMain
|
004B1CF7   8B45F8                 mov     eax, [ebp-$08]
004B1CFA   50                     push    eax
004B1CFB   8A4DF0                 mov     cl, byte ptr [ebp-$10]

* Reference to field TFileListBox.OFFS_0218
|
004B1CFE   8B9618020000           mov     edx, [esi+$0218]
004B1D04   8BC3                   mov     eax, ebx

* Reference to : TFormadd.Replace()
|
004B1D06   E80D190000             call    004B3618
004B1D0B   C645FF01               mov     byte ptr [ebp-$01], $01
004B1D0F   33C0                   xor     eax, eax
004B1D11   5A                     pop     edx
004B1D12   59                     pop     ecx
004B1D13   59                     pop     ecx
004B1D14   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: '奅