Ich hab mich nun doch entschieden meine eigene Stringliste abzuleiten.
Dazu habe ich folgendes Probiert:
Delphi-Quellcode:
function TdddStringlist.ReadString(Section, Value, Default : String) : String;
var i, j : integer;
begin
Result := Default;
if Count > 0 then
for i := 0 to Count - 1 do
if copy(Strings[i],2,Length(Strings[i])-2) = Section then
for j := i + 1 to Count - 1 do
if copy(Strings[j],0,pos('=',Strings[j]) - 1) = Value then
begin//Edit
Result := copy(Strings[j],pos('=',Strings[j]) + 1,length(Strings[j]));
break;//Edit
end;//Edit
end;
kann man das so machen oder übersehe ich da was und es ist doch kompliziereter?