Function at 0x41e0510
Capabilities:
Reference sql statements

Disassembly:
push ebp
mov ebp, esp
push ecx
mov ecx, 7
push 0
push 0
dec ecx
jne 0x41e0519
xchg dword [ebp - 4], ecx
push ebx
push esi
push edi
mov ebx, dword [ebp + 8]
test ebx, ebx
js 0x41e0534
mov esi, dword [ecx + ebx*4]
dec ebx
push esi
jns 0x41e052d
mov ecx, esp
mov dword [ebp - 8], ecx
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x41e072f
push dword fs:[eax]
mov dword fs:[eax], esp
xor ebx, ebx
mov dword [ebp - 0x18], edx
mov byte [ebp - 0x14], 0
lea eax, [ebp - 0x18]
push eax
push 0
mov edx, dword [sym.imp.VEDatasets.bpl__Vedataset_defConnection]
mov edx, dword [edx]
mov ecx, 0x41e0750
mov eax, dword [0x4199340]
call fcn.0419a298
mov dword [ebp - 0x10], eax
jmp 0x41e06ee
push 0
xor ecx, ecx
mov dl, 1
mov eax, dword [0x41d2f7c]
call fcn.041d37f4
mov edx, dword [0x42039d0]
mov dword [edx], eax
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x374]
mov eax, dword [0x42039d0]
mov eax, dword [eax]
mov eax, dword [eax + 0x374]
mov cl, byte [0x41e078c]
mov ebx, dword [eax]
call dword [ebx + 0x294]
mov dl, 1
mov eax, dword [0x41d2f10]
call fcn.041d3724
mov dword [ebp - 0xc], eax
xor edx, edx
push ebp
push 0x41e06c6
push dword fs:[edx]
mov dword fs:[edx], esp
mov edx, 0x41e0798
mov eax, dword [ebp - 0x10]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x1c]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov edx, dword [ebp - 0x1c]
mov eax, dword [ebp - 0xc]
add eax, 8
call sub.rtl60.bpl__System__LStrAsg_qqrpvpxv
mov edx, 0x41e07ac
mov eax, dword [ebp - 0x10]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [ebp - 0xc]
mov edx, dword [edx + 0xc]
call sub.dbrtl60.bpl__Db_TBlobField_SaveToStream_qqrp15Classes_TStream
mov eax, dword [0x42039d0]
mov eax, dword [eax]
mov edx, dword [ebp - 0xc]
call fcn.041d3680
mov esi, dword [ebp + 8]
inc esi
dec esi
test esi, esi
jl 0x41e0677
inc esi
mov ebx, dword [ebp - 8]
mov al, byte [0x41e078c]
push eax
lea eax, [ebp - 0x2c]
mov edx, dword [ebx]
mov cl, 0xfc
call sub.rtl60.bpl__System__VarFromInt_qqrr14System_Variantxixi
lea ecx, [ebp - 0x2c]
mov eax, dword [0x42039d0]
mov eax, dword [eax]
mov eax, dword [eax + 0x350]
mov edx, 0x41e07c0
mov edi, dword [eax]
call dword [edi + 0x240]
test al, al
jne 0x41e0671
mov ecx, 0x41e07d0
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
add ebx, 4
dec esi
jne 0x41e0628
mov eax, dword [0x42039d0]
mov eax, dword [eax]
call fcn.041d36b4
mov ebx, eax
lea ecx, [ebp - 0x3c]
mov edx, 0x41e07e4
mov eax, dword [ebp - 0x10]
call sub.dbrtl60.bpl__Db_TDataSet_GetFieldValue_qqrx17System_AnsiString
lea eax, [ebp - 0x3c]
call sub.rtl60.bpl__System__VarToInt_qqrrx14System_Variant
mov dword [ebx + 4], eax
mov eax, dword [ebp - 0xc]
call sub.rtl60.bpl__System_TObject_Free_qqrv
mov eax, dword [0x42039d0]
mov eax, dword [eax]
call sub.vcl60.bpl__Forms_TCustomForm_Release_qqrv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x41e06fe
mov eax, dword [ebp - 0x10]
cmp byte [eax + 0xa1], 0
je 0x41e0578
mov eax, dword [ebp - 0x10]
call sub.rtl60.bpl__System_TObject_Free_qqrv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x41e0736
lea eax, [ebp - 0x3c]
mov edx, dword [sym.imp.rtl60.bpl___xp_14System_Variant]
mov ecx, 2
call sub.rtl60.bpl__System__FinalizeArray_qqrpvt1ui
lea eax, [ebp - 0x1c]
call sub.rtl60.bpl__System__LStrClr_qqrpv
ret