Delphi > INI subory

DomCZo

Chcel by som sa opytat. Mam napriklad takyto INI subor:

[hlavny]
prve=nieco
druhe=abeceda
daco=ahlaba
smili=strom

Kód: Vybrať všetko

function IniNacitat(a, b: String): Integer;
var
  IniFile: TIniFile;
begin
  IniFile := TIniFile.Create(ChangeFileExt(LowerCase(Application.ExeName),'.ini'));
  Result := IniFile.ReadInteger(a, b, 0);
  IniFile.Free;
end;

Tymto si nacitavam po jednom. Ale! Ked neviem nazvy tych poloziek vnutri. Da sa nejako nacitat, cele to "hlavny" do stringu?

programator

Skusal si pouzit funkciu ReadSectionValues(); ?

neviem o tom (to neznamená že to neexistuje) ale spraviť si vlastnú funkciu nie je problém. Ale šak ini si vytváraš sám, tak vieš jeho štruktúru

DomCZo

programator: Skusal som. Neviem s tym pohnut.

audiotrack: Zadavalo by sa tam hocico ako som uviedol v priklade. Ale ked sa to neda, tak to asi spravim nejakym poradovnikom.

som pozrel tú funkciu readsectionvalues a cez ňu to pôjde. Tu si o nej troškuprečítaj a sú tam aj nejaké príklady. Budeš tam musieť použiť aj TStringList ktorému si sa minule vyhol

http://www.devarticles.com/c/a/Delphi-K ... -Delphi/2/

DomCZo

Teraz som si vsimol, ze mi tie procedury ReadSection() a ReadSectionValues() nechodili preto, lebo som vymazal to ChangeFileExt() (zdalo sa mi to tam zbytocne). Takze dik moc obom.
audiotrack: vyhnem sa tomu opat, lebo som tie udaje chcel dostat len do ListBoxu

Kód: Vybrať všetko

  IniFile.ReadSectionValues('hlavny', ListBox1.Items);

Listbox rovnako ako memo je TStringList ak sa nemýlim