در این مثال ؛ بخش مورد نظر دسکتاپ نامیده شده و در زیر اون المانها رو داریم که مقدار دهی شده اندمقادیر شما ممکن است مانند اینها نباشنداما المانها یکسانندهر زمان که ویندوز بالا می آید سیستم عامل این مقادیر رو چک می کنه ودسکتاپ رو براساس مقادیر این المانها خواهد ساخت من واقعا نمی تونم فایل اینی رو بهتر از این توضیح بدم و قصد من کاربرد فایلهای اینی در دلفیه.
اولین کاری که باید انجام بدیماینه که قادر به خواندن و نوشتن از فایلهای اینی باشیم کلمه inifiles رو به یوزز اضافه کنیم (در یونینت اصلی برنامه)
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, INIFiles;
بیایید دو باتن رو روی فرم بزارین نام باتنها رو (btnread)و(btnwrite) بزارین و کپشن اونا رو به (Read INI)و(Write INI) ست کنید کد زیر رو در رویداد ان کلیک btnwriteبنویسید:
TForm1.btnWriteClick(Sender: TObject);
var
myINI : TINIFile;
begin
myINI := TINIFile.Create(ExtractFilePath(Application.EXENam e) + 'myinifile.ini');
myINI.WriteString('Settings', formcolor', red');
myINI.Free;
end;
اولین کاری که این کد انجام می ده تعریف myiniبه عنوان یک شیء از نوء tinifileاست ..creat() در واقع مسیر فایل اینی رو مشخص می کنه کد بالا معین می کنه مسیر فایل در همان پوشه برنامه ماست.شما می تونین مسیر دیگه ای رو وارد کنید اگه فایل موجود نباشه نگران نباشین دلفی اتوماتیک اونو ایجاد خواهد کرد خط بعدی یک المان معین رو در یک بخشی به نام settingدرج خواهد کرد.
پارامتر دوم برای دلفی مشخص می کنه که المانی به نام formcolorرو در بخش settingو به مقدار red ست کنه.حال بیایید مقادیر را از فایل اینی بخوانیم.
TForm1.btnReadClick(Sender: TObject);
var
myINI : TINIFile;
st:string;
begin
myINI := TINIFile.Create(ExtractFilePath(Application.EXENam e) + 'myinifile.ini');
st := myINI.ReadString('Settings', formcolor', 'Default');
myINI.Free;
end;
پاسخ با نقل قول