|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Помогите пожалуйста разобраться
Есть вот такая структурка
Код:
// Запись настройки 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; Проблема в следующем: - Если есть записи в MainData.Data - все хорошо сохраняется, но если заполнить просто MainData.RunPath, а MainData.Data не трогать, то файл вообще не создается. Вопрос: Почему так происходит и как это побороть? Последний раз редактировалось Admin, 19.05.2009 в 10:17. |