Чёрт, не заметил вопрос.
А куда прога пишет лог? У меня не создалось никакого файла в папке запуска
Под себя, т.е. в той же папке должен создасться LOG.txt
Вообще, ситуация странная: файл журнала гарантрованно создаётся ДО создания окошка "Чентра Loading..."
Что-то серьёзно не так.
Что конкретно?.. Результат запуска debug-версии - в студию!
Добавлено спустя 6 минут 28 секунд:А, стойте, *сначала* создаётся сплэш-окошко, потом читаются файлы настроек, а потом только создаётся файл журнала и в него сбрасываются накопившиеся строки.
Как пример:
- Код: Выделить всё
Creating temporary main INI file based on the string embedded in the executable...
Creating temporary fake user INI file to avoid crashing on writes to config...
Dynamically loading Win32 API functions to ensure compatibility with vanilla Windows 98 SE...
loading shell32.dll...
SHGetFolderPathA() at 75A97334h in C:windowssyswow64shell32.dll
loading kernel32.dll...
TerminateProcess() at 7748D812h in C:windowssyswow64kernel32.dll
loading user32.dll...
MonitorFromRect() at 7733E7C0h in C:windowssyswow64USER32.dll
GetMonitorInfoA() at 77324423h in C:windowssyswow64USER32.dll
CreateWindowExW() at 77318A39h in C:windowssyswow64USER32.dll
SetWindowTextW() at 773220FCh in C:windowssyswow64USER32.dll
Detecting operating system...
Trying to detect Wine...
..system directory is C:windowssystem32
..trying to open C:windowssystem32kernel32.dll for read...
..scanning for signature string "Wine placeholder DLL"...
..detected = False
It's Windows NT 6.1.
Testing Windows NT version...
loading kernel32.dll...
VerifyVersionInfoA() at 7748F813h in C:windowssyswow64kernel32.dll
VerSetConditionMask() at 77D66042h in C:windowsSysWOW64ntdll.dll
5.1 or greater: True
6.0 or greater: True
6.1 or greater: True
6.2 or greater: False
6.3 or greater: False
10.0 or greater: False
Result: ostWin7
Local app data directory is C:UsersAsusAppDataRoaming
[color=#FF4000]Creating splash window... - этого в выложенной версии пока нет[/color]
Opening the real main INI file D:chentrahchentrah.ini ...
Reading from config [debugging].stop_on_opengl_errors ...
.. = "1", found in the main INI file D:chentrahchentrah.ini
.. = 1
Reading from config [debugging].disable_module_multithreading ...
.. = "0", found in the main INI file D:chentrahchentrah.ini
.. = 0
Determining the home path...
Reading from config [ostwin7].save-path ...
.. = "{$CSIDL_APPDATA}chentrah", found in the main INI file D:chentrahchentrah.ini
.. = "C:UsersAsusAppDataRoamingchentrah"
Reading from config [main].portable ...
.. = "1", found in the main INI file D:chentrahchentrah.ini
.. = 1
Reading from config [ostwin7].try-program-dir-first ...
.. = "0", found in the main INI file D:chentrahchentrah.ini
.. = 0
..trying the install path...
Validating that path is writeable: D:chentrah
Path split to 2 directories.
Creating temporary file D:chentrahdelete-me-im-a-temporary-file-
Result = True
Checking if file is writeable: D:chentrahconfconf.ini
Result = True
Attaching or creating the user INI file D:chentrahconfconf.ini ...
Validating that path is writeable: D:chentrahconf
Path split to 3 directories.
Creating temporary file D:chentrahconfdelete-me-im-a-temporary-file-
Result = True
Reading from config [modules].basepath ...
.. not found.
.. = ""
Reading from config [language].list ...
.. = "ru_RU,en_US", found in the main INI file D:chentrahchentrah.ini
Reading from config [language].chosen ...
.. = "RU_RU", found in the user INI file D:chentrahconfconf.ini
Loading translations for language id="ru_RU,en_US"...
..lang. file "D:chentrahmoduleschentrahtranslationschepersy.chla"..
..lang. file "D:chentrahmoduleschentrahtranslationsexceptions.chla"..
..lang. file "D:chentrahmoduleschentrahtranslationsopenal.chla"..
..lang. file "D:chentrahmoduleschentrahtranslationsmessages.chla"..
..lang. file "D:chentrahmoduleschentrahtranslationsquestions.chla"..Ok
Выполнена запись кешированных 74 строк журнала в файл при первой возможности.
First Stage Init took 00.079 seconds.
Добавлено спустя 10 часов 37 минут 12 секунд:[тормоз]Чёрт, опять не заметил твой пост, надо чаще обновлять страницу
[/тормоз]
.. = 1err:ntdll:RtlpWaitForCriticalSection section 0x38978 "?" wait timed out in thread 001d, blocked by 0000, retrying (60 sec)
Вот же ж... Критическую секцию заклинило почему-то. Вечно с ними проблемы!
Я уверен, что разберусь, но уверен, что не скоро.
P.S. Исправил одну глупость, перезалил. Попробуй снова, может помогло?
Кто-нибудь знает, если выполнить Exit() изнутри блока try...finally, то секция finally срабатывает или нет? Если да, то я - дятел, и выходил из критической секции два раза. Винда жрала и не давилась, а вот вайн...
Добавлено спустя 2 часа 42 секунды:Окей, дятел я, дятел.
- Код: Выделить всё
{$mode objfpc}
{$apptype console}
program finally_eh;
var i: integer;
label b;
procedure a;
begin
try
WriteLn('exit...');
Exit();
finally
WriteLn('finally');
end;
end;
begin
a;
for i:= 1 to 1 do begin
try
WriteLn('break...');
break;
finally
WriteLn('finally');
end;
end;
//allright, this one no go:
//finally.lpr(35,5) Error: Jump in or outside of an exception block
{
try
WriteLn('goto...');
goto b;
finally
WriteLn('finally');
end;
b:
}
{$ifdef windows}
WriteLn('Press Enter to close');
ReadLn;
{$endif}
end.
- Код: Выделить всё
exit...
finally
break...
finally
Press Enter to close
