Function at 0x4be7ec
Capabilities:
Access peb ldr_data
Get number of processors

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffec
push ebx
xor ebx, ebx
mov dword [ebp - 0x14], ebx
test dl, dl
je 0x4be804
add esp, 0xfffffff0
call sub.rtl60.bpl__System__ClassCreate_qqrp17System_TMetaClasso
mov dword [ebp - 0xc], ecx
mov byte [ebp - 5], dl
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x4bea05
push dword fs:[eax]
mov dword fs:[eax], esp
xor eax, eax
mov dword [ebp - 0x10], eax
cmp dword [ebp - 0xc], 0
je 0x4be841
mov eax, dword [ebp - 0xc]
mov edx, dword [sym.SDERPServer.exe__Csdbgrids_TCSDBGridColumns_]
call sub.rtl60.bpl__System__IsClass_qqrp14System_TObjectp17System_TMetaClass
test al, al
je 0x4be841
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x18]
mov dword [ebp - 0x10], eax
cmp dword [ebp - 0x10], 0
je 0x4be84f
mov eax, dword [ebp - 0x10]
call sym.SDERPServer.exe__Csdbgrids_TCSCustomDBGrid_BeginLayout_qqrv
xor eax, eax
push ebp
push 0x4be9e8
push dword fs:[eax]
mov dword fs:[eax], esp
mov ecx, dword [ebp - 0xc]
xor edx, edx
mov eax, dword [ebp - 4]
call sub.rtl60.bpl__Classes_TCollectionItem__bctr_qqrp19Classes_TCollection
mov eax, dword [ebp - 4]
mov dword [eax + 0x6c], 7
mov eax, dword [ebp - 4]
mov byte [eax + 0x70], 0
mov dl, 1
mov eax, dword [sym.imp.vcl60.bpl__Graphics_TFont_]
call sub.vcl60.bpl__Graphics_TFont__bctr_qqrv
mov edx, dword [ebp - 4]
mov dword [edx + 0x58], eax
mov eax, dword [ebp - 4]
call sym.SDERPServer.exe__Csdbgrids_TCSColumn_DefaultFont_qqrv
mov edx, eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x58]
mov ecx, dword [eax]
call dword [ecx + 8]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x58]
mov edx, dword [ebp - 4]
mov dword [eax + 0xc], edx
mov dword [eax + 8], sym.SDERPServer.exe__Csdbgrids_TCSColumn_FontChanged_qqrp14System_TObject
mov eax, dword [ebp - 4]
mov byte [eax + 0x5c], 3
lea edx, [ebp - 0x14]
mov eax, dword [sym.imp.vcl60.bpl__Forms_Screen]
mov eax, dword [eax]
call sub.vcl60.bpl__Forms_TScreen_GetDefaultIME_qqrv
mov edx, dword [ebp - 0x14]
mov eax, dword [ebp - 4]
add eax, 0x60
call sub.rtl60.bpl__System__LStrAsg_qqrpvpxv
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x44]
mov edx, dword [ebp - 4]
mov dword [edx + 0x54], eax
mov eax, dword [ebp - 4]
mov byte [eax + 0xa4], 1
mov eax, dword [ebp - 4]
call sym.SDERPServer.exe__Csdbgrids_TCSColumn_GetWidth_qqrv
mov edx, dword [ebp - 4]
mov dword [edx + 0xa0], eax
mov eax, dword [ebp - 4]
mov byte [eax + 0x75], 1
mov eax, dword [ebp - 4]
mov dword [eax + 0x80], 0xffffffff
mov eax, dword [ebp - 4]
xor edx, edx
mov dword [eax + 0x90], edx
mov dword [eax + 0x94], 0x80000000
mov word [eax + 0x98], 0x3fff
mov ecx, dword [ebp - 4]
mov dl, 1
mov eax, dword [sym.SDERPServer.exe__Csdbgrids_TCSCalcDataLink_]
call sym.SDERPServer.exe__Csdbgrids_TCSCalcDataLink__bctr_qqrp19Csdbgrids_TCSColumn
mov edx, dword [ebp - 4]
mov dword [edx + 0x14], eax
mov eax, dword [ebp - 4]
mov byte [eax + 0x18], 0
mov eax, dword [ebp - 4]
mov byte [eax + 0x28], 0
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, dword [eax]
call dword [edx + 0x18]
mov eax, dword [ebp - 4]
mov byte [eax + 0x30], 0
mov eax, dword [ebp - 4]
mov byte [eax + 0x31], 0
mov eax, dword [ebp - 4]
mov byte [eax + 0x9b], 0
mov eax, dword [ebp - 4]
mov byte [eax + 0x29], 0
mov eax, dword [ebp - 4]
add eax, 0x2c
mov edx, 0x4bea34
call sub.rtl60.bpl__System__LStrAsg_qqrpvpxv
mov eax, dword [ebp - 4]
mov byte [eax + 0x10], 0
mov eax, dword [ebp - 4]
mov dword [eax + 0xc], 0xe
mov eax, dword [ebp - 4]
mov dword [eax + 0x34], 0x64
mov eax, dword [ebp - 4]
add eax, 0x38
mov edx, 0x4bea48
call sub.rtl60.bpl__System__LStrAsg_qqrpvpxv
mov eax, dword [ebp - 4]
add eax, 0x3c
mov edx, 0x4bea58
call sub.rtl60.bpl__System__LStrAsg_qqrpvpxv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4be9ef
cmp dword [ebp - 0x10], 0
je 0x4be9e7
mov eax, dword [ebp - 0x10]
call sym.SDERPServer.exe__Csdbgrids_TCSCustomDBGrid_EndLayout_qqrv
ret