Function at 0x4c97d8
Capabilities:
Access peb ldr_data
Get number of processors
Get process heap flags
Get process heap force flags

Disassembly:
push ebp
mov ebp, esp
mov ecx, 0x2f
push 0
push 0
dec ecx
jne 0x4c97e0
push ecx
mov dword [ebp - 0x14], edx
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x4cab70
push dword fs:[eax]
mov dword fs:[eax], esp
mov edx, dword [0x700130]
mov eax, 0x164
call sub.rtl260.bpl__System__New_qqripv
mov dword [ebp - 8], eax
mov eax, dword [ebp - 8]
mov edx, dword [ebp - 4]
mov edx, dword [edx + 0x8a8]
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 8]
add eax, 4
mov edx, dword [ebp - 4]
mov edx, dword [edx + 0x8b0]
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 8]
add eax, 8
mov edx, dword [ebp - 4]
mov edx, dword [edx + 0x8b4]
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 8]
add eax, 0x10
mov edx, dword [ebp - 4]
mov edx, dword [edx + 0x8b8]
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 8]
add eax, 0xc
mov edx, dword [ebp - 4]
mov edx, dword [edx + 0x8ac]
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 8]
xor edx, edx
mov dword [eax + 0x4c], edx
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x838]
mov edx, dword [eax]
call dword [edx + 0x130]
neg al
sbb eax, eax
mov edx, dword [ebp - 8]
mov dword [edx + 0x48], eax
mov eax, dword [ebp - 8]
add eax, 0x3c
call sub.rtl260.bpl__System__UStrClr_qqrpv
lea edx, [ebp - 0x30]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x61c]
call sub.vcl260.bpl__Vcl_Controls_TControl_GetText_qqrv
mov eax, dword [ebp - 0x30]
lea edx, [ebp - 0x2c]
call sub.rtl260.bpl__System_Sysutils_Trim_qqrx20System_UnicodeString
mov edx, dword [ebp - 0x2c]
mov eax, dword [ebp - 8]
add eax, 0x34
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x610]
mov edx, 0x4cab88
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x34]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov edx, dword [ebp - 0x34]
mov eax, dword [ebp - 8]
add eax, 0x14
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x610]
mov edx, 0x4caba4
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x38]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov edx, dword [ebp - 0x38]
mov eax, dword [ebp - 8]
add eax, 0x18
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x610]
mov edx, 0x4cabc0
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x40]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 0x40]
lea edx, [ebp - 0x3c]
call sub.rtl260.bpl__System_Sysutils_Trim_qqrx20System_UnicodeString
mov edx, dword [ebp - 0x3c]
mov eax, dword [ebp - 8]
add eax, 0x1c
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x610]
mov edx, 0x4cabdc
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x44]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov edx, dword [ebp - 0x44]
mov eax, dword [ebp - 8]
add eax, 0x20
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
call sub.rtl260.bpl__System_Sysutils_Now_qqrv
add esp, 0xfffffff8
fstp qword [esp]
wait
lea edx, [ebp - 0x48]
mov eax, 0x4cabf8
call sub.rtl260.bpl__System_Sysutils_FormatDateTime_qqrx20System_UnicodeString16System_TDateTime
mov edx, dword [ebp - 0x48]
mov eax, dword [ebp - 8]
add eax, 0x24
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x5e4]
call sub.vcl260.bpl__Vcl_Comctrls_TCommonCalendar_GetDate_qqrv
add esp, 0xfffffff8
fstp qword [esp]
wait
lea edx, [ebp - 0x4c]
mov eax, 0x4cac34
call sub.rtl260.bpl__System_Sysutils_FormatDateTime_qqrx20System_UnicodeString16System_TDateTime
mov edx, dword [ebp - 0x4c]
mov eax, dword [ebp - 8]
add eax, 0x28
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x5e8]
call sub.vcl260.bpl__Vcl_Comctrls_TCommonCalendar_GetDate_qqrv
add esp, 0xfffffff8
fstp qword [esp]
wait
lea edx, [ebp - 0x50]
mov eax, 0x4cac34
call sub.rtl260.bpl__System_Sysutils_FormatDateTime_qqrx20System_UnicodeString16System_TDateTime
mov edx, dword [ebp - 0x50]
mov eax, dword [ebp - 8]
add eax, 0x2c
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 8]
add eax, 0x30
mov edx, dword [ebp - 4]
mov edx, dword [edx + 0x890]
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
lea edx, [ebp - 0x54]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x520]
call sub.vcl260.bpl__Vcl_Controls_TControl_GetText_qqrv
mov edx, dword [ebp - 0x54]
mov eax, dword [ebp - 8]
add eax, 0x38
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 8]
xor edx, edx
mov dword [eax + 0x40], edx
mov eax, dword [ebp - 8]
xor edx, edx
mov dword [eax + 0x44], edx
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x610]
mov edx, 0x4cac58
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x58]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 0x58]
mov edx, 0x4cac74
call sub.rtl260.bpl__System__UStrEqual_qqrv
jne 0x4c9a86
mov eax, dword [ebp - 8]
mov dword [eax + 0x40], 0xffffffff
jmp 0x4c9abd
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x610]
mov edx, 0x4cac58
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x5c]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 0x5c]
mov edx, 0x4cac84
call sub.rtl260.bpl__System__UStrEqual_qqrv
jne 0x4c9abd
mov eax, dword [ebp - 8]
mov dword [eax + 0x44], 0xffffffff
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x610]
mov dword [ebp - 0xc], eax
mov edx, 0x4cac94
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x60]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x60]
mov eax, dword [ebp - 8]
add eax, 0x50
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cacb0
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x64]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x64]
mov eax, dword [ebp - 8]
add eax, 0x5c
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cacd0
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x68]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x68]
mov eax, dword [ebp - 8]
add eax, 0x60
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cacec
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x6c]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x6c]
mov eax, dword [ebp - 8]
add eax, 0x64
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cad08
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x70]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x70]
mov eax, dword [ebp - 8]
add eax, 0x68
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cad24
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x74]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x74]
mov eax, dword [ebp - 8]
add eax, 0x6c
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cad44
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x78]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x78]
mov eax, dword [ebp - 8]
add eax, 0x70
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cad60
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x7c]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x7c]
mov eax, dword [ebp - 8]
add eax, 0x74
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cad7c
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x80]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x80]
mov eax, dword [ebp - 8]
add eax, 0x78
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cad98
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x84]
mov eax, dword [ebp - 8]
add eax, 0x7c
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cadb4
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x88]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x88]
mov eax, dword [ebp - 8]
add eax, 0x80
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cadd4
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x8c]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x8c]
mov eax, dword [ebp - 8]
add eax, 0x8c
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cadf4
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x90]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x90]
mov eax, dword [ebp - 8]
add eax, 0x90
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cae14
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x94]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x94]
mov eax, dword [ebp - 8]
add eax, 0x94
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cae34
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x98]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x98]
mov eax, dword [ebp - 8]
add eax, 0x98
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cae54
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x9c]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x9c]
mov eax, dword [ebp - 8]
add eax, 0x9c
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cae74
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xa0]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xa0]
mov eax, dword [ebp - 8]
add eax, 0xa0
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cae94
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xa4]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xa4]
mov eax, dword [ebp - 8]
add eax, 0xa4
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4caeb4
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xa8]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xa8]
mov eax, dword [ebp - 8]
add eax, 0xa8
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4caed4
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xac]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xac]
mov eax, dword [ebp - 8]
add eax, 0xac
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4caef4
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xb0]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xb0]
mov eax, dword [ebp - 8]
add eax, 0xb0
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4caf14
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xb4]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xb4]
mov eax, dword [ebp - 8]
add eax, 0xb4
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4caf30
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xb8]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xb8]
mov eax, dword [ebp - 8]
add eax, 0xc4
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4caf4c
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xbc]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xbc]
mov eax, dword [ebp - 8]
add eax, 0xc0
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4caf6c
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xc0]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xc0]
mov eax, dword [ebp - 8]
add eax, 0xc8
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4caf88
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xc4]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xc4]
mov eax, dword [ebp - 8]
add eax, 0xcc
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cafa4
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xc8]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xc8]
mov eax, dword [ebp - 8]
add eax, 0xd4
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cafc0
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xcc]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xcc]
mov eax, dword [ebp - 8]
add eax, 0xd8
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cafe0
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xd0]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xd0]
mov eax, dword [ebp - 8]
add eax, 0xdc
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb000
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xd4]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xd4]
mov eax, dword [ebp - 8]
add eax, 0xe0
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb01c
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xd8]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xd8]
mov eax, dword [ebp - 8]
add eax, 0xe4
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb038
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xdc]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xdc]
mov eax, dword [ebp - 8]
add eax, 0xe8
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb058
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xe0]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xe0]
mov eax, dword [ebp - 8]
add eax, 0xec
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb078
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xe4]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xe4]
mov eax, dword [ebp - 8]
add eax, 0xf0
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb098
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xe8]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xe8]
mov eax, dword [ebp - 8]
add eax, 0xfc
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb0b4
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xec]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xec]
mov eax, dword [ebp - 8]
add eax, 0x100
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb0d0
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xf0]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xf0]
mov eax, dword [ebp - 8]
add eax, 0x104
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb0ec
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xf4]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xf4]
mov eax, dword [ebp - 8]
add eax, 0x108
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb108
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xf8]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xf8]
mov eax, dword [ebp - 8]
add eax, 0x10c
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb124
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xfc]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0xfc]
mov eax, dword [ebp - 8]
add eax, 0x114
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb140
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x100]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x100]
mov eax, dword [ebp - 8]
add eax, 0x110
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb15c
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x104]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x104]
mov eax, dword [ebp - 8]
add eax, 0x118
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 8]
add eax, 0x11c
mov edx, dword [0x7309f8]
mov edx, dword [edx]
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb178
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x108]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x108]
mov eax, dword [ebp - 8]
add eax, 0x128
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb194
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x10c]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 0x10c]
mov edx, 0x4cb1b0
call sub.rtl260.bpl__System__UStrEqual_qqrv
je 0x4ca227
mov edx, 0x4cb194
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x110]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 0x110]
mov edx, 0x4cb1c0
call sub.rtl260.bpl__System__UStrEqual_qqrv
jne 0x4ca265
mov edx, 0x4cb1d0
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x114]
mov eax, 0x4cb1ec
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0x114]
mov eax, dword [ebp - 8]
add eax, 0x12c
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
jmp 0x4ca2a1
mov edx, 0x4cb200
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x118]
mov eax, 0x4cb1ec
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0x118]
mov eax, dword [ebp - 8]
add eax, 0x12c
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 4]
cmp dword [eax + 0x8c8], 0
je 0x4ca34e
mov eax, dword [ebp - 4]
cmp dword [eax + 0x8d4], 0
jle 0x4ca34e
mov eax, dword [0x730c58]
cmp dword [eax], 1
sbb eax, eax
inc eax
cmp al, 1
jne 0x4ca34e
mov edx, 0x4cb21c
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fstp qword [ebp - 0x124]
wait
mov edx, 0x4cb238
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fadd qword [ebp - 0x124]
fstp xword [ebp - 0x130]
wait
mov edx, 0x4cb254
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x11c]
mov eax, 0x4cb1ec
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0x11c]
mov eax, dword [ebp - 8]
add eax, 0x148
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
jmp 0x4ca3ca
mov edx, 0x4cb21c
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fstp qword [ebp - 0x124]
wait
mov edx, 0x4cb238
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fadd qword [ebp - 0x124]
fstp xword [ebp - 0x130]
wait
mov edx, 0x4cb254
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x134]
mov eax, 0x4cb1ec
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0x134]
mov eax, dword [ebp - 8]
add eax, 0x148
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb21c
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x138]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x138]
mov eax, dword [ebp - 8]
add eax, 0x130
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb238
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x13c]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x13c]
mov eax, dword [ebp - 8]
add eax, 0x134
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb254
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x140]
call sub.dbrtl260.bpl__Data_Db_TField_GetDisplayText_qqrv
mov edx, dword [ebp - 0x140]
mov eax, dword [ebp - 8]
add eax, 0x138
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x7ec]
mov edx, dword [eax]
call dword [edx + 0x130]
cmp al, 1
jne 0x4ca503
mov edx, 0x4cb21c
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fstp qword [ebp - 0x124]
wait
mov edx, 0x4cb238
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fadd qword [ebp - 0x124]
fstp xword [ebp - 0x130]
wait
mov edx, 0x4cb254
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
fstp xword [ebp - 0x130]
wait
mov edx, 0x4cb1d0
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
fsubp st(1)
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x144]
mov eax, 0x4cb1ec
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0x144]
mov eax, dword [ebp - 8]
add eax, 0x144
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
jmp 0x4ca510
mov eax, dword [ebp - 8]
add eax, 0x144
call sub.rtl260.bpl__System__UStrClr_qqrpv
mov edx, 0x4cac94
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x74]
mov dword [ebp - 0x14c], eax
fild dword [ebp - 0x14c]
fstp xword [ebp - 0x130]
wait
mov edx, 0x4cadb4
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
add esp, 0xfffffff4
fstp xword [esp]
wait
lea eax, [ebp - 0x148]
call sub.rtl260.bpl__System_Sysutils_FloatToStr_qqrg
mov edx, dword [ebp - 0x148]
mov eax, dword [ebp - 8]
add eax, 0x14c
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cacd0
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fstp qword [ebp - 0x124]
wait
mov edx, 0x4cadf4
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fadd qword [ebp - 0x124]
fstp xword [ebp - 0x130]
wait
mov edx, 0x4cacb0
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
fstp xword [ebp - 0x130]
wait
mov edx, 0x4cadd4
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
add esp, 0xfffffff4
fstp xword [esp]
wait
lea eax, [ebp - 0x150]
call sub.rtl260.bpl__System_Sysutils_FloatToStr_qqrg
mov edx, dword [ebp - 0x150]
mov eax, dword [ebp - 8]
add eax, 0x150
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cacec
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fstp qword [ebp - 0x124]
wait
mov edx, 0x4cae14
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fadd qword [ebp - 0x124]
fstp xword [ebp - 0x130]
wait
mov edx, 0x4cad24
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
fstp xword [ebp - 0x130]
wait
mov edx, 0x4cae54
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
add esp, 0xfffffff4
fstp xword [esp]
wait
lea eax, [ebp - 0x154]
call sub.rtl260.bpl__System_Sysutils_FloatToStr_qqrg
mov edx, dword [ebp - 0x154]
mov eax, dword [ebp - 8]
add eax, 0x154
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cad08
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fstp qword [ebp - 0x124]
wait
mov edx, 0x4cae34
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fadd qword [ebp - 0x124]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea eax, [ebp - 0x158]
call sub.rtl260.bpl__System_Sysutils_FloatToStr_qqrg
mov edx, dword [ebp - 0x158]
mov eax, dword [ebp - 8]
add eax, 0x158
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cad60
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fstp qword [ebp - 0x124]
wait
mov edx, 0x4cae94
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fadd qword [ebp - 0x124]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea eax, [ebp - 0x15c]
call sub.rtl260.bpl__System_Sysutils_FloatToStr_qqrg
mov edx, dword [ebp - 0x15c]
mov eax, dword [ebp - 8]
add eax, 0x15c
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, 0x4cb01c
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fstp qword [ebp - 0x124]
wait
mov edx, 0x4cb098
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fadd qword [ebp - 0x124]
fstp xword [ebp - 0x130]
wait
mov edx, 0x4cb0b4
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
fstp xword [ebp - 0x130]
wait
mov edx, 0x4cb0d0
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
fstp xword [ebp - 0x130]
wait
mov edx, 0x4cb0ec
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
fstp xword [ebp - 0x130]
wait
mov edx, 0x4cb108
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
fstp xword [ebp - 0x130]
wait
mov edx, 0x4caf14
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
fstp xword [ebp - 0x130]
wait
mov edx, 0x4caf30
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
fstp xword [ebp - 0x130]
wait
mov edx, 0x4caf4c
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
fstp xword [ebp - 0x130]
wait
mov edx, 0x4caf6c
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
fstp xword [ebp - 0x130]
wait
mov edx, 0x4caf88
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
fstp xword [ebp - 0x130]
wait
mov edx, 0x4cb270
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
fstp xword [ebp - 0x130]
wait
mov edx, 0x4cafa4
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
fstp xword [ebp - 0x130]
wait
mov edx, 0x4cafe0
mov eax, dword [ebp - 0xc]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fld xword [ebp - 0x130]
faddp st(1)
add esp, 0xfffffff4
fstp xword [esp]
wait
lea eax, [ebp - 0x160]
call sub.rtl260.bpl__System_Sysutils_FloatToStr_qqrg
mov edx, dword [ebp - 0x160]
mov eax, dword [ebp - 8]
add eax, 0x160
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x87c]
mov edx, dword [eax]
call dword [edx + 0x14]
dec eax
jne 0x4caaec
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x578]
mov dword [ebp - 0x10], eax
mov eax, dword [ebp - 0x10]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
mov eax, dword [ebp - 0x10]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, dword [eax]
call dword [edx + 0x48]
mov eax, dword [ebp - 0x10]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x4cb290
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov eax, dword [ebp - 0x10]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x4cb3c0
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov eax, dword [ebp - 0x10]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x4cb408
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov eax, dword [ebp - 0x10]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x4cb444
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x60c]
mov edx, 0x4cb488
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x164]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 0x164]
push eax
mov edx, 0x4cb488
mov eax, dword [ebp - 0x10]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
pop edx
mov ecx, dword [eax]
call dword [ecx + 0x48]
mov eax, dword [ebp - 0x10]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Open_qqrv
mov edx, 0x4cb4a0
mov eax, dword [ebp - 0x10]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x168]
mov ecx, dword [eax]
call dword [ecx + 0x88]
cmp dword [ebp - 0x168], 0
je 0x4caa96
mov edx, 0x4cb4a0
mov eax, dword [ebp - 0x10]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x16c]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov edx, dword [ebp - 0x16c]
mov eax, dword [ebp - 8]
add eax, 0x13c
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 0x170]
push eax
mov edx, 0x4cb4c0
mov eax, dword [ebp - 0x10]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x174]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 0x174]
mov ecx, 8
mov edx, 1
call sub.rtl260.bpl__System__UStrCopy_qqrx20System_UnicodeStringii
mov edx, dword [ebp - 0x170]
mov eax, dword [ebp - 8]
add eax, 0x140
mov ecx, 0x4cb4dc
call sub.rtl260.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
jmp 0x4caae4
lea edx, [ebp - 0x178]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x5a8]
call sub.vcl260.bpl__Vcl_Controls_TControl_GetText_qqrv
mov edx, dword [ebp - 0x178]
mov eax, dword [ebp - 8]
add eax, 0x13c
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
lea edx, [ebp - 0x17c]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x5a4]
call sub.vcl260.bpl__Vcl_Controls_TControl_GetText_qqrv
mov edx, dword [ebp - 0x17c]
mov eax, dword [ebp - 8]
add eax, 0x140
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 0x10]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x8ec]
mov edx, dword [ebp - 8]
call sub.rtl260.bpl__System_Classes_TList_Add_qqrpv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4cab77
lea eax, [ebp - 0x17c]
mov edx, 2
call sub.rtl260.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0x174]
mov edx, 0xa
call sub.rtl260.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0x148]
mov edx, 6
call sub.rtl260.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0x11c]
mov edx, 0x32
call sub.rtl260.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0x54]
call sub.rtl260.bpl__System__UStrClr_qqrpv
lea eax, [ebp - 0x50]
mov edx, 8
call sub.rtl260.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0x30]
call sub.rtl260.bpl__System__UStrClr_qqrpv
lea eax, [ebp - 0x2c]
call sub.rtl260.bpl__System__UStrClr_qqrpv
ret