Function at 0x51fd50
Capabilities:
Copy file
Set current directory

Disassembly:
push ebp
mov ebp, esp
push ecx
mov ecx, 0x68
push 0
push 0
dec ecx
jne 0x51fd59
push ecx
xchg dword [ebp - 4], ecx
push ebx
push esi
push edi
mov ebx, ecx
mov dword [ebp - 0xc], edx
mov dword [ebp - 8], eax
lea eax, [ebp - 0x194]
mov edx, dword [sym.imp.rtl70.bpl___xp_19Sysutils_TSearchRec]
call sub.rtl70.bpl__System__InitializeRecord_qqrpvt1
xor eax, eax
push ebp
push 0x520ee1
push dword fs:[eax]
mov dword fs:[eax], esp
mov dl, 1
mov eax, dword [sym.imp.rtl70.bpl__Registry_TRegistry_]
call sub.rtl70.bpl__Registry_TRegistry__bctr_qqrv
mov dword [ebp - 0x14], eax
mov byte [ebp - 0xd], 0
xor eax, eax
push ebp
push 0x520da6
push dword fs:[eax]
mov dword fs:[eax], esp
mov edx, 0x80000002
mov eax, dword [ebp - 0x14]
call sub.rtl70.bpl__Registry_TRegistry_SetRootKey_qqrui
mov cl, 1
mov edx, 0x520f00
mov eax, dword [ebp - 0x14]
call sub.rtl70.bpl__Registry_TRegistry_OpenKey_qqrx17System_AnsiStringo
lea ecx, [ebp - 0x18]
mov edx, 0x520f24
mov eax, dword [ebp - 0x14]
call sub.rtl70.bpl__Registry_TRegistry_ReadString_qqrx17System_AnsiString
lea ecx, [ebp - 0x198]
mov edx, 0x520f24
mov eax, dword [ebp - 0x14]
call sub.rtl70.bpl__Registry_TRegistry_ReadString_qqrx17System_AnsiString
mov edx, dword [ebp - 0x198]
lea eax, [ebp - 0x2c]
mov ecx, 0x520f38
call sub.rtl70.bpl__System__LStrCat3_qqrv
mov eax, dword [ebp - 0x2c]
call sub.rtl70.bpl__Sysutils_FileExists_qqrx17System_AnsiString
test al, al
jne 0x51fe33
lea ecx, [ebp - 0x19c]
mov edx, 0x520f24
mov eax, dword [ebp - 0x14]
call sub.rtl70.bpl__Registry_TRegistry_ReadString_qqrx17System_AnsiString
mov edx, dword [ebp - 0x19c]
lea eax, [ebp - 0x2c]
mov ecx, 0x520f54
call sub.rtl70.bpl__System__LStrCat3_qqrv
lea edx, [ebp - 0x1a4]
xor eax, eax
call sub.rtl70.bpl__System_ParamStr_qqri
mov eax, dword [ebp - 0x1a4]
lea edx, [ebp - 0x1a0]
call sub.rtl70.bpl__Sysutils_ExtractFilePath_qqrx17System_AnsiString
lea eax, [ebp - 0x1a0]
mov edx, 0x520f6c
call sub.rtl70.bpl__System__LStrCat_qqrv
mov eax, dword [ebp - 0x1a0]
call sub.rtl70.bpl__Sysutils_FileExists_qqrx17System_AnsiString
test al, al
jne 0x51feed
lea edx, [ebp - 0x1ac]
mov eax, dword [sym.P_Interface.bpl__Publicutil_GL_ExeName]
mov eax, dword [eax]
call sub.rtl70.bpl__Sysutils_ExtractFilePath_qqrx17System_AnsiString
push dword [ebp - 0x1ac]
mov eax, dword [ebp - 8]
mov esi, dword [eax + 4]
push dword [esi + 0x54]
push 0x520f80
mov ecx, dword [esi + 0x58]
lea eax, [ebp - 0x1b4]
mov edx, 0x520f8c
call sub.rtl70.bpl__System__LStrCat3_qqrv
mov eax, dword [ebp - 0x1b4]
lea ecx, [ebp - 0x1b0]
mov edx, 3
call sub.PCommonUtil.bpl__Ncutil_MyRightStr_qqr17System_AnsiStringi
push dword [ebp - 0x1b0]
push 0x520f98
lea eax, [ebp - 0x1a8]
mov edx, 5
call sub.rtl70.bpl__System__LStrCatN_qqrv
mov eax, dword [ebp - 0x1a8]
call sub.rtl70.bpl__Sysutils_FileExists_qqrx17System_AnsiString
test al, al
je 0x520115
lea edx, [ebp - 0x1bc]
mov eax, dword [sym.P_Interface.bpl__Publicutil_GL_ExeName]
mov eax, dword [eax]
call sub.rtl70.bpl__Sysutils_ExtractFilePath_qqrx17System_AnsiString
push dword [ebp - 0x1bc]
mov eax, dword [ebp - 8]
mov esi, dword [eax + 4]
push dword [esi + 0x54]
push 0x520f80
mov ecx, dword [esi + 0x58]
lea eax, [ebp - 0x1c4]
mov edx, 0x520f8c
call sub.rtl70.bpl__System__LStrCat3_qqrv
mov eax, dword [ebp - 0x1c4]
lea ecx, [ebp - 0x1c0]
mov edx, 3
call sub.PCommonUtil.bpl__Ncutil_MyRightStr_qqr17System_AnsiStringi
push dword [ebp - 0x1c0]
push 0x520f98
lea eax, [ebp - 0x1b8]
mov edx, 5
call sub.rtl70.bpl__System__LStrCatN_qqrv
mov eax, dword [ebp - 0x1b8]
call sub.rtl70.bpl__Sysutils_FileExists_qqrx17System_AnsiString
test al, al
je 0x51ffeb
lea edx, [ebp - 0x1cc]
mov eax, dword [sym.P_Interface.bpl__Publicutil_GL_ExeName]
mov eax, dword [eax]
call sub.rtl70.bpl__Sysutils_ExtractFilePath_qqrx17System_AnsiString
push dword [ebp - 0x1cc]
mov eax, dword [ebp - 8]
mov esi, dword [eax + 4]
push dword [esi + 0x54]
push 0x520f80
mov ecx, dword [esi + 0x58]
lea eax, [ebp - 0x1d4]
mov edx, 0x520f8c
call sub.rtl70.bpl__System__LStrCat3_qqrv
mov eax, dword [ebp - 0x1d4]
lea ecx, [ebp - 0x1d0]
mov edx, 3
call sub.PCommonUtil.bpl__Ncutil_MyRightStr_qqr17System_AnsiStringi
push dword [ebp - 0x1d0]
push 0x520f98
lea eax, [ebp - 0x1c8]
mov edx, 5
call sub.rtl70.bpl__System__LStrCatN_qqrv
mov ecx, dword [ebp - 0x1c8]
mov dl, 1
mov eax, dword [sym.imp.rtl70.bpl__Inifiles_TIniFile_]
call sub.rtl70.bpl__Inifiles_TCustomIniFile__bctr_qqrx17System_AnsiString
mov dword [ebp - 0x34], eax
jmp 0x520022
lea edx, [ebp - 0x1d8]
mov eax, dword [sym.P_Interface.bpl__Publicutil_GL_ExeName]
mov eax, dword [eax]
call sub.rtl70.bpl__Sysutils_ExtractFilePath_qqrx17System_AnsiString
lea eax, [ebp - 0x1d8]
mov edx, 0x520f6c
call sub.rtl70.bpl__System__LStrCat_qqrv
mov ecx, dword [ebp - 0x1d8]
mov dl, 1
mov eax, dword [sym.imp.rtl70.bpl__Inifiles_TIniFile_]
call sub.rtl70.bpl__Inifiles_TCustomIniFile__bctr_qqrx17System_AnsiString
mov dword [ebp - 0x34], eax
xor eax, eax
push ebp
push 0x52010e
push dword fs:[eax]
mov dword fs:[eax], esp
push 0x520fac
lea eax, [ebp - 0x1dc]
push eax
mov ecx, 0x520fb8
mov edx, 0x520fc8
mov eax, dword [ebp - 0x34]
mov esi, dword [eax]
call dword [esi]
mov eax, dword [ebp - 0x1dc]
mov edx, 0x520fd8
call sub.rtl70.bpl__System__LStrCmp_qqrv
jne 0x5200f8
push 5
mov eax, dword [ebp - 8]
mov ecx, dword [eax + 4]
mov dl, 1
mov eax, dword [sym.P_Interface.bpl__Ptkp_SKPTKP_]
call sym.P_Interface.bpl__Pubsk_PUBSKOBJ__bctr_qqrp14System_TObject17Skpubdata_SKXTVER
mov edx, dword [ebp - 8]
mov dword [edx + 0x30], eax
xor ecx, ecx
mov dl, 1
mov eax, dword [sym.P_Interface.bpl__Pdfium_TPdfView_]
call sym.P_Interface.bpl__Pdfium_TPdfView__bctr_qqrp18Classes_TComponent
mov edx, dword [ebp - 8]
mov dword [edx + 0x2c], eax
mov eax, dword [ebp + 8]
push eax
mov ecx, ebx
mov edx, dword [ebp - 0xc]
mov eax, dword [ebp - 8]
mov eax, dword [eax + 0x30]
mov ebx, dword [eax]
call dword [ebx + 0x38]
mov edx, 0x520fe4
mov eax, 0x520ff0
call sym.P_Interface.bpl__Publicutil_WriteRegString_qqr17System_AnsiStringt1
push 0
lea eax, [ebp - 0x1e0]
push eax
mov ecx, 0x521000
mov edx, 0x520fc8
mov eax, dword [ebp - 0x34]
mov ebx, dword [eax]
call dword [ebx]
mov edx, dword [ebp - 0x1e0]
mov eax, dword [ebp - 8]
add eax, 0x28
call sub.rtl70.bpl__System__LStrAsg_qqrpvpxv
mov eax, dword [ebp - 8]
cmp dword [eax + 0x28], 0
jne 0x5200f8
mov eax, dword [ebp - 8]
add eax, 0x28
mov edx, 0x520fe4
call sub.rtl70.bpl__System__LStrAsg_qqrpvpxv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x520115
mov eax, dword [ebp - 0x34]
call sub.rtl70.bpl__System_TObject_Free_qqrv
ret
mov dl, 1
mov eax, dword [sym.imp.rtl70.bpl__Classes_TStringList_]
call sub.rtl70.bpl__System_TObject__bctr_qqrv
mov esi, eax
mov eax, esi
mov edx, dword [eax]
call dword [edx + 0x44]
push dword [ebp - 0x18]
push 0x521010
mov eax, dword [ebp - 8]
mov eax, dword [eax + 4]
push dword [eax + 0x54]
lea eax, [ebp - 0x1e4]
mov edx, 3
call sub.rtl70.bpl__System__LStrCatN_qqrv
mov eax, dword [ebp - 0x1e4]
mov edx, esi
call fcn.0051abd8
mov eax, esi
mov edx, dword [eax]
call dword [edx + 0x14]
dec eax
test eax, eax
jl 0x520220
inc eax
mov dword [ebp - 0x3c], eax
xor ebx, ebx
lea ecx, [ebp - 0x1e8]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x1e8]
lea ecx, [ebp - 0x194]
mov edx, 0x3f
call sub.rtl70.bpl__Sysutils_FindFirst_qqrx17System_AnsiStringir19Sysutils_TSearchRec
test eax, eax
jne 0x52020b
lea eax, [ebp - 0x28]
push eax
lea eax, [ebp - 0x168]
push eax
call sub.kernel32.dll_FileTimeToLocalFileTime
lea eax, [ebp - 4]
push eax
lea eax, [ebp - 2]
push eax
lea eax, [ebp - 0x28]
push eax
call sub.kernel32.dll_FileTimeToDosDateTime
mov eax, dword [ebp - 4]
call sub.rtl70.bpl__Sysutils_FileDateToDateTime_qqri
fstp qword [ebp - 0x20]
wait
push dword [ebp - 0x1c]
push dword [ebp - 0x20]
lea edx, [ebp - 0x1ec]
mov eax, 0x52101c
call sub.rtl70.bpl__Sysutils_FormatDateTime_qqrx17System_AnsiString16System_TDateTime
lea eax, [ebp - 0x1ec]
push eax
lea ecx, [ebp - 0x1f0]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov edx, dword [ebp - 0x1f0]
pop eax
call sub.rtl70.bpl__System__LStrCat_qqrv
mov ecx, dword [ebp - 0x1ec]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0x20]
lea eax, [ebp - 0x194]
call sub.rtl70.bpl__Sysutils_FindClose_qqrr19Sysutils_TSearchRec
inc ebx
dec dword [ebp - 0x3c]
jne 0x52016e
mov eax, esi
mov edx, dword [eax]
call dword [edx + 0x90]
mov eax, esi
mov edx, dword [eax]
call dword [edx + 0x14]
mov ebx, eax
dec ebx
cmp ebx, 0
jl 0x520786
lea ecx, [ebp - 0x1f8]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x1f8]
lea edx, [ebp - 0x1f4]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov edx, dword [ebp - 0x1f4]
mov eax, 0x521034
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea ecx, [ebp - 0x200]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x200]
lea edx, [ebp - 0x1fc]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov edx, dword [ebp - 0x1fc]
mov eax, 0x521048
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea ecx, [ebp - 0x208]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x208]
lea edx, [ebp - 0x204]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x204]
push eax
lea edx, [ebp - 0x20c]
mov eax, 0x521058
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x20c]
pop edx
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea ecx, [ebp - 0x214]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x214]
lea edx, [ebp - 0x210]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x210]
push eax
lea edx, [ebp - 0x218]
mov eax, 0x521070
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x218]
pop edx
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea ecx, [ebp - 0x220]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x220]
lea edx, [ebp - 0x21c]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x21c]
push eax
lea edx, [ebp - 0x224]
mov eax, 0x521084
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x224]
pop edx
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea ecx, [ebp - 0x22c]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x22c]
lea edx, [ebp - 0x228]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x228]
push eax
lea edx, [ebp - 0x230]
mov eax, 0x52109c
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x230]
pop edx
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea ecx, [ebp - 0x238]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x238]
lea edx, [ebp - 0x234]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x234]
push eax
lea edx, [ebp - 0x23c]
mov eax, 0x5210b0
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x23c]
pop edx
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea ecx, [ebp - 0x244]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x244]
lea edx, [ebp - 0x240]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x240]
push eax
lea edx, [ebp - 0x248]
mov eax, 0x5210c8
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x248]
pop edx
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea ecx, [ebp - 0x250]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x250]
lea edx, [ebp - 0x24c]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x24c]
push eax
lea edx, [ebp - 0x254]
mov eax, 0x5210dc
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x254]
pop edx
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea ecx, [ebp - 0x25c]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x25c]
lea edx, [ebp - 0x258]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x258]
push eax
lea edx, [ebp - 0x260]
mov eax, 0x5210f4
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x260]
pop edx
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea ecx, [ebp - 0x268]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x268]
lea edx, [ebp - 0x264]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x264]
push eax
lea edx, [ebp - 0x26c]
mov eax, 0x521108
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x26c]
pop edx
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea ecx, [ebp - 0x274]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x274]
lea edx, [ebp - 0x270]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x270]
push eax
lea edx, [ebp - 0x278]
mov eax, 0x521120
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x278]
pop edx
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea ecx, [ebp - 0x280]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x280]
lea edx, [ebp - 0x27c]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x27c]
push eax
lea edx, [ebp - 0x284]
mov eax, 0x521134
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x284]
pop edx
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea ecx, [ebp - 0x28c]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x28c]
lea edx, [ebp - 0x288]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x288]
push eax
lea edx, [ebp - 0x290]
mov eax, 0x52114c
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x290]
pop edx
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea ecx, [ebp - 0x298]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x298]
lea edx, [ebp - 0x294]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x294]
push eax
lea edx, [ebp - 0x29c]
mov eax, 0x521160
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x29c]
pop edx
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea ecx, [ebp - 0x2a4]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x2a4]
lea edx, [ebp - 0x2a0]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x2a0]
push eax
lea edx, [ebp - 0x2a8]
mov eax, 0x521178
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x2a8]
pop edx
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea ecx, [ebp - 0x2b0]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x2b0]
lea edx, [ebp - 0x2ac]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x2ac]
push eax
lea edx, [ebp - 0x2b4]
mov eax, 0x521190
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x2b4]
pop edx
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea ecx, [ebp - 0x2bc]
mov edx, ebx
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x2bc]
lea edx, [ebp - 0x2b8]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x2b8]
push eax
lea edx, [ebp - 0x2c0]
mov eax, 0x5211a8
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x2c0]
pop edx
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jne 0x52077c
lea eax, [ebp - 0x18]
push eax
lea ecx, [ebp - 0x2c4]
mov edx, ebx
mov eax, esi
mov esi, dword [eax]
call dword [esi + 0xc]
mov eax, dword [ebp - 0x2c4]
xor ecx, ecx
mov edx, 0xf
call sub.PCommonUtil.bpl__Ncutil_copystr_qqr17System_AnsiStringii
jmp 0x520786
dec ebx
cmp ebx, 0xffffffff
jne 0x52023d
lea ecx, [ebp - 0x2c8]
mov edx, 0x520f24
mov eax, dword [ebp - 0x14]
call sub.rtl70.bpl__Registry_TRegistry_ReadString_qqrx17System_AnsiString
mov eax, dword [ebp - 0x2c8]
call sub.rtl70.bpl__Sysutils_SetCurrentDir_qqrx17System_AnsiString
lea ecx, [ebp - 0x2cc]
mov edx, 0x520f24
mov eax, dword [ebp - 0x14]
call sub.rtl70.bpl__Registry_TRegistry_ReadString_qqrx17System_AnsiString
mov eax, dword [ebp - 0x2cc]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
push eax
call sub.kernel32.dll_SetCurrentDirectoryA
lea edx, [ebp - 0x2d0]
mov eax, dword [ebp - 0x2c]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov edx, dword [ebp - 0x2d0]
mov eax, 0x5211c0
call sub.rtl70.bpl__System__LStrPos_qqrv
test eax, eax
jle 0x520ab8
lea eax, [ebp - 0x2d4]
mov edx, dword [ebp - 0x18]
call sub.rtl70.bpl__System__WStrFromLStr_qqrr17System_WideStringx17System_AnsiString
mov edx, dword [ebp - 0x2d4]
mov eax, dword [ebp - 8]
mov eax, dword [eax + 4]
mov cl, 1
call sym.P_Interface.bpl__Fpinterface_TFPINTERFACE_of_output_debug_info_qqr17System_WideStringo
mov ecx, dword [ebp - 0x2c]
mov dl, 1
mov eax, dword [sym.P_Interface.bpl__Sqlitetable3_TSQLiteDatabase_]
call sym.P_Interface.bpl__Sqlitetable3_TSQLiteDatabase__bctr_qqr17System_AnsiString
mov ebx, eax
mov eax, dword [ebp - 8]
mov dword [eax + 0x1c], ebx
lea edx, [ebp - 0x2d8]
mov eax, 0x5211d8
call sym.P_Interface.bpl__Publicutil_ReadRegString_qqr17System_AnsiString
mov eax, dword [ebp - 0x2d8]
push eax
lea edx, [ebp - 0x2dc]
mov eax, dword [ebp - 0x18]
call sub.rtl70.bpl__System_AnsiToUtf8_qqrx17System_AnsiString
mov ecx, dword [ebp - 0x2dc]
mov eax, ebx
xor edx, edx
call sym.P_Interface.bpl__Sqlitetable3_TSQLiteDatabase_OpenDataBase_qqrx17System_AnsiStringt1t1
lea edx, [ebp - 0x2e0]
mov eax, dword [ebp - 0x18]
call sub.rtl70.bpl__Sysutils_ExtractFilePath_qqrx17System_AnsiString
lea eax, [ebp - 0x2e0]
mov edx, 0x521084
call sub.rtl70.bpl__System__LStrCat_qqrv
mov eax, dword [ebp - 0x2e0]
call sub.rtl70.bpl__Sysutils_FileExists_qqrx17System_AnsiString
test al, al
je 0x5208a8
lea edx, [ebp - 0x2e4]
mov eax, dword [ebp - 0x18]
call sub.rtl70.bpl__Sysutils_ExtractFilePath_qqrx17System_AnsiString
mov edx, dword [ebp - 0x2e4]
lea eax, [ebp - 0x38]
mov ecx, 0x521084
call sub.rtl70.bpl__System__LStrCat3_qqrv
lea edx, [ebp - 0x2e8]
mov eax, dword [ebp - 0x18]
call sub.rtl70.bpl__Sysutils_ExtractFilePath_qqrx17System_AnsiString
lea eax, [ebp - 0x2e8]
mov edx, 0x5210dc
call sub.rtl70.bpl__System__LStrCat_qqrv
mov eax, dword [ebp - 0x2e8]
call sub.rtl70.bpl__Sysutils_FileExists_qqrx17System_AnsiString
test al, al
je 0x5208f6
lea edx, [ebp - 0x2ec]
mov eax, dword [ebp - 0x18]
call sub.rtl70.bpl__Sysutils_ExtractFilePath_qqrx17System_AnsiString
mov edx, dword [ebp - 0x2ec]
lea eax, [ebp - 0x38]
mov ecx, 0x5210dc
call sub.rtl70.bpl__System__LStrCat3_qqrv
lea edx, [ebp - 0x2f0]
mov eax, dword [ebp - 0x18]
call sub.rtl70.bpl__Sysutils_ExtractFilePath_qqrx17System_AnsiString
lea eax, [ebp - 0x2f0]
mov edx, 0x521134
call sub.rtl70.bpl__System__LStrCat_qqrv
mov eax, dword [ebp - 0x2f0]
call sub.rtl70.bpl__Sysutils_FileExists_qqrx17System_AnsiString
test al, al
je 0x520944
lea edx, [ebp - 0x2f4]
mov eax, dword [ebp - 0x18]
call sub.rtl70.bpl__Sysutils_ExtractFilePath_qqrx17System_AnsiString
mov edx, dword [ebp - 0x2f4]
lea eax, [ebp - 0x38]
mov ecx, 0x521134
call sub.rtl70.bpl__System__LStrCat3_qqrv
lea edx, [ebp - 0x2f8]
mov eax, dword [ebp - 0x18]
call sub.rtl70.bpl__Sysutils_ExtractFilePath_qqrx17System_AnsiString
lea eax, [ebp - 0x2f8]
mov edx, 0x521190
call sub.rtl70.bpl__System__LStrCat_qqrv
mov eax, dword [ebp - 0x2f8]
call sub.rtl70.bpl__Sysutils_FileExists_qqrx17System_AnsiString
test al, al
je 0x520992
lea edx, [ebp - 0x2fc]
mov eax, dword [ebp - 0x18]
call sub.rtl70.bpl__Sysutils_ExtractFilePath_qqrx17System_AnsiString
mov edx, dword [ebp - 0x2fc]
lea eax, [ebp - 0x38]
mov ecx, 0x521190
call sub.rtl70.bpl__System__LStrCat3_qqrv
lea edx, [ebp - 0x300]
mov eax, dword [sym.P_Interface.bpl__Publicutil_GL_ExeName]
mov eax, dword [eax]
call sub.rtl70.bpl__Sysutils_ExtractFilePath_qqrx17System_AnsiString
lea eax, [ebp - 0x300]
mov edx, 0x5211e8
call sub.rtl70.bpl__System__LStrCat_qqrv
mov eax, dword [ebp - 0x300]
call sub.rtl70.bpl__Sysutils_DeleteFile_qqrx17System_AnsiString
push 0
lea edx, [ebp - 0x304]
mov eax, dword [sym.P_Interface.bpl__Publicutil_GL_ExeName]
mov eax, dword [eax]
call sub.rtl70.bpl__Sysutils_ExtractFilePath_qqrx17System_AnsiString
lea eax, [ebp - 0x304]
mov edx, 0x5211e8
call sub.rtl70.bpl__System__LStrCat_qqrv
mov eax, dword [ebp - 0x304]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
push eax
mov eax, dword [ebp - 0x38]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
push eax
call sub.kernel32.dll_CopyFileA
lea edx, [ebp - 0x30c]
mov eax, dword [sym.P_Interface.bpl__Publicutil_GL_ExeName]
mov eax, dword [eax]
call sub.rtl70.bpl__Sysutils_ExtractFilePath_qqrx17System_AnsiString
lea eax, [ebp - 0x30c]
mov edx, 0x5211e8
call sub.rtl70.bpl__System__LStrCat_qqrv
mov edx, dword [ebp - 0x30c]
lea eax, [ebp - 0x308]
call sub.rtl70.bpl__System__WStrFromLStr_qqrr17System_WideStringx17System_AnsiString
mov edx, dword [ebp - 0x308]
mov eax, dword [ebp - 8]
mov eax, dword [eax + 4]
mov cl, 1
call sym.P_Interface.bpl__Fpinterface_TFPINTERFACE_of_output_debug_info_qqr17System_WideStringo
mov ecx, dword [ebp - 0x2c]
mov dl, 1
mov eax, dword [sym.P_Interface.bpl__Sqlitetable3_TSQLiteDatabase_]
call sym.P_Interface.bpl__Sqlitetable3_TSQLiteDatabase__bctr_qqr17System_AnsiString
mov ebx, eax
mov eax, dword [ebp - 8]
mov dword [eax + 0x20], ebx
lea edx, [ebp - 0x310]
mov eax, 0x521200
call sym.P_Interface.bpl__Publicutil_ReadRegString_qqr17System_AnsiString
mov eax, dword [ebp - 0x310]
push eax
lea edx, [ebp - 0x318]
mov eax, dword [sym.P_Interface.bpl__Publicutil_GL_ExeName]
mov eax, dword [eax]
call sub.rtl70.bpl__Sysutils_ExtractFilePath_qqrx17System_AnsiString
lea eax, [ebp - 0x318]
mov edx, 0x5211e8
call sub.rtl70.bpl__System__LStrCat_qqrv
mov eax, dword [ebp - 0x318]
lea edx, [ebp - 0x314]
call sub.rtl70.bpl__System_AnsiToUtf8_qqrx17System_AnsiString
mov ecx, dword [ebp - 0x314]
mov eax, ebx
xor edx, edx
call sym.P_Interface.bpl__Sqlitetable3_TSQLiteDatabase_OpenDataBase_qqrx17System_AnsiStringt1t1
jmp 0x520bf8
lea eax, [ebp - 0x31c]
mov edx, dword [ebp - 0x18]
call sub.rtl70.bpl__System__WStrFromLStr_qqrr17System_WideStringx17System_AnsiString
mov edx, dword [ebp - 0x31c]
mov eax, dword [ebp - 8]
mov eax, dword [eax + 4]
mov cl, 1
call sym.P_Interface.bpl__Fpinterface_TFPINTERFACE_of_output_debug_info_qqr17System_WideStringo
lea ecx, [ebp - 0x328]
mov edx, 0x520f24
mov eax, dword [ebp - 0x14]
call sub.rtl70.bpl__Registry_TRegistry_ReadString_qqrx17System_AnsiString
push dword [ebp - 0x328]
push 0x521010
mov eax, dword [ebp - 8]
mov eax, dword [eax + 4]
push dword [eax + 0x54]
push 0x521210
lea eax, [ebp - 0x324]
mov edx, 4
call sub.rtl70.bpl__System__LStrCatN_qqrv
mov edx, dword [ebp - 0x324]
lea eax, [ebp - 0x320]
call sub.rtl70.bpl__System__WStrFromLStr_qqrr17System_WideStringx17System_AnsiString
mov edx, dword [ebp - 0x320]
mov eax, dword [ebp - 8]
mov eax, dword [eax + 4]
mov cl, 1
call sym.P_Interface.bpl__Fpinterface_TFPINTERFACE_of_output_debug_info_qqr17System_WideStringo
mov ecx, dword [ebp - 0x2c]
mov dl, 1
mov eax, dword [sym.P_Interface.bpl__Sqlitetable3_TSQLiteDatabase_]
call sym.P_Interface.bpl__Sqlitetable3_TSQLiteDatabase__bctr_qqr17System_AnsiString
mov ebx, eax
mov eax, dword [ebp - 8]
mov dword [eax + 0x1c], ebx
push 0x521224
lea edx, [ebp - 0x32c]
mov eax, dword [ebp - 0x18]
call sub.rtl70.bpl__System_AnsiToUtf8_qqrx17System_AnsiString
mov ecx, dword [ebp - 0x32c]
mov eax, dword [ebp - 8]
mov eax, dword [eax + 4]
mov edx, dword [eax + 0x54]
mov eax, ebx
call sym.P_Interface.bpl__Sqlitetable3_TSQLiteDatabase_OpenDataBase_qqrx17System_AnsiStringt1t1
mov ecx, dword [ebp - 0x2c]
mov dl, 1
mov eax, dword [sym.P_Interface.bpl__Sqlitetable3_TSQLiteDatabase_]
call sym.P_Interface.bpl__Sqlitetable3_TSQLiteDatabase__bctr_qqr17System_AnsiString
mov ebx, eax
mov eax, dword [ebp - 8]
mov dword [eax + 0x20], ebx
push 0x521224
lea ecx, [ebp - 0x338]
mov edx, 0x520f24
mov eax, dword [ebp - 0x14]
call sub.rtl70.bpl__Registry_TRegistry_ReadString_qqrx17System_AnsiString
push dword [ebp - 0x338]
push 0x521010
mov eax, dword [ebp - 8]
mov eax, dword [eax + 4]
push dword [eax + 0x54]
push 0x521210
lea eax, [ebp - 0x334]
mov edx, 4
call sub.rtl70.bpl__System__LStrCatN_qqrv
mov eax, dword [ebp - 0x334]
lea edx, [ebp - 0x330]
call sub.rtl70.bpl__System_AnsiToUtf8_qqrx17System_AnsiString
mov ecx, dword [ebp - 0x330]
mov eax, dword [ebp - 8]
mov eax, dword [eax + 4]
mov edx, dword [eax + 0x54]
mov eax, ebx
call sym.P_Interface.bpl__Sqlitetable3_TSQLiteDatabase_OpenDataBase_qqrx17System_AnsiStringt1t1
lea eax, [ebp - 0x30]
mov edx, 0x520fd8
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
xor eax, eax
push ebp
push 0x520d43
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 8]
cmp dword [eax + 0x20], 0
jne 0x520c38
mov eax, 0x521240
call sub.vcl70.bpl__Dialogs_ShowMessage_qqrx17System_AnsiString
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
call sub.rtl70.bpl__System__TryFinallyExit_qqrv
jmp 0x520dad
lea edx, [ebp - 0x33c]
mov eax, 0x521254
call sub.rtl70.bpl__System_AnsiToUtf8_qqrx17System_AnsiString
mov edx, dword [ebp - 0x33c]
mov eax, dword [ebp - 8]
mov eax, dword [eax + 0x20]
call sym.P_Interface.bpl__Sqlitetable3_TSQLiteDatabase_GetTable_qqrx17System_AnsiString
mov ebx, eax
test ebx, ebx
jne 0x520c71
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
call sub.rtl70.bpl__System__TryFinallyExit_qqrv
jmp 0x520dad
lea eax, [ebp - 0x30]
mov edx, 0x520fe4
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
cmp dword [ebx + 8], 0
jbe 0x520d01
lea eax, [ebp - 0x30]
mov edx, 0x521274
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
mov eax, ebx
call sym.P_Interface.bpl__Sqlitetable3_TSQLiteTable_MoveFirst_qqrv
lea eax, [ebp - 0x30]
mov edx, 0x521280
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
lea ecx, [ebp - 0x340]
mov edx, 0x52128c
mov eax, ebx
call sym.P_Interface.bpl__Sqlitetable3_TSQLiteTable_GetFieldByName_qqr17System_AnsiString
mov eax, dword [ebp - 0x340]
mov edx, dword [ebp - 0xc]
call sub.rtl70.bpl__System_Utf8ToAnsi_qqrx17System_AnsiString
lea eax, [ebp - 0x30]
mov edx, 0x52129c
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
lea ecx, [ebp - 0x344]
mov edx, 0x5212a8
mov eax, ebx
call sym.P_Interface.bpl__Sqlitetable3_TSQLiteTable_GetFieldByName_qqr17System_AnsiString
mov eax, dword [ebp - 0x344]
mov edx, dword [ebp + 8]
call sub.rtl70.bpl__System_Utf8ToAnsi_qqrx17System_AnsiString
lea eax, [ebp - 0x30]
mov edx, 0x5212b8
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
jmp 0x520d0b
mov eax, 0x5212c4
call sub.vcl70.bpl__Dialogs_ShowMessage_qqrx17System_AnsiString
lea eax, [ebp - 0x30]
mov edx, 0x5212dc
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
mov eax, ebx
call sub.rtl70.bpl__System_TObject_Free_qqrv
lea eax, [ebp - 0x30]
mov edx, 0x5212e8
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
lea eax, [ebp - 0x30]
mov edx, 0x5212f4
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x520d90
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x520dad
mov eax, dword [ebp - 0x14]
call sub.rtl70.bpl__System_TObject_Free_qqrv
ret
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x520eeb
lea eax, [ebp - 0x348]
mov edx, 3
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x33c]
call sub.rtl70.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x338]
mov edx, 2
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x330]
mov edx, 2
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x328]
mov edx, 2
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x320]
mov edx, 2
call sub.rtl70.bpl__System__WStrArrayClr_qqrpvi
lea eax, [ebp - 0x318]
call sub.rtl70.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x314]
call sub.rtl70.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x310]
mov edx, 2
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x308]
call sub.rtl70.bpl__System__WStrClr_qqrpv
lea eax, [ebp - 0x304]
mov edx, 0xa
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x2dc]
call sub.rtl70.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x2d8]
call sub.rtl70.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x2d4]
call sub.rtl70.bpl__System__WStrClr_qqrpv
lea eax, [ebp - 0x2d0]
mov edx, 0x43
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x1c0]
mov edx, 3
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x1c4]
call sub.rtl70.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x1b4]
mov edx, 8
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x194]
mov edx, dword [sym.imp.rtl70.bpl___xp_19Sysutils_TSearchRec]
call sub.rtl70.bpl__System__FinalizeRecord_qqrpvt1
lea eax, [ebp - 0x38]
call sub.rtl70.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x30]
mov edx, 2
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x18]
call sub.rtl70.bpl__System__LStrClr_qqrpv
ret