Function at 0x41a6d98
Capabilities:
Reference sql statements

Disassembly:
push ebp
mov ebp, esp
push ecx
mov ecx, 0x55
push 0
push 0
dec ecx
jne 0x41a6da1
push ecx
xchg dword [ebp - 4], ecx
push ebx
push esi
push edi
mov dword [ebp - 8], ecx
mov dword [ebp - 4], edx
mov esi, eax
lea eax, [ebp - 4]
call sub.rtl60.bpl__System__WStrAddRef_qqrr17System_WideString
mov ebx, 0x41d013c
xor eax, eax
push ebp
push 0x41a7b73
push dword fs:[eax]
mov dword fs:[eax], esp
test esi, esi
jne 0x41a6dde
or ebx, 0xffffffff
jmp 0x41a7897
fld qword [ebp + 0x24]
fcomp dword [0x41a7b88]
fnstsw ax
sahf
jne 0x41a6df6
mov ebx, 0xfffffffe
jmp 0x41a7897
cmp dword [ebx], 0
jne 0x41a6e11
mov ecx, 0x41a7b94
mov dl, 1
mov eax, dword [sym.imp.rtl60.bpl__Sysutils_Exception_]
call sub.rtl60.bpl__Sysutils_Exception__bctr_qqrx17System_AnsiString
call sub.rtl60.bpl__System__RaiseExcept_qqrv
inc dword [0x41d0188]
lea edx, [ebp - 0x4c]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x4c]
lea edx, [ebp - 0x48]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x48]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov eax, dword [eax + 0xe4]
call fcn.041b4c9c
cmp eax, dword [0x41d0188]
jge 0x41a7037
cmp byte [0x41d018c], 0
je 0x41a6e6a
mov ecx, 0x41a7bb8
mov dl, 1
mov eax, dword [sym.imp.rtl60.bpl__Sysutils_Exception_]
call sub.rtl60.bpl__Sysutils_Exception__bctr_qqrx17System_AnsiString
jmp 0x41a7037
lea edx, [ebp - 0x54]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x54]
lea edx, [ebp - 0x50]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x50]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov eax, dword [eax + 0xb8]
mov dword [ebp - 0x14], eax
lea edx, [ebp - 0x5c]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x5c]
lea edx, [ebp - 0x58]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x58]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov eax, dword [eax + 0xe4]
mov dword [ebp - 0x18], eax
lea edx, [ebp - 0x64]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x64]
lea edx, [ebp - 0x60]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x60]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov eax, dword [eax + 0x60]
mov dword [ebp - 0x1c], eax
lea edx, [ebp - 0x6c]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x6c]
lea edx, [ebp - 0x68]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x68]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov al, byte [eax + 0xe0]
mov byte [ebp - 0x1d], al
lea edx, [ebp - 0x74]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x74]
lea edx, [ebp - 0x70]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x70]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov edx, dword [eax + 0x18]
mov dword [ebp - 0x38], edx
mov edx, dword [eax + 0x1c]
mov dword [ebp - 0x34], edx
lea edx, [ebp - 0x7c]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x7c]
lea edx, [ebp - 0x78]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x78]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov edx, dword [eax + 0x40]
mov dword [ebp - 0x28], edx
mov edx, dword [eax + 0x44]
mov dword [ebp - 0x24], edx
lea edx, [ebp - 0x84]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x84]
lea edx, [ebp - 0x80]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x80]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov al, byte [eax + 0x20]
mov byte [ebp - 0x29], al
lea edx, [ebp - 0x8c]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x8c]
lea edx, [ebp - 0x88]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x88]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov al, byte [eax + 0x21]
mov byte [ebp - 0x2a], al
push 0
push 0
call fcn.041a6afc
xor eax, eax
mov al, byte [ebp - 0x1d]
mov eax, dword [eax*4 + 0x41cfdd8]
push eax
push dword [ebp - 0x24]
push dword [ebp - 0x28]
push dword [ebp - 0x34]
push dword [ebp - 0x38]
mov ecx, dword [ebp - 0x1c]
mov edx, dword [ebp - 0x18]
mov eax, dword [ebp - 0x14]
call fcn.041a5d78
lea edx, [ebp - 0x94]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x94]
lea edx, [ebp - 0x90]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x90]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov dl, byte [ebp - 0x29]
mov byte [eax + 0x20], dl
lea edx, [ebp - 0x9c]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x9c]
lea edx, [ebp - 0x98]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x98]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov dl, byte [ebp - 0x2a]
mov byte [eax + 0x21], dl
cmp byte [ebp + 0xc], 0
je 0x41a7127
lea eax, [ebp - 0xac]
push eax
mov eax, dword [sym.imp.VEDatasets.bpl__Vedataset_defDonemNo]
mov eax, dword [eax]
push eax
mov dword [ebp - 0xb8], esi
mov byte [ebp - 0xb4], 0
lea eax, [ebp - 0xb8]
push eax
push 0
lea eax, [ebp - 0xb0]
push eax
mov ecx, dword [sym.imp.VEDatasets.bpl__Vedataset_defFirmaNo]
mov ecx, dword [ecx]
mov edx, 0x41a7bdc
mov eax, dword [0x41997b8]
call fcn.0419a73c
mov ecx, dword [ebp - 0xb0]
mov edx, dword [0x41d012c]
mov eax, dword [0x41997b8]
call fcn.0419a2ec
lea edx, [ebp - 0xac]
lea eax, [ebp - 0x10]
call sub.rtl60.bpl__System__VarToLStr_qqrr17System_AnsiStringrx14System_Variant
cmp dword [ebp - 0x10], 0
jne 0x41a70b6
or ebx, 0xffffffff
jmp 0x41a7897
lea edx, [ebp - 0xc4]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0xc4]
lea edx, [ebp - 0xc0]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0xc0]
push eax
push 0
lea eax, [ebp - 0xbc]
push eax
lea edx, [ebp - 0xcc]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0xcc]
lea edx, [ebp - 0xc8]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0xc8]
xor ecx, ecx
mov edx, dword [ebp - 0x10]
mov edi, dword [eax]
call dword [edi + 0x38]
mov edx, dword [ebp - 0xbc]
lea eax, [ebp - 0xc]
mov ecx, 0x41a7c0c
call sub.rtl60.bpl__System__IntfCast_qqrr45System__DelphiInterface_t17System_IInterface_x45System__DelphiInterface_t17System_IInter
jmp 0x41a7175
lea edx, [ebp - 0xd0]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0xd0]
lea edx, [ebp - 0xc]
mov ecx, dword [eax]
call dword [ecx + 0x1c]
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
push eax
lea edx, [ebp - 0x210]
mov eax, esi
call fcn.041a6628
lea edx, [ebp - 0x210]
pop eax
mov ecx, dword [0x419cc48]
call sub.rtl60.bpl__System__CopyRecord_qqrv
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov dword [eax + 0x20], esi
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov edx, dword [ebp + 0x24]
mov dword [eax + 0x30], edx
mov edx, dword [ebp + 0x28]
mov dword [eax + 0x34], edx
fld qword [ebp + 0x1c]
fcomp dword [0x41a7b88]
fnstsw ax
sahf
je 0x41a71ff
cmp byte [ebp + 0x10], 0
je 0x41a71e5
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x80
push eax
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
fild dword [eax + 0x48]
fdiv dword [0x41a7c1c]
fadd dword [0x41a7c20]
fdivr qword [ebp + 0x1c]
fstp xword [ebp - 0x21c]
wait
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
fld qword [eax + 0x30]
fld xword [ebp - 0x21c]
fdivrp st(1)
pop eax
fstp qword [eax]
wait
jmp 0x41a71ff
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov edx, dword [ebp + 0x1c]
mov dword [eax + 0x80], edx
mov edx, dword [ebp + 0x20]
mov dword [eax + 0x84], edx
cmp dword [ebp + 8], 0
je 0x41a7311
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x40
push eax
lea ecx, [ebp - 0x220]
mov edx, 0x41a7c2c
mov eax, dword [ebp + 8]
call fcn.041a8980
mov edx, dword [ebp - 0x220]
pop eax
call sub.rtl60.bpl__System__LStrFromWStr_qqrr17System_AnsiStringx17System_WideString
lea ecx, [ebp - 0x228]
mov edx, 0x41a7c40
mov eax, dword [ebp + 8]
call fcn.041a8980
mov edx, dword [ebp - 0x228]
lea eax, [ebp - 0x224]
call sub.rtl60.bpl__System__LStrFromWStr_qqrr17System_AnsiStringx17System_WideString
mov eax, dword [ebp - 0x224]
call sub.rtl60.bpl__Sysutils_StrToInt_qqrx17System_AnsiString
mov edi, eax
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov dword [eax + 0x48], edi
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x38
push eax
lea ecx, [ebp - 0x230]
mov edx, 0x41a7c4c
mov eax, dword [ebp + 8]
call fcn.041a8980
mov edx, dword [ebp - 0x230]
lea eax, [ebp - 0x22c]
call sub.rtl60.bpl__System__LStrFromWStr_qqrr17System_AnsiStringx17System_WideString
mov eax, dword [ebp - 0x22c]
call sub.rtl60.bpl__Sysutils_StrToFloat_qqrx17System_AnsiString
pop eax
fstp qword [eax]
wait
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
fld qword [eax + 0x38]
fcomp dword [0x41a7b88]
fnstsw ax
sahf
jne 0x41a7311
lea edx, [ebp - 0x238]
mov eax, esi
call sub.rtl60.bpl__Sysutils_IntToStr_qqri
push dword [ebp - 0x238]
push 0x41a7c5c
lea edx, [ebp - 0x23c]
mov eax, dword [ebp + 8]
call sub.rtl60.bpl__Sysutils_IntToStr_qqri
push dword [ebp - 0x23c]
push 0x41a7c68
lea eax, [ebp - 0x234]
mov edx, 4
call sub.rtl60.bpl__System__LStrCatN_qqrv
mov eax, dword [ebp - 0x234]
call sub.vcl60.bpl__Dialogs_ShowMessage_qqrx17System_AnsiString
lea edx, [ebp - 0x244]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x244]
lea edx, [ebp - 0x240]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x240]
mov edx, dword [eax]
call dword [edx + 0x1c]
cmp byte [eax + 0xe0], 0
je 0x41a7369
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x78
push eax
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
pop edx
mov ecx, dword [eax + 0x80]
mov dword [edx], ecx
mov ecx, dword [eax + 0x84]
mov dword [edx + 4], ecx
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov edx, dword [ebp + 0x14]
mov dword [eax + 0x58], edx
mov edx, dword [ebp + 0x18]
mov dword [eax + 0x5c], edx
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0xb8
push eax
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
fld qword [eax + 0x38]
fmul qword [ebp + 0x24]
pop eax
fstp qword [eax]
wait
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x100
mov edx, dword [ebp - 4]
call sub.rtl60.bpl__System__LStrFromWStr_qqrr17System_AnsiStringx17System_WideString
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov edx, dword [ebp - 8]
mov dword [eax + 0x90], edx
lea edx, [ebp - 0x24c]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x24c]
lea edx, [ebp - 0x248]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x248]
mov edx, dword [eax]
call dword [edx + 0x1c]
cmp byte [eax + 0x20], 0
je 0x41a7438
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x88
push eax
push dword [ebp + 0x20]
push dword [ebp + 0x1c]
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov eax, dword [eax + 0x48]
add eax, 0x64
mov dword [ebp - 0x250], eax
fild dword [ebp - 0x250]
fdiv dword [0x41a7c1c]
add esp, 0xfffffff8
fstp qword [esp]
wait
call fcn.04192360
pop eax
fstp qword [eax]
wait
jmp 0x41a7452
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov edx, dword [ebp + 0x1c]
mov dword [eax + 0x88], edx
mov edx, dword [ebp + 0x20]
mov dword [eax + 0x8c], edx
lea edx, [ebp - 0x258]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x258]
lea edx, [ebp - 0x254]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x254]
mov edx, dword [eax]
call dword [edx + 0x1c]
cmp byte [eax + 0x20], 0
je 0x41a75e1
lea edx, [ebp - 0x260]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x260]
lea edx, [ebp - 0x25c]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x25c]
mov edx, dword [eax]
call dword [edx + 0x1c]
cmp byte [eax + 0xa0], 0
jne 0x41a74ed
lea edx, [ebp - 0x268]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x268]
lea edx, [ebp - 0x264]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x264]
mov edx, dword [eax]
call dword [edx + 0x1c]
cmp byte [eax + 0xe0], 0
je 0x41a7598
lea edx, [ebp - 0x270]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x270]
lea edx, [ebp - 0x26c]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x26c]
mov edx, dword [eax]
call dword [edx + 0x1c]
cmp byte [eax + 0xe0], 0
je 0x41a7551
lea edx, [ebp - 0x278]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x278]
lea edx, [ebp - 0x274]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x274]
mov edx, dword [eax]
call dword [edx + 0x1c]
cmp byte [eax + 0xa0], 0
jne 0x41a7598
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x78
push eax
push dword [ebp + 0x20]
push dword [ebp + 0x1c]
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov eax, dword [eax + 0x48]
add eax, 0x64
mov dword [ebp - 0x250], eax
fild dword [ebp - 0x250]
fdiv dword [0x41a7c1c]
add esp, 0xfffffff8
fstp qword [esp]
wait
call fcn.04192360
pop eax
fstp qword [eax]
wait
jmp 0x41a76d9
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x80
push eax
push dword [ebp + 0x20]
push dword [ebp + 0x1c]
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov eax, dword [eax + 0x48]
add eax, 0x64
mov dword [ebp - 0x250], eax
fild dword [ebp - 0x250]
fdiv dword [0x41a7c1c]
add esp, 0xfffffff8
fstp qword [esp]
wait
call fcn.04192360
pop eax
fstp qword [eax]
wait
jmp 0x41a76d9
lea edx, [ebp - 0x280]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x280]
lea edx, [ebp - 0x27c]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x27c]
mov edx, dword [eax]
call dword [edx + 0x1c]
cmp byte [eax + 0xa0], 0
jne 0x41a7645
lea edx, [ebp - 0x288]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x288]
lea edx, [ebp - 0x284]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x284]
mov edx, dword [eax]
call dword [edx + 0x1c]
cmp byte [eax + 0xe0], 0
je 0x41a76bf
lea edx, [ebp - 0x290]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x290]
lea edx, [ebp - 0x28c]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x28c]
mov edx, dword [eax]
call dword [edx + 0x1c]
cmp byte [eax + 0xe0], 0
je 0x41a76a9
lea edx, [ebp - 0x298]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x298]
lea edx, [ebp - 0x294]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x294]
mov edx, dword [eax]
call dword [edx + 0x1c]
cmp byte [eax + 0xa0], 0
jne 0x41a76bf
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov edx, dword [ebp + 0x1c]
mov dword [eax + 0x78], edx
mov edx, dword [ebp + 0x20]
mov dword [eax + 0x7c], edx
jmp 0x41a76d9
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov edx, dword [ebp + 0x1c]
mov dword [eax + 0x80], edx
mov edx, dword [ebp + 0x20]
mov dword [eax + 0x84], edx
mov eax, dword [ebp - 4]
call sub.rtl60.bpl__System__WStrLen_qqrx17System_WideString
cmp eax, 6
jle 0x41a7793
mov edx, dword [ebp - 4]
mov eax, 0x41a7c98
call sub.rtl60.bpl__System__WStrPos_qqrv
test eax, eax
jle 0x41a7793
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
cmp dword [eax + 0x24], 0x64
jne 0x41a7793
cmp dword [0x41d0124], 0
jne 0x41a772b
mov dl, 1
mov eax, dword [0x419e330]
call sub.rtl60.bpl__System_TObject__bctr_qqrv
mov dword [0x41d0124], eax
lea eax, [ebp - 0x29c]
push eax
mov eax, dword [ebp - 4]
call sub.rtl60.bpl__System__WStrLen_qqrx17System_WideString
mov ecx, eax
sub ecx, 6
mov edx, 7
mov eax, dword [ebp - 4]
call sub.rtl60.bpl__System__WStrCopy_qqrx17System_WideStringii
mov edx, dword [ebp - 0x29c]
lea eax, [ebp - 0x3c]
call sub.rtl60.bpl__System__LStrFromWStr_qqrr17System_AnsiStringx17System_WideString
lea edx, [ebp - 0x2a4]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x2a4]
lea edx, [ebp - 0x2a0]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x2a0]
mov edx, dword [eax]
call dword [edx + 0x20]
push eax
mov ecx, dword [ebp - 0x3c]
mov edx, esi
mov eax, dword [0x41d0124]
call fcn.041b3a60
mov eax, dword [ebp - 4]
call sub.rtl60.bpl__System__WStrLen_qqrx17System_WideString
cmp eax, 6
jle 0x41a788d
mov edx, dword [ebp - 4]
mov eax, 0x41a7c98
call sub.rtl60.bpl__System__WStrPos_qqrv
test eax, eax
jle 0x41a788d
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
cmp dword [eax + 0x24], 0x22
jne 0x41a788d
cmp dword [0x41d0128], 0
jne 0x41a77e5
mov dl, 1
mov eax, dword [0x419e460]
call sub.rtl60.bpl__System_TObject__bctr_qqrv
mov dword [0x41d0128], eax
lea eax, [ebp - 4]
mov ecx, 6
mov edx, 1
call sub.rtl60.bpl__System__WStrDelete_qqrr17System_WideStringii
lea eax, [ebp - 0x2a8]
push eax
mov edx, dword [ebp - 4]
mov eax, 0x41a7ca8
call sub.rtl60.bpl__System__WStrPos_qqrv
mov ecx, eax
dec ecx
mov edx, 1
mov eax, dword [ebp - 4]
call sub.rtl60.bpl__System__WStrCopy_qqrx17System_WideStringii
mov edx, dword [ebp - 0x2a8]
lea eax, [ebp - 0x40]
call sub.rtl60.bpl__System__LStrFromWStr_qqrr17System_AnsiStringx17System_WideString
mov edx, dword [ebp - 4]
mov eax, 0x41a7ca8
call sub.rtl60.bpl__System__WStrPos_qqrv
mov ecx, eax
lea eax, [ebp - 4]
mov edx, 1
call sub.rtl60.bpl__System__WStrDelete_qqrr17System_WideStringii
lea eax, [ebp - 0x44]
mov edx, dword [ebp - 4]
call sub.rtl60.bpl__System__LStrFromWStr_qqrr17System_AnsiStringx17System_WideString
mov eax, dword [ebp - 0x44]
push eax
lea edx, [ebp - 0x2b0]
mov eax, dword [ebx]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x2b0]
lea edx, [ebp - 0x2ac]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x2ac]
mov edx, dword [eax]
call dword [edx + 0x20]
push eax
mov ecx, dword [ebp - 0x40]
mov edx, esi
mov eax, dword [0x41d0128]
call fcn.041b5338
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov ebx, dword [eax]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x41a7b7d
lea eax, [ebp - 0x2b0]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x2ac]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x2a8]
call sub.rtl60.bpl__System__WStrClr_qqrpv
lea eax, [ebp - 0x2a4]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x2a0]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x29c]
call sub.rtl60.bpl__System__WStrClr_qqrpv
lea eax, [ebp - 0x298]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x294]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x290]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x28c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x288]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x284]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x280]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x27c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x278]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x274]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x270]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x26c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x268]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x264]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x260]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x25c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x258]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x254]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x24c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x248]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x244]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x240]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x23c]
mov edx, 3
call sub.rtl60.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x230]
call sub.rtl60.bpl__System__WStrClr_qqrpv
lea eax, [ebp - 0x22c]
call sub.rtl60.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x228]
call sub.rtl60.bpl__System__WStrClr_qqrpv
lea eax, [ebp - 0x224]
call sub.rtl60.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x220]
call sub.rtl60.bpl__System__WStrClr_qqrpv
lea eax, [ebp - 0x210]
mov edx, dword [0x419cc48]
call sub.rtl60.bpl__System__FinalizeRecord_qqrpvt1
lea eax, [ebp - 0xd0]
mov edx, dword [0x419cd94]
mov ecx, 2
call sub.rtl60.bpl__System__FinalizeArray_qqrpvt1ui
lea eax, [ebp - 0xc8]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xc4]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xc0]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xbc]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xb0]
call sub.rtl60.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0xac]
call sub.rtl60.bpl__System__VarClr_qqrr14System_Variant
lea eax, [ebp - 0x9c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x98]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x94]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x90]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x8c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x88]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x84]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x80]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x7c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x78]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x74]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x70]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x6c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x68]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x64]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x60]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x5c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x58]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x54]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x50]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x4c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x48]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x44]
mov edx, 3
call sub.rtl60.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x10]
call sub.rtl60.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0xc]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 4]
call sub.rtl60.bpl__System__WStrClr_qqrpv
ret