Есть вот такая структурка
Код:
// Запись настройки
Settings = record
Name: String[255]; // Наименование настройки
DBPath: String[255]; // Путь к базе
DBUserName: String[100]; // Имя пользователя
DBUserPassword: String[50]; // Пароль пользователя
DBType: Byte; // Тип базы данных (0 - файловая, 1-серверная)
ExchangeCode: String[10]; // Код настройки обмена
end;
// Коллекция настроек
SettingsData = record
RunPath: String[255]; // Путь запуска 1С Предприятия
Data: Array[0..49] of Settings; // Массив настроек
Count: Byte; // Количество записей
end;
И есть процедура, которая осуществляет запись в файл
Код:
procedure SaveSettingsDB();
var
SettingsFile: file of SettingsData;
begin
AssignFile(SettingsFile, 'Settings.dat');
Rewrite(SettingsFile);
Write(SettingsFile, MainData);
CloseFile(SettingsFile);
end;
Admin: Пользуемся тегами!
Проблема в следующем:
- Если есть записи в MainData.Data - все хорошо сохраняется, но если заполнить просто MainData.RunPath, а MainData.Data не трогать, то файл вообще не создается.
Вопрос: Почему так происходит и как это побороть?