Function at 0x41b754
Capabilities:
Link many functions at runtime

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffff88
push ebx
push esi
push edi
xor ebx, ebx
mov dword [ebp - 0x78], ebx
mov dword [ebp - 0x74], ebx
mov dword [ebp - 0x70], ebx
mov dword [ebp - 0x6c], ebx
mov dword [ebp - 0x38], ebx
mov dword [ebp - 0x3c], ebx
mov dword [ebp - 0xc], ecx
mov dword [ebp - 8], edx
mov dword [ebp - 4], eax
mov eax, dword [ebp - 8]
test eax, eax
je 0x41b785
xor edx, edx
mov dword [eax], edx
mov eax, dword [ebp - 0xc]
test eax, eax
je 0x41b790
xor edx, edx
mov dword [eax], edx
xor eax, eax
push ebp
push 0x41bb3e
push dword fs:[eax]
mov dword fs:[eax], esp
xor eax, eax
mov esi, eax
xor eax, eax
mov edi, eax
xor eax, eax
mov dword [ebp - 0x1c], eax
xor eax, eax
mov ebx, eax
xor eax, eax
mov dword [ebp - 0x20], eax
xor eax, eax
mov dword [ebp - 0x24], eax
xor eax, eax
mov dword [ebp - 0x18], eax
mov edx, 0x8000
mov eax, 0x41bb58
call sub.rtl70.bpl__Sysutils_SafeLoadLibrary_qqrx17System_AnsiStringui
mov dword [ebp - 0x14], eax
xor eax, eax
push ebp
push 0x41bb0f
push dword fs:[eax]
mov dword fs:[eax], esp
cmp dword [ebp - 0x14], 0
je 0x41b869
mov edx, 0x8000
mov eax, 0x41bb70
call sub.rtl70.bpl__Sysutils_SafeLoadLibrary_qqrx17System_AnsiStringui
mov dword [ebp - 0x18], eax
cmp dword [ebp - 0x14], 0
je 0x41b869
cmp dword [ebp - 0x18], 0
je 0x41b869
push 0x41bb7c
mov eax, dword [ebp - 0x14]
push eax
call sub.kernel32.dll_GetProcAddress
mov esi, eax
push 0x41bb88
mov eax, dword [ebp - 0x14]
push eax
call sub.kernel32.dll_GetProcAddress
mov edi, eax
push 0x41bb94
mov eax, dword [ebp - 0x18]
push eax
call sub.kernel32.dll_GetProcAddress
mov dword [ebp - 0x1c], eax
push 0x41bba4
mov eax, dword [ebp - 0x14]
push eax
call sub.kernel32.dll_GetProcAddress
mov ebx, eax
push 0x41bbb8
mov eax, dword [ebp - 0x14]
push eax
call sub.kernel32.dll_GetProcAddress
mov dword [ebp - 0x20], eax
push 0x41bbcc
mov eax, dword [ebp - 0x14]
push eax
call sub.kernel32.dll_GetProcAddress
mov dword [ebp - 0x24], eax
test esi, esi
je 0x41b887
test edi, edi
je 0x41b887
cmp dword [ebp - 0x1c], 0
je 0x41b887
test ebx, ebx
je 0x41b887
cmp dword [ebp - 0x20], 0
je 0x41b887
cmp dword [ebp - 0x24], 0
jne 0x41b8c9
xor eax, eax
mov esi, eax
mov byte [ebp - 0xd], 0
lea edx, [ebp - 0x6c]
mov eax, dword [sym.P_Interface.bpl__Jclresources__RsOpenGLInfoError]
call sub.rtl70.bpl__System_LoadResString_qqrp20System_TResStringRec
mov edx, dword [ebp - 0x6c]
mov eax, dword [ebp - 0xc]
call sub.rtl70.bpl__System__LStrAsg_qqrpvpxv
lea edx, [ebp - 0x70]
mov eax, dword [sym.P_Interface.bpl__Jclresources__RsOpenGLInfoError]
call sub.rtl70.bpl__System_LoadResString_qqrp20System_TResStringRec
mov edx, dword [ebp - 0x70]
mov eax, dword [ebp - 8]
call sub.rtl70.bpl__System__LStrAsg_qqrpvpxv
call sub.rtl70.bpl__System__TryFinallyExit_qqrv
jmp 0x41bb16
call sym.P_Interface.bpl__Jcl8087_Get8087ControlWord_qqrv
mov word [ebp - 0x3e], ax
xor eax, eax
push ebp
push 0x41badc
push dword fs:[eax]
mov dword fs:[eax], esp
mov ax, 0x133f
call sub.rtl70.bpl__System_Set8087CW_qqrus
xor eax, eax
mov dword [ebp - 0x2c], eax
mov byte [ebp - 0xd], 0
mov byte [ebp - 0x31], 0
cmp dword [ebp - 4], 0
jne 0x41b93f
mov byte [ebp - 0xd], 0
lea edx, [ebp - 0x74]
mov eax, dword [sym.P_Interface.bpl__Jclresources__RsOpenGLInfoError]
call sub.rtl70.bpl__System_LoadResString_qqrp20System_TResStringRec
mov edx, dword [ebp - 0x74]
mov eax, dword [ebp - 0xc]
call sub.rtl70.bpl__System__LStrAsg_qqrpvpxv
lea edx, [ebp - 0x78]
mov eax, dword [sym.P_Interface.bpl__Jclresources__RsOpenGLInfoError]
call sub.rtl70.bpl__System_LoadResString_qqrp20System_TResStringRec
mov edx, dword [ebp - 0x78]
mov eax, dword [ebp - 8]
call sub.rtl70.bpl__System__LStrAsg_qqrpvpxv
call sub.rtl70.bpl__System__TryFinallyExit_qqrv
call sub.rtl70.bpl__System__TryFinallyExit_qqrv
jmp 0x41bb16
lea eax, [ebp - 0x66]
mov edx, 0x28
call sym.P_Interface.bpl__Jclsysutils_ResetMemory_qqrpvi
mov word [ebp - 0x66], 0x28
mov word [ebp - 0x64], 1
mov dword [ebp - 0x62], 0x24
mov byte [ebp - 0x5e], 0
mov byte [ebp - 0x5d], 0x18
mov byte [ebp - 0x4f], 0x20
mov byte [ebp - 0x4c], 0
mov eax, dword [ebp - 4]
push eax
call sub.user32.dll_GetDC
mov dword [ebp - 0x30], eax
xor eax, eax
push ebp
push 0x41babe
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x66]
push eax
mov eax, dword [ebp - 0x30]
push eax
call sub.gdi32.dll_ChoosePixelFormat
mov dword [ebp - 0x28], eax
cmp dword [ebp - 0x28], 0
jne 0x41b9a9
mov eax, 0x41bbe4
call fcn.0041b6ec
lea eax, [ebp - 0x66]
push eax
mov eax, dword [ebp - 0x28]
push eax
mov eax, dword [ebp - 0x30]
push eax
call sub.gdi32.dll_SetPixelFormat
test eax, eax
jne 0x41b9c8
mov eax, 0x41bc00
call fcn.0041b6ec
mov eax, dword [ebp - 0x30]
push eax
call ebx
mov dword [ebp - 0x2c], eax
cmp dword [ebp - 0x2c], 0
jne 0x41b9e1
mov eax, 0x41bc18
call fcn.0041b6ec
mov eax, dword [ebp - 0x2c]
push eax
mov eax, dword [ebp - 0x30]
push eax
call dword [ebp - 0x24]
test eax, eax
jne 0x41b9fa
mov eax, 0x41bc34
call fcn.0041b6ec
push 0x1f02
call esi
mov ebx, eax
test ebx, ebx
je 0x41ba13
lea edx, [ebp - 0x38]
mov eax, ebx
call sym.P_Interface.bpl__Jclansistrings_StrPasA_qqrpxc
jmp 0x41ba35
mov byte [ebp - 0x31], 1
call edi
mov ebx, eax
test ebx, ebx
je 0x41ba35
push ebx
call dword [ebp - 0x1c]
mov edx, eax
lea eax, [ebp - 0x38]
call sub.rtl70.bpl__System__LStrFromPChar_qqrr17System_AnsiStringpc
lea eax, [ebp - 0x3c]
call sub.rtl70.bpl__System__LStrClr_qqrpv
push 0x1f00
call esi
mov ebx, eax
test ebx, ebx
je 0x41ba4e
lea edx, [ebp - 0x3c]
mov eax, ebx
call sym.P_Interface.bpl__Jclansistrings_StrPasA_qqrpxc
jmp 0x41ba7c
mov byte [ebp - 0x31], 1
call edi
mov ebx, eax
test ebx, ebx
je 0x41ba7c
push ebx
call dword [ebp - 0x1c]
mov edx, eax
lea eax, [ebp - 0x3c]
call sub.rtl70.bpl__System__LStrFromPChar_qqrr17System_AnsiStringpc
call sub.rtl70.bpl__System__TryFinallyExit_qqrv
call sub.rtl70.bpl__System__TryFinallyExit_qqrv
call sub.rtl70.bpl__System__TryFinallyExit_qqrv
jmp 0x41bb16
mov al, byte [ebp - 0x31]
xor al, 1
mov byte [ebp - 0xd], al
mov eax, dword [ebp - 8]
mov edx, dword [ebp - 0x38]
call sub.rtl70.bpl__System__LStrAsg_qqrpvpxv
mov eax, dword [ebp - 0xc]
mov edx, dword [ebp - 0x3c]
call sub.rtl70.bpl__System__LStrAsg_qqrpvpxv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x41bac5
push 0
mov eax, dword [ebp - 0x30]
push eax
call dword [ebp - 0x24]
cmp dword [ebp - 0x2c], 0
je 0x41babd
mov eax, dword [ebp - 0x2c]
push eax
call dword [ebp - 0x20]
ret
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x41bb45
lea eax, [ebp - 0x78]
mov edx, 4
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x3c]
mov edx, 2
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
ret