Einzelnen Beitrag anzeigen

Benutzerbild von yankee
yankee

Registriert seit: 10. Mär 2004
1.134 Beiträge
 
Lazarus
 
#4

Re: Problem mit ReadSectionValues bei den IniFiles!

  Alt 28. Mär 2004, 10:27
Also ich habe das Problem bei mir so gelöst:
INI:
[Animation]
nof=1
dateiname1=c:\asd.bmp

also nof (number of Lines) wieviele Einträge es gibt. Und dann so:
Delphi-Quellcode:
procedure IniAuslesen;
var nof,s:integer;
    daten:string;
    ini:TIniFile;
begin
    nof :=ini.ReadInteger('Animation','count',0);
    for s:=1 to nof do //sooft wie es Einträge gibt
    begin
        daten[s]=readString('Animation','dateiname'+inttostr(s),'');
    end;
ini.free;
end;
So können beliebig viele Dateinamen drinstehen. Also auch
[Animation]
nof=3
dateiname1=c:\asd.bmp
dateiname2=d:\bilder\bahnhof.bmp
dateiname3=c:\gedöne\airport.bmp

kleine Ärgenzung. Ich weiß nicht so genau, wie das mit den Arrys geht, dass must du noch anpassen.
Letzter Tipp: Drogen. Machen zwar nicht glücklich, geben einem aber wenigstens das Gefühl glücklich zu sein.

Have a lot of fun!
  Mit Zitat antworten Zitat