Registriert seit: 29. Okt 2006
Ort: Rauschenberg
21 Beiträge
|
Re: Fragen zu List- und Combobox
15. Nov 2006, 14:45
procedure AddSection(const iniName, sectionName: String; section: TStrings;
mustClear: Boolean = False);
var
i: Integer;
begin
with TMemIniFile.Create(iniName) do
try
if mustClear then
EraseSection(sectionName);
for i := 0 to Pred(section.Count) do
WriteString(sectionName, section.Names[i], section.ValueFromIndex[i]);
UpdateFile;
finally
Free;
end;
end;
ValueFromIndex erkennt er leider nicht...
|