Function at 0x513c54
Capabilities:
Get number of processors

Disassembly:
push ebp
mov ebp, esp
mov ecx, 0xc
push 0
push 0
dec ecx
jne 0x513c5c
push ecx
push ebx
push esi
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x514059
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x308]
call sub.MydbGRIDbpl.bpl__Rwkjdbgrids_TRWKJCustomDBGrid_GetDataSource_qqrv
mov ebx, dword [eax + 0x30]
mov dl, 1
mov eax, dword [sym.imp.rtl70.bpl__Classes_TStringList_]
call sub.rtl70.bpl__System_TObject__bctr_qqrv
mov esi, eax
xor ecx, ecx
mov dl, 1
mov eax, dword [sym.imp.adortl70.bpl__Adodb_TADOQuery_]
call sub.adortl70.bpl__Adodb_TADOQuery__bctr_qqrp18Classes_TComponent
mov dword [ebp - 8], eax
xor eax, eax
push ebp
push 0x51401a
push dword fs:[eax]
mov dword fs:[eax], esp
mov edx, dword [sym.P_Interface.bpl__Publicutil_ADOConn]
mov edx, dword [edx]
mov eax, dword [ebp - 8]
mov ecx, dword [eax]
call dword [ecx + 0x26c]
mov eax, ebx
call sub.dbrtl70.bpl__Db_TDataSet_First_qqrv
mov eax, ebx
mov edx, dword [eax]
call dword [edx + 0x14c]
dec eax
test eax, eax
jl 0x513ffc
inc eax
mov dword [ebp - 0x14], eax
mov dword [ebp - 0xc], 0
call sub.rtl70.bpl__Sysutils_Now_qqrv
add esp, 0xfffffff8
fstp qword [esp]
wait
lea edx, [ebp - 0x18]
mov eax, 0x514070
call sub.rtl70.bpl__Sysutils_FormatDateTime_qqrx17System_AnsiString16System_TDateTime
mov eax, dword [ebp - 0x18]
mov edx, dword [ebp - 0x10]
call sub.rtl70.bpl__System__LStrCmp_qqrv
jne 0x513d1a
push 0x64
call sub.kernel32.dll_Sleep_1
lea edx, [ebp - 0x24]
mov eax, dword [ebp - 0xc]
call sub.rtl70.bpl__Sysutils_IntToStr_qqri
mov ecx, dword [ebp - 0x24]
lea eax, [ebp - 0x20]
mov edx, 0x514080
call sub.rtl70.bpl__System__LStrCat3_qqrv
mov eax, dword [ebp - 0x20]
lea ecx, [ebp - 0x1c]
mov edx, 4
call sub.PCommonUtil.bpl__Ncutil_MyRightStr_qqr17System_AnsiStringi
mov eax, dword [ebp - 0x1c]
push eax
call sub.rtl70.bpl__Sysutils_Now_qqrv
add esp, 0xfffffff8
fstp qword [esp]
wait
lea edx, [ebp - 0x28]
mov eax, 0x514070
call sub.rtl70.bpl__Sysutils_FormatDateTime_qqrx17System_AnsiString16System_TDateTime
mov edx, dword [ebp - 0x28]
lea eax, [ebp - 0x10]
pop ecx
call sub.rtl70.bpl__System__LStrCat3_qqrv
mov edx, 0x514090
mov eax, ebx
call sub.dbrtl70.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x2c]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov eax, dword [ebp - 0x2c]
mov edx, 0x5140a0
call sub.rtl70.bpl__System__LStrCmp_qqrv
jne 0x513df9
mov eax, esi
mov edx, dword [eax]
call dword [edx + 0x44]
mov edx, 0x5140ac
mov eax, ebx
call sub.dbrtl70.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x34]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov eax, dword [ebp - 0x34]
lea edx, [ebp - 0x30]
call sub.rtl70.bpl__Sysutils_Trim_qqrx17System_AnsiString
mov edx, dword [ebp - 0x30]
mov eax, esi
mov ecx, dword [eax]
call dword [ecx + 0x38]
push 0x5140a0
mov edx, 0x5140ac
mov eax, ebx
call sub.dbrtl70.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x3c]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov eax, dword [ebp - 0x3c]
lea edx, [ebp - 0x38]
call sub.rtl70.bpl__Sysutils_Trim_qqrx17System_AnsiString
mov edx, dword [ebp - 0x38]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x30c]
mov ecx, dword [ebp - 0x10]
call sym.P_Interface.bpl__Fpinterface_TFPINTERFACE_of_update_jk_qqr17System_AnsiStringt1t1
mov edx, 0x514090
mov eax, ebx
call sub.dbrtl70.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x40]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov eax, dword [ebp - 0x40]
mov edx, 0x5140bc
call sub.rtl70.bpl__System__LStrCmp_qqrv
jne 0x513e51
mov eax, esi
mov edx, dword [eax]
call dword [edx + 0x44]
mov edx, 0x5140ac
mov eax, ebx
call sub.dbrtl70.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x44]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov edx, dword [ebp - 0x44]
mov eax, esi
mov ecx, dword [eax]
call dword [ecx + 0x38]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x30c]
mov edx, esi
call sym.P_Interface.bpl__Fpinterface_TFPINTERFACE_of_DEL_FPDATA_qqrp19Classes_TStringList
mov edx, 0x514090
mov eax, ebx
call sub.dbrtl70.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x48]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov eax, dword [ebp - 0x48]
mov edx, 0x5140c8
call sub.rtl70.bpl__System__LStrCmp_qqrv
jne 0x513fe9
mov eax, esi
mov edx, dword [eax]
call dword [edx + 0x44]
mov edx, 0x5140ac
mov eax, ebx
call sub.dbrtl70.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x4c]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov edx, dword [ebp - 0x4c]
mov eax, esi
mov ecx, dword [eax]
call dword [ecx + 0x38]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x30c]
call sym.P_Interface.bpl__Fpinterface_TFPINTERFACE_of_read_kpsj_qqrv
test al, al
je 0x513ebf
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x30c]
mov edx, esi
call sym.P_Interface.bpl__Fpinterface_TFPINTERFACE_of_CLEARErrorkpxt_qqrp19Classes_TStringList
mov eax, dword [ebp - 8]
call sub.dbrtl70.bpl__Db_TDataSet_Close_qqrv
mov eax, dword [ebp - 8]
call sub.adortl70.bpl__Adodb_TADOQuery_GetSQL_qqrv
mov edx, dword [eax]
call dword [edx + 0x44]
push 0x5140d4
mov eax, dword [ebp - 4]
push dword [eax + 0x318]
push 0x5140ec
mov eax, dword [sym.P_Interface.bpl__Publicutil_GL_STRNSDJH]
push dword [eax]
push 0x514108
mov edx, 0x5140ac
mov eax, ebx
call sub.dbrtl70.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x54]
mov ecx, dword [eax]
call dword [ecx + 0x60]
push dword [ebp - 0x54]
push 0x514120
lea eax, [ebp - 0x50]
mov edx, 7
call sub.rtl70.bpl__System__LStrCatN_qqrv
mov eax, dword [ebp - 0x50]
push eax
mov eax, dword [ebp - 8]
call sub.adortl70.bpl__Adodb_TADOQuery_GetSQL_qqrv
pop edx
mov ecx, dword [eax]
call dword [ecx + 0x38]
mov eax, dword [ebp - 8]
call sub.dbrtl70.bpl__Db_TDataSet_Open_qqrv
mov eax, dword [ebp - 8]
mov edx, dword [eax]
call dword [edx + 0x14c]
test eax, eax
jle 0x513fe9
mov edx, 0x514090
mov eax, dword [ebp - 8]
call sub.dbrtl70.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x58]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov eax, dword [ebp - 0x58]
mov edx, 0x5140a0
call sub.rtl70.bpl__System__LStrCmp_qqrv
jne 0x513fad
mov eax, dword [ebp - 8]
call sub.dbrtl70.bpl__Db_TDataSet_Close_qqrv
push 0x5140a0
mov edx, 0x5140ac
mov eax, ebx
call sub.dbrtl70.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x60]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov eax, dword [ebp - 0x60]
lea edx, [ebp - 0x5c]
call sub.rtl70.bpl__Sysutils_Trim_qqrx17System_AnsiString
mov edx, dword [ebp - 0x5c]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x30c]
mov ecx, dword [ebp - 0x10]
call sym.P_Interface.bpl__Fpinterface_TFPINTERFACE_of_update_jk_qqr17System_AnsiStringt1t1
mov edx, 0x514090
mov eax, dword [ebp - 8]
call sub.dbrtl70.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x64]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov eax, dword [ebp - 0x64]
mov edx, 0x5140bc
call sub.rtl70.bpl__System__LStrCmp_qqrv
jne 0x513fe9
mov eax, dword [ebp - 8]
call sub.dbrtl70.bpl__Db_TDataSet_Close_qqrv
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x30c]
mov edx, esi
call sym.P_Interface.bpl__Fpinterface_TFPINTERFACE_of_DEL_FPDATA_qqrp19Classes_TStringList
mov eax, ebx
call sub.dbrtl70.bpl__Db_TDataSet_Next_qqrv
inc dword [ebp - 0xc]
dec dword [ebp - 0x14]
jne 0x513ced
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x514021
mov eax, dword [ebp - 8]
call sub.dbrtl70.bpl__Db_TDataSet_Close_qqrv
mov eax, dword [ebp - 8]
call sub.rtl70.bpl__System_TObject_Free_qqrv
ret