Function at 0x41d2ec
Capabilities:
Reference sql statements

Disassembly:
push ebp
mov ebp, esp
mov ecx, 0x57
push 0
push 0
dec ecx
jne 0x41d2f4
push ebx
push esi
push edi
mov dword [ebp - 8], edx
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x41dd74
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 4]
add eax, 0xd0
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_First_qqrv
jmp 0x41dc25
xor eax, eax
push ebp
push 0x41dbf8
push dword fs:[eax]
mov dword fs:[eax], esp
xor eax, eax
push ebp
push 0x41d50e
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
xor edx, edx
mov ecx, dword [eax]
call dword [ecx + 0x178]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
mov eax, dword [eax + 0x238]
mov edx, dword [eax]
call dword [edx + 0x40]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
mov eax, dword [eax + 0x238]
mov edx, 0x41dd90
mov ecx, dword [eax]
call dword [ecx + 0x34]
push 1
lea eax, [ebp - 0x34]
push eax
lea edx, [ebp - 0x38]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
mov eax, dword [eax + 0x238]
mov ecx, dword [eax]
call dword [ecx + 0x1c]
mov eax, dword [ebp - 0x38]
push eax
push 5
push 1
mov eax, dword [ebp - 4]
add eax, 0xa8
push eax
lea eax, [ebp - 0x4c]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x4c]
push eax
lea eax, [ebp - 0x5c]
mov edx, 0x41dde4
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea edx, [ebp - 0x5c]
pop eax
call sub.Vcl50.bpl__System__VarAdd_qqrv
lea edx, [ebp - 0x4c]
lea eax, [ebp - 0x3c]
call sub.Vcl50.bpl__System__VarToLStr_qqrr17System_AnsiStringrx14System_Variant
mov ecx, dword [ebp - 0x3c]
mov edx, 0x41ddf0
pop eax
call fcn.004035c4
mov edx, dword [ebp - 0x34]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
mov eax, dword [eax + 0x238]
mov ecx, dword [eax]
call dword [ecx + 0x2c]
mov edx, 0x41ddfc
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x60]
mov ecx, dword [eax]
call dword [ecx + 0x58]
mov eax, dword [ebp - 0x60]
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
mov edx, 0x41de0c
call sub.Vclbde50.bpl__Dbtables_TQuery_ParamByName_qqrx17System_AnsiString
pop edx
call sub.Vcldb50.bpl__Db_TParam_SetAsString_qqrx17System_AnsiString
mov edx, 0x41de1c
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x64]
mov ecx, dword [eax]
call dword [ecx + 0x58]
mov eax, dword [ebp - 0x64]
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
mov edx, 0x41de2c
call sub.Vclbde50.bpl__Dbtables_TQuery_ParamByName_qqrx17System_AnsiString
pop edx
call sub.Vcldb50.bpl__Db_TParam_SetAsString_qqrx17System_AnsiString
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
mov dl, 1
mov ecx, dword [eax]
call dword [ecx + 0x178]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
call sub.Vcldb50.bpl__Db_TDataSet_First_qqrv
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
cmp byte [eax + 0x91], 0
jne 0x41d4c0
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
mov edx, 0x41de3c
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x10]
mov ecx, dword [eax]
call dword [ecx + 0x58]
jmp 0x41d4f1
mov eax, dword [ebp - 4]
add eax, 0xd0
mov edx, 0x41de4c
call sub.Vcl50.bpl__System__LStrAsg_qqrv
mov eax, dword [ebp - 4]
mov byte [eax + 0xec], 1
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x41dc35
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
xor edx, edx
mov ecx, dword [eax]
call dword [ecx + 0x178]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x41d559
xor eax, eax
push ebp
push 0x41dbc0
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x30]
push eax
mov edx, 0x41de8c
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x128]
mov ecx, dword [eax]
call dword [ecx + 0x58]
mov edx, dword [ebp - 0x128]
lea eax, [ebp - 0x124]
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x124]
lea edi, [ebp - 0x114]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
lea eax, [ebp - 0x138]
mov edx, dword [ebp - 0x10]
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x138]
lea edi, [ebp - 0x104]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
mov al, 0x36
mov byte [ebp - 0x14b], al
mov byte [ebp - 0x14c], 1
lea eax, [ebp - 0x148]
lea edx, [ebp - 0x14c]
call sub.Vcl50.bpl__System__VarFromPStr_qqrr14System_Variantrx28System__SmallString_iuc_255_
lea esi, [ebp - 0x148]
lea edi, [ebp - 0xf4]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
mov edx, 0x41de9c
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x160]
mov ecx, dword [eax]
call dword [ecx + 0x58]
mov edx, dword [ebp - 0x160]
lea eax, [ebp - 0x15c]
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x15c]
lea edi, [ebp - 0xe4]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
mov edx, 0x41de9c
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x174]
mov ecx, dword [eax]
call dword [ecx + 0x58]
mov edx, dword [ebp - 0x174]
lea eax, [ebp - 0x170]
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x170]
lea edi, [ebp - 0xd4]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
lea eax, [ebp - 0x184]
xor edx, edx
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x184]
lea edi, [ebp - 0xc4]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
lea eax, [ebp - 0x194]
xor edx, edx
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x194]
lea edi, [ebp - 0xb4]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
mov edx, 0x41deac
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x1a8]
mov ecx, dword [eax]
call dword [ecx + 0x58]
mov edx, dword [ebp - 0x1a8]
lea eax, [ebp - 0x1a4]
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x1a4]
lea edi, [ebp - 0xa4]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
mov al, 0x59
mov byte [ebp - 0x1bb], al
mov byte [ebp - 0x1bc], 1
lea eax, [ebp - 0x1b8]
lea edx, [ebp - 0x1bc]
call sub.Vcl50.bpl__System__VarFromPStr_qqrr14System_Variantrx28System__SmallString_iuc_255_
lea esi, [ebp - 0x1b8]
lea edi, [ebp - 0x94]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
mov al, 0x59
mov byte [ebp - 0x1cf], al
mov byte [ebp - 0x1d0], 1
lea eax, [ebp - 0x1cc]
lea edx, [ebp - 0x1d0]
call sub.Vcl50.bpl__System__VarFromPStr_qqrr14System_Variantrx28System__SmallString_iuc_255_
lea esi, [ebp - 0x1cc]
lea edi, [ebp - 0x84]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
lea eax, [ebp - 0x114]
lea ecx, [ebp - 0x74]
mov edx, 9
call sub.Vcl50.bpl__System_VarArrayOf_qqrpx14System_Variantxi
lea ecx, [ebp - 0x74]
mov edx, 0x41debc
mov eax, dword [ebp - 4]
call fcn.004094d8
push 0
push 1
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x1e0]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x1e0]
call sub.Vcl50.bpl__System__VarToReal_qqrv
add esp, 0xfffffff4
fstp xword [esp]
wait
push 0
push 0
push 0
call fcn.00403790
test eax, eax
jle 0x41d7bf
lea eax, [ebp - 0x14]
mov edx, 0x41ded0
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
jmp 0x41d813
push 0
push 1
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x1f0]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x1f0]
call sub.Vcl50.bpl__System__VarToReal_qqrv
add esp, 0xfffffff4
fstp xword [esp]
wait
push 0
push 0
push 0
call fcn.00403790
test eax, eax
jge 0x41d806
lea eax, [ebp - 0x14]
mov edx, 0x41dedc
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
jmp 0x41d813
lea eax, [ebp - 0x14]
mov edx, 0x41dee8
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_Edit_qqrv
mov edx, 0x41def4
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [ebp - 0x14]
mov ecx, dword [eax]
call dword [ecx + 0xa0]
mov edx, 0x41deac
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x1f4]
mov ecx, dword [eax]
call dword [ecx + 0x58]
cmp dword [ebp - 0x1f4], 0
je 0x41d896
push 1
push 1
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x204]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x204]
call sub.Vcl50.bpl__System__VarToReal_qqrv
fabs
add esp, 0xfffffff8
fstp qword [esp]
wait
mov edx, 0x41df00
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x98]
jmp 0x41d8af
push 0
push 0
mov edx, 0x41df00
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x98]
push 0
push 1
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x214]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x214]
call sub.Vcl50.bpl__System__VarToReal_qqrv
fabs
add esp, 0xfffffff8
fstp qword [esp]
wait
mov edx, 0x41df10
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x98]
push 0
push 1
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x224]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x224]
push eax
mov edx, 0x41df20
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x50]
lea eax, [ebp - 0x234]
call sub.Vcl50.bpl__System__VarFromReal_qqrv
lea edx, [ebp - 0x234]
pop eax
call sub.Vcl50.bpl__System__VarAdd_qqrv
lea eax, [ebp - 0x224]
push eax
mov edx, 0x41df30
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x50]
lea eax, [ebp - 0x244]
call sub.Vcl50.bpl__System__VarFromReal_qqrv
lea edx, [ebp - 0x244]
pop eax
call sub.Vcl50.bpl__System__VarSub_qqrv
lea eax, [ebp - 0x224]
push eax
mov edx, 0x41df40
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x50]
lea eax, [ebp - 0x254]
call sub.Vcl50.bpl__System__VarFromReal_qqrv
lea edx, [ebp - 0x254]
pop eax
call sub.Vcl50.bpl__System__VarAdd_qqrv
lea eax, [ebp - 0x224]
push eax
mov edx, 0x41df50
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x50]
lea eax, [ebp - 0x264]
call sub.Vcl50.bpl__System__VarFromReal_qqrv
lea edx, [ebp - 0x264]
pop eax
call sub.Vcl50.bpl__System__VarSub_qqrv
lea eax, [ebp - 0x224]
call sub.Vcl50.bpl__System__VarToReal_qqrv
fstp qword [ebp - 0x20]
wait
fld qword [ebp - 0x20]
add esp, 0xfffffff4
fstp xword [esp]
wait
push 0
push 0
push 0
call fcn.00403790
test eax, eax
jle 0x41d9fd
lea eax, [ebp - 0x14]
mov edx, 0x41ded0
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
jmp 0x41da32
fld qword [ebp - 0x20]
add esp, 0xfffffff4
fstp xword [esp]
wait
push 0
push 0
push 0
call fcn.00403790
test eax, eax
jge 0x41da25
lea eax, [ebp - 0x14]
mov edx, 0x41dedc
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
jmp 0x41da32
lea eax, [ebp - 0x14]
mov edx, 0x41dee8
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
mov edx, 0x41df60
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [ebp - 0x14]
mov ecx, dword [eax]
call dword [ecx + 0xa0]
mov edx, 0x41deac
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x268]
mov ecx, dword [eax]
call dword [ecx + 0x58]
cmp dword [ebp - 0x268], 0
je 0x41db71
push 1
push 1
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x278]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x278]
push eax
mov edx, 0x41df6c
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x50]
lea eax, [ebp - 0x288]
call sub.Vcl50.bpl__System__VarFromReal_qqrv
lea edx, [ebp - 0x288]
pop eax
call sub.Vcl50.bpl__System__VarAdd_qqrv
lea eax, [ebp - 0x278]
push eax
mov edx, 0x41df7c
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x50]
lea eax, [ebp - 0x298]
call sub.Vcl50.bpl__System__VarFromReal_qqrv
lea edx, [ebp - 0x298]
pop eax
call sub.Vcl50.bpl__System__VarSub_qqrv
lea eax, [ebp - 0x278]
push eax
mov edx, 0x41df8c
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x50]
lea eax, [ebp - 0x2a8]
call sub.Vcl50.bpl__System__VarFromReal_qqrv
lea edx, [ebp - 0x2a8]
pop eax
call sub.Vcl50.bpl__System__VarAdd_qqrv
lea eax, [ebp - 0x278]
push eax
mov edx, 0x41df9c
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x50]
lea eax, [ebp - 0x2b8]
call sub.Vcl50.bpl__System__VarFromReal_qqrv
lea edx, [ebp - 0x2b8]
pop eax
call sub.Vcl50.bpl__System__VarSub_qqrv
lea eax, [ebp - 0x278]
call sub.Vcl50.bpl__System__VarToReal_qqrv
fabs
add esp, 0xfffffff8
fstp qword [esp]
wait
mov edx, 0x41dfac
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x98]
jmp 0x41db8a
push 0
push 0
mov edx, 0x41dfac
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x98]
fld qword [ebp - 0x20]
fabs
add esp, 0xfffffff8
fstp qword [esp]
wait
mov edx, 0x41dfbc
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x98]
mov eax, dword [ebp - 8]
mov edx, dword [eax]
call dword [edx + 0x240]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x41dbe6
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_Next_qqrv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x41dc25
mov eax, dword [ebp - 8]
cmp byte [eax + 0x91], 0
je 0x41d32c
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x41dd7e
lea eax, [ebp - 0x2b8]
mov edx, dword [sym.imp.Vcl50.bpl___xp_14System_Variant]
mov ecx, 5
call sub.Vcl50.bpl__System__FinalizeArray_qqrv
lea eax, [ebp - 0x268]
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
lea eax, [ebp - 0x264]
mov edx, dword [sym.imp.Vcl50.bpl___xp_14System_Variant]
mov ecx, 7
call sub.Vcl50.bpl__System__FinalizeArray_qqrv
lea eax, [ebp - 0x1f4]
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
lea eax, [ebp - 0x1f0]
mov edx, dword [sym.imp.Vcl50.bpl___xp_14System_Variant]
mov ecx, 2
call sub.Vcl50.bpl__System__FinalizeArray_qqrv
lea eax, [ebp - 0x1cc]
call sub.Vcl50.bpl__System__VarClr_qqrv
lea eax, [ebp - 0x1b8]
call sub.Vcl50.bpl__System__VarClr_qqrv
lea eax, [ebp - 0x1a8]
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
lea eax, [ebp - 0x1a4]
mov edx, dword [sym.imp.Vcl50.bpl___xp_14System_Variant]
mov ecx, 3
call sub.Vcl50.bpl__System__FinalizeArray_qqrv
lea eax, [ebp - 0x174]
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
lea eax, [ebp - 0x170]
call sub.Vcl50.bpl__System__VarClr_qqrv
lea eax, [ebp - 0x160]
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
lea eax, [ebp - 0x15c]
call sub.Vcl50.bpl__System__VarClr_qqrv
lea eax, [ebp - 0x148]
mov edx, dword [sym.imp.Vcl50.bpl___xp_14System_Variant]
mov ecx, 2
call sub.Vcl50.bpl__System__FinalizeArray_qqrv
lea eax, [ebp - 0x128]
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
lea eax, [ebp - 0x124]
call sub.Vcl50.bpl__System__VarClr_qqrv
lea eax, [ebp - 0x74]
call sub.Vcl50.bpl__System__VarClr_qqrv
lea eax, [ebp - 0x64]
mov edx, 2
call sub.Vcl50.bpl__System__LStrArrayClr_qqrv
lea eax, [ebp - 0x5c]
mov edx, dword [sym.imp.Vcl50.bpl___xp_14System_Variant]
mov ecx, 2
call sub.Vcl50.bpl__System__FinalizeArray_qqrv
lea eax, [ebp - 0x3c]
mov edx, 3
call sub.Vcl50.bpl__System__LStrArrayClr_qqrv
lea eax, [ebp - 0x30]
call sub.Vcl50.bpl__System__VarClr_qqrv
lea eax, [ebp - 0x14]
mov edx, 2
call sub.Vcl50.bpl__System__LStrArrayClr_qqrv
ret