SelectFormSettingsFile

From SunFlurry wiki
Jump to: navigation, search
  SelectFormSettingsFile (Визуальные функции)
Объект:Функции общего назначения
Статус разработки: Реализована
Тип:Функция
Обращение к БД:Нет
Исключения:Невозможно превратить в строку, число
Визуальность:Да

Функция показывает диалог сохранения или загрузки установок формы. Если пользователь выбрал файл установок (для загрузки или сохранения), будут заполнены переменные путь к файлу или имя файла установок, и функция возвратится с результатом 1.

Синтаксис

SelectFormSettingsFile(<Загрузка установок (INT)>,<Путь файла установок (STRING)>,<Имя файла установок (STRING)>):<Пользователь осуществил выбор 1 или 0 (INT)>

Аргументы

  • <Загрузка установок (INT)> - Режим выводимого диалога. 0 -- диалог загрузки установок, 1 -- диалог сохранения установок.
  • <Путь файла установок (STRING)> - (возможен аргумент-переменная (ByRef)) Переменная, получающая путь к файлу установок, который пользователь выбрал для загрузки или сохранения
  • <Имя файла установок (STRING)> - (возможен аргумент-переменная (ByRef)) Переменная, получающая имя файла установок, который пользователь выбрал для загрузки или сохранения

Возвращаемое значение

Возвращает 1, если пользователь выбрал файл установок (для загрузки или сохранения) и нажал на "ОК", иначе возвращает 0.


Примеры

//Данный блок располагается в обработчике визуального события OnSaveSettings
//Пользователю предлагается выбрать файл сохранения установок, после чего, вместо обычных установок формы, 
//  в файл записывается особый список спОтбор, содержащий нужные установки.
//Переменные FolderName и SetName создаются автоматически при вызове события
Result:=1;
if isEmpty(SetName) Then
  If not SelectFormSettingsFile(1,FolderName,SetName) Then
    Exit;
  EndIf;
EndIf;
ObjectToFile(спОтбор,AddBackSlash(FolderName)+SetName);


//Данный блок располагается в обработчике визуального события OnLoadSettings
//Пользователю предлагается выбрать файл для загрузки установок, после чего, вместо обычных установок формы, 
//  файл, содержащий нужные установки, загружается в список спОтбор.
//Переменные FolderName и SetName создаются автоматически при вызове события
Result:=1;
if not Form.IsFullyInitialized() then
  Exit;
EndIf;
if isEmpty(SetName) Then
  If not SelectFormSettingsFile(0,FolderName,SetName) Then
    Exit;
  EndIf;
EndIf;
спОтбор:=ObjectFromFile(AddBackSlash(FolderName)+SetName);
//Далее следует применение загруженных установок
...