Einzelnen Beitrag anzeigen

Maik81ftl

Registriert seit: 31. Mär 2011
Ort: Wahlstedt
26 Beiträge
 
FreePascal / Lazarus
 
#16

AW: Ini Readsection begrenzt?

  Alt 5. Apr 2011, 21:24
Habe da auch mal eine Frage, ich verwende in dem sinne keine wirkliche ini-Datei, allerdings die Systematik dieser Datei.

Wenn ich nun Werte auslese werden bei mir ebendfalls alle einträge "Verschluckt"

an der Größe kann es auf jedenfall nicht liegen, da ich in diesem programm schon mit einer File von 1,0 KB erfolgreich daten innerhal des Programmes verwalte. Die datei, welche ich verwalte hat selbst eine Größe von 62 Byte.

Hier der entsprechende Code für die verwaltung

Delphi-Quellcode:
function TUser.GetUserList: TStringlist;
var s, _s: String;
    Count: Byte;
begin
  fStringList2:= TStringList.Create;
  Count:= 0;
  fFilename:= Format('%s%s', [fPath, fExt2+'.'+fList]);
  if FileExists(fFilename) then begin
    // Userliste Laden
    fStringlist2.LoadFromFile(fFileName);
    with TIniFile.Create(fFilename) do try
      S:= Format('%s', [fList]);
      ReadSection(s, fStringList);
{      for Count:= 1 to fStringList2.Count do
        begin
        _S:= ReadString(s, fList+intToStr(Count), ' ');
        fStringList.Add(_S);
        end;  }

      finally
        Free;
      end;
    end;
  TempS:= IntToStr(fStringList.Count);
  Result:= fStringList;
end;

      S:= Format('[%s]', [fList]);       S:= Format('%s', [fList]);
Die Definition eine Bibliothek ist bei mir eine *.so

Geändert von Maik81ftl ( 5. Apr 2011 um 21:53 Uhr) Grund: Fehler gefunden...
  Mit Zitat antworten Zitat