Delphi – .INI fajlovi

Skoro svaki Windows program poseduje inicijalizacione fajlove (ekstenzija .ini), koji sluลพe za unoลกenje inicijalnih parametara pri pokretanju aplikacija. Ovi paramateri su podloลพni promeni koju vrลกi korisnik ili sam program. Na svu sreฤ‡u sam Delphi nam olakลกava rad sa inicijalizacionim fajlovima preko svoje klase TIniFile. Ova klasa nije deo VCL palete komponenti, poลกto nema vizuelnih delova.
Datoteka .ini vam moลพe posluลพiti da u nju smestite opcije vaลกe aplikacije i njihove postavke. Da bi uopลกte kreirali datoteku .ini, u programskom kodu ฤ‡emo prvo kreirati objekat tipa TIniFile koristeฤ‡i metodu Create:

var
IniFajl: TIniFile;
procedure ...
IniFajl := TIniFile.Create ('IniProgram.ini');

Ako u prethodnom stringu ne napiลกete i putanju, .ini fajl ฤ‡e se kreirati u „C:Windows“ folderu. Kada kreiramo fajl potrebno je da pomoฤ‡u dve metode izvrลกimo pisanje i ฤitanje postavki u fajlu. Svako podeลกavanje upisujemo izmeฤ‘u uglastih zagrada ( “ [ „,“ ] “ ), u sledeฤ‡em primeru videฤ‡emo neke parametre odreฤ‘enog podeลกavanja, recimo fonta u vaลกem programu:

[ Font ]
Fontsize=8
Fontname=Arial
FontCharset=238

Podeลกavanja u .ini fajlovima mogu biti objekti tipa: TStrings ili TStringList. Kreiraฤ‡emo objekat TStringList:

var
StringLista:=TStringList;

ฤŒitanje i upisivanje vrลกimo pomoฤ‡u metoda ReadSectionValues i WriteString:

begin
IniFajl := TIniFile.Create(
'c:Putanja_do_programaIniProgram.ini' );
StringLista := TStringList.Create;
IniFajl.WriteString( 'Font' , 'FontColor' , 'Black' );
Memo1.Clear;
IniFajl.ReadSectionValues('Font' , 'Memo1.Lines');
IniFajl.Free;
end;

U prvoj liniji kreiramo sam .ini fajl, a u drugoj inicijalizujemo varijablu StringLista. U treฤ‡oj liniji vrลกimo upis u .ini fajl, i to u sekciju „Font“, podeลกavanje „FontColor“ postavljamo na „Black“. ฤŒetvrta linija briลกe sadrลพaj Memo kontrole, koju smo prethodno postavili na formu. I imamo u petoj liniji iลกฤitavanje svih podeลกavanja u sekciji „Font“ i njihov prikaz dajemo u Memo kontroli. Kada zavrลกimo sa koriลกฤ‡enjem objekta TIniFile, oslobodiฤ‡emo ga instrukcijom „IniFajl.Free“.

Pratite Krstaricu na www.krstarica.com