Работа с Ini файлами.

Короткий пример,  лучше всего..

uses INIFiles;
procedure TForm1.Button1Click(Sender: TObject);
Var
   IniF:TINIFile;
begin
    Inif := TINIFile.Create('getmailconf.ini');
    INiF.WriteString('config','email',form1.emailto.text);
end;
procedure TForm1.FormCreate(Sender: TObject);
Var
   IniF:TINIFile;
begin
    Inif := TINIFile.Create('getmailconf.ini');
   form1.emailto.text:=INiF.ReadString('config','email','testmail@yartelecervice.ru');

end;

 

Комментарии:

Добавить комментарий

Ваш e-mail не будет опубликован. Обязательные поля помечены *

Лимит времени истёк. Пожалуйста, перезагрузите CAPTCHA.

Этот сайт использует Akismet для борьбы со спамом. Узнайте как обрабатываются ваши данные комментариев.