Function at 0x41b430
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 0x41b461
xor edx, edx
mov dword [eax], edx
mov eax, dword [ebp - 0xc]
test eax, eax
je 0x41b46c
xor edx, edx
mov dword [eax], edx
xor eax, eax
push ebp
push 0x41b81a
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, 0x41b834
call sub.rtl70.bpl__Sysutils_SafeLoadLibrary_qqrx17System_AnsiStringui
mov dword [ebp - 0x14], eax
xor eax, eax
push ebp
push 0x41b7eb
push dword fs:[eax]
mov dword fs:[eax], esp
cmp dword [ebp - 0x14], 0
je 0x41b545
mov edx, 0x8000
mov eax, 0x41b84c
call sub.rtl70.bpl__Sysutils_SafeLoadLibrary_qqrx17System_AnsiStringui
mov dword [ebp - 0x18], eax
cmp dword [ebp - 0x14], 0
je 0x41b545
cmp dword [ebp - 0x18], 0
je 0x41b545
push 0x41b858
mov eax, dword [ebp - 0x14]
push eax
call sub.kernel32.dll_GetProcAddress
mov esi, eax
push 0x41b864
mov eax, dword [ebp - 0x14]
push eax
call sub.kernel32.dll_GetProcAddress
mov edi, eax
push 0x41b870
mov eax, dword [ebp - 0x18]
push eax
call sub.kernel32.dll_GetProcAddress
mov dword [ebp - 0x1c], eax
push 0x41b880
mov eax, dword [ebp - 0x14]
push eax
call sub.kernel32.dll_GetProcAddress
mov ebx, eax
push 0x41b894
mov eax, dword [ebp - 0x14]
push eax
call sub.kernel32.dll_GetProcAddress
mov dword [ebp - 0x20], eax
push 0x41b8a8
mov eax, dword [ebp - 0x14]
push eax
call sub.kernel32.dll_GetProcAddress
mov dword [ebp - 0x24], eax
test esi, esi
je 0x41b563
test edi, edi
je 0x41b563
cmp dword [ebp - 0x1c], 0
je 0x41b563
test ebx, ebx
je 0x41b563
cmp dword [ebp - 0x20], 0
je 0x41b563
cmp dword [ebp - 0x24], 0
jne 0x41b5a5
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 0x41b7f2
call sym.P_Interface.bpl__Jcl8087_Get8087ControlWord_qqrv
mov word [ebp - 0x3e], ax
xor eax, eax
push ebp
push 0x41b7b8
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 0x41b61b
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 0x41b7f2
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 0x41b79a
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 0x41b685
mov eax, 0x41b8c0
call fcn.0041b3c8
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 0x41b6a4
mov eax, 0x41b8dc
call fcn.0041b3c8
mov eax, dword [ebp - 0x30]
push eax
call ebx
mov dword [ebp - 0x2c], eax
cmp dword [ebp - 0x2c], 0
jne 0x41b6bd
mov eax, 0x41b8f4
call fcn.0041b3c8
mov eax, dword [ebp - 0x2c]
push eax
mov eax, dword [ebp - 0x30]
push eax
call dword [ebp - 0x24]
test eax, eax
jne 0x41b6d6
mov eax, 0x41b910
call fcn.0041b3c8
push 0x1f02
call esi
mov ebx, eax
test ebx, ebx
je 0x41b6ef
lea edx, [ebp - 0x38]
mov eax, ebx
call sym.P_Interface.bpl__Jclansistrings_StrPasA_qqrpxc
jmp 0x41b711
mov byte [ebp - 0x31], 1
call edi
mov ebx, eax
test ebx, ebx
je 0x41b711
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 0x41b72a
lea edx, [ebp - 0x3c]
mov eax, ebx
call sym.P_Interface.bpl__Jclansistrings_StrPasA_qqrpxc
jmp 0x41b758
mov byte [ebp - 0x31], 1
call edi
mov ebx, eax
test ebx, ebx
je 0x41b758
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 0x41b7f2
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 0x41b7a1
push 0
mov eax, dword [ebp - 0x30]
push eax
call dword [ebp - 0x24]
cmp dword [ebp - 0x2c], 0
je 0x41b799
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 0x41b821
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