Verständisfrage: TStringlist als Hashmap & Löschen leerer Values

[kwhk]

Wenn Du möchtest, dass dieser Eintrag ganz verschwindet, dann musst Du den Rest um EINS nach vorn umspeichern, gewissermaßen ein REORG der StringList vornehmen. Statt leer könnte man ja auch "NICHT VORHANDEN" oder "GELÖSCHT" eintragen und diese Zeilen einfach ignorieren.

[Sir Rufo]

Zitat von kwhk:

Wenn Du möchtest, dass dieser Eintrag ganz verschwindet, dann musst Du ...

... einfach nur sl.Values['foo'] := ''; angeben. Dann ist der Eintrag verschwunden. Genau dieses Verhalten ist es doch, was der TE bemängelt.

[nahpets]

Das beschriebene "Problem" liegt in dieser Routine der Delphiquellen:

Delphi-Quellcode:

procedure TStrings.SetValueFromIndex(Index: Integer; const Value: string);
begin
  if Value <> '' then
  begin
    if Index < 0 then Index := Add('');
    Put(Index, Names[Index] + NameValueSeparator + Value);
  end
  else
    if Index >= 0 then Delete(Index);
end;

(Bei Delphi 7 in der Classes.pas zu finden.)

Eventuell könnte man eine eigene Klasse definieren, die von TStringList abgeleitet ist und dort die Methode SetValueFromIndex entsprechend den eigenen Wünschen überschreiben?

Eigentlich müsste ja nur

Delphi-Quellcode:

  else
    if Index >= 0 then Delete(Index)

entfallen.

[Dejan Vu]

Man könnte auch einfach eine TStringDictionary nehmen.