Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 12.04.2010, 16:19   #1
Neroaz
Пользователь
 
Регистрация: 23.03.2010
Сообщений: 36
По умолчанию Delphi. Файл настроек программы.

В общем упростим ситуацию. На форме есть checkbox1 и кнопка сохранить.
Я ставлю галочку в checkbox1 и нажимаю сохранить. Выхожу из программы, захожу занова, опа: галочка уже стоит, как это сделать? Это надо записывать в файл настроек .ini? Как это сделать?
Neroaz вне форума Ответить с цитированием
Старый 12.04.2010, 16:29   #2
TOMMY666
Пользователь
 
Регистрация: 12.04.2010
Сообщений: 27
По умолчанию

знает кто нибудь решение
59(е). Даны действительные числа x, y. Определить, принадлежит ли
точка с координатами следующей области: треугольник с вершинами (-
2, 0), (0, 1), (0, -1) в обьединении с полукругом x*x+y*y=1 (
x>=0).
67(г). Дано натуральное число n (n<=100). Найти первую цифру
числа n.
TOMMY666 вне форума Ответить с цитированием
Старый 12.04.2010, 16:36   #3
Neroaz
Пользователь
 
Регистрация: 23.03.2010
Сообщений: 36
По умолчанию

Эта моя территория, брысь отсюда.
Neroaz вне форума Ответить с цитированием
Старый 12.04.2010, 16:38   #4
Alter
Старожил
 
Аватар для Alter
 
Регистрация: 06.08.2007
Сообщений: 2,183
По умолчанию

Вот, почитайте: http://code-code.narod.ru/art/ini.html
Alter вне форума Ответить с цитированием
Старый 12.04.2010, 16:59   #5
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,434
Радость

вот так..

Код:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, IniFiles, StdCtrls; //регестирируем использование ini файлов.

type
  TMainForm = class(TForm)
    CheckBox: TCheckBox;
    procedure FormCreate(Sender: TObject);
    procedure FormDestroy(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  MainForm: TMainForm;

implementation

var
  {Обьявляю глобальные переменные}
  ini: TIniFile; //Глобальная переменная типа Ini означет что будем работать с ini-файлами
  s: string;     //строковая переменаякуда будем записывать путь до нашей программы(таким образом ini будет создаваться там гду бедет наша программа.)

{$R *.dfm}

procedure SaveSettings();
begin
  try
    s := ExtractFilePath(ParamStr(0));  //Записываем путь
    {Создаем обьект ini и указываем на файл где будет все происходить..
    Если файл существует то будет происходить чтение или запись из/в него
    Если файла нет то он будет автоматически создан.}
    ini := TIniFile.Create(s + 'Settings.ini');
    {Записываем булевое состояние компонента checkBox... Перове раздел, потом имя переменой, 3-тье это состояние чек бокса на данный момент...
    В файле будет запись либо 1(помечен) либо 0(не помечен)...}
    ini.WriteBool('Bool Parametrs', 'CheckBox_checked', MainForm.CheckBox.Checked);
  finally  //в любом случае гарантированно обьект Ini будет уничтожен после записи..
    ini.Free;
  end;
end;

procedure LoadSettings();
begin
  try
    s := ExtractFilePath(ParamStr(0));
    ini := TIniFile.Create(s + 'Settings.ini');
    {загружаем состояние CheckBox из Ini файла..
    Перовое это секция, второе параметр, третье это состояние которое будет переданно компоненту на случай есл файл пуст либо нет значения параметра либо файл удалён, спасает от Acces Violation}
    MainForm.CheckBox.Checked := ini.ReadBool('Bool Parametrs', 'CheckBox_checked', true);
  finally
    ini.Free;
  end;
end;

procedure TMainForm.FormCreate(Sender: TObject);
begin
  LoadSettings; //загружаю настройки при создании формы(запуске программы)
end;

procedure TMainForm.FormDestroy(Sender: TObject);
begin
  SaveSettings;  //сохраняю настройки при разрушении формы(закрытии программы).
end;

end.
исходник и программа в аттаче..
Вложения
Тип файла: zip мой пример работы с ini.zip (197.2 Кб, 43 просмотров)
Человек_Борща вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
сохранение настроек в файл C# darkahoy Общие вопросы C/C++ 0 02.12.2009 18:29
Генерация файла настроек для другой программы TRIZER Общие вопросы Delphi 2 17.11.2009 16:26
Сохранение настроек Delphi 7 tarakan1983 Софт 0 05.11.2008 23:55
Сохранение настроек Delphi Air Помощь студентам 3 22.12.2007 23:19