Попов Андрей Викторович
Шрифт:
if (objListPersons.IsChanged) { //Изменения были сделаны
//Сохраняем данные в XML-файле
objListPersons.SaveData;
//Заново загружаем данные из XML-файла в массив PersonArr
objListPersons.FileToArray;
}
//Переходим к первой записи в массиве
objListPersons.FirstRecord;
//Загружаем в форму данные из массива PersonArr
//для первой записи
objListPersons.LoadDialog;
//Выводим сообщение в заголовке окна
doc.title = "Запись N " + (objListPersons.CurRecord + 1);
}
//Функция-обработчик нажатия на кнопку "<"
function btnPrevious_OnClick {
//Проверяем, были ли сделаны изменения в форме
if (objListPersons.IsChanged) { //Изменения были сделаны
//Сохраняем данные в XML-файле
objListPersons.SaveData;
//Заново загружаем данные из XML-файла в массив PersonArr
objListPersons.FileToArray;
}
//Переходим к предыдущей записи в массиве
objListPersons.PreviousRecord;
//Загружаем в форму данные из массива PersonArr
//для текущей записи
objListPersons.LoadDialog;
//Выводим сообщение в заголовке окна
doc.title = "Запись N " + (objListPersons.CurRecord + 1);
}
//Функция-обработчик нажатия на кнопку "Новая запись"
function btnNew_OnClick {
//Проверяем, были ли сделаны изменения в форме
if (objListPersons.IsChanged) { //Изменения были сделаны
//Сохраняем данные в XML-файле
objListPersons.SaveData;
//Заново загружаем данные из XML-файла в массив PersonArr
objListPersons.FileToArray;
}
//Добавляем новую запись в XML-файл
objListPersons.NewRecord;
//Загружаем в форму данные из массива PersonArr
//для добавленной записи
objListPersons.LoadDialog;
//Выводим сообщение в заголовке окна
doc.title = "Добавлена новая запись";
}
//Функция-обработчик нажатия на кнопку "Удалить"
function btnDelete_OnClick {
//Удаляем текущую запись из XML-файла
objListPersons.DelRecord;
//Загружаем в форму данные из массива PersonArr
//для первой записи
objListPersons.LoadDialog;
//Выводим сообщение в заголовке окна
doc.title = "Запись удалена";
}
//Функция-обработчик нажатия на кнопку ">"
function btnNext_OnClick {
//Проверяем, были ли сделаны изменения в форме
if (objListPersons.IsChanged) { //Изменения были сделаны
//Сохраняем данные в XML-файле
objListPersons.SaveData;
//Заново загружаем данные из XML-файла в массив PersonArr
objListPersons.FileToArray;
}
//Переходим к следующей записи в массиве
objListPersons.NextRecord;
//Загружаем в форму данные из массива PersonArr
//для текущей записи
objListPersons.LoadDialog;
//Выводим сообщение в заголовке окна
doc.title = "Запись N " + (objListPersons.CurRecord + 1);
}
//Функция-обработчик нажатия на кнопку ">>"