Цитата:
|
Сообщение от lostbananan
Прикрепил архив (AnalizData.zip) /зархивировал всю папку с проектом)...
|
Аналогично, но в архиве одни исходники, без мусора. Немножко модификат, пришлось ини-файл перевести на англійську мову, так надёжней. Проверил, под семёркой работает тож.
З.Ы.Так и не въехал в начальную загрузку, зачем такие сложности, всё равно переменные заполняются сразу на 100% (или остаются пустыми, так кстати и было вызывая AV), проще сделать нижеприведёнкой, намного код сократится (очень намного)
Код:
...
// Ініціалізація масиву результатів...
depression := sIniFile.ReadInteger('Results', 'Depression', 0);
debts := sIniFile.ReadInteger('Results', 'Borgs', 0);
salary := sIniFile.ReadInteger('Results', 'Salary', 0);
information := sIniFile.ReadInteger('Results', 'Information', 0);
leader := sIniFile.ReadInteger('Results', 'Leader', 0);
status := sIniFile.ReadInteger('Results', 'Status', 0);
drugs := sIniFile.ReadInteger('Results', 'Drugs', 0);
dismissal := sIniFile.ReadInteger('Results', 'Release', 0);
... а в ini-файле прописать нужные значения, их можно менять и без тупого присвоения if then. Хотя, конечно, может чё и не допонимаю в такой хитрой задумке, мжбт.
З.ЫЗ.Ы. На всякий пожарный, перезалил.