TDictionary - mit einem Bezeichner unterschiedliche Values einfügen

[Stevie]

Warum so kompliziert?

Delphi-Quellcode:

var
  map: TMultiMap<Integer,Integer>;
  i, f: Integer;
begin
  map := TMultiMap<Integer,Integer>.Create;
  for i := 3 to 6 do
    for f := fib(i-1)+1 to fib(i) do
      map.Add(i, f);

Gut, das kann man nun noch optimieren, da man weiß, dass fib(i) eh auch fib(i-1) berechnet, aber nunja

[Rabenrecht]

Zitat von Stevie:

Warum so kompliziert?

Delphi-Quellcode:

var
  map: TMultiMap<Integer,Integer>;
  i, f: Integer;
begin
  map := TMultiMap<Integer,Integer>.Create;
  for i := 3 to 6 do
    for f := fib(i-1)+1 to fib(i) do
      map.Add(i, f);

Gut, das kann man nun noch optimieren, da man weiß, dass fib(i) eh auch fib(i-1) berechnet, aber nunja

Weil mein eigentlicher Code nichts mit Fibonacci-Zahlen zu tun hat

[Stevie]

Zitat von Rabenrecht:

Weil mein eigentlicher Code nichts mit Fibonacci-Zahlen zu tun hat

Gut, wie auch immer, nutz ne multimap, dann brauchst auch für neue Keys keine Listen erzeugen und läufst Gefahr in die falsche Liste zu schreiben.
Würde man in Java übrigens auch so machen und die Multimap aus guava oder sonstwoher nutzen, damit man sich den Krams spart.

[Klaus01]

würde es auch so funktionieren?

Delphi-Quellcode:

        begin
          vHashMap.Add(aKey,vList);
          vList.free;
          vList := TList<Integer>.Create;
          state := 0;
        end;

Grüße
Klaus

[Stevie]

Zitat von Klaus01:

würde es auch so funktionieren?

Delphi-Quellcode:

        begin
          vHashMap.Add(aKey,vList);
          vList.free;
          vList := TList<Integer>.Create;
          state := 0;
        end;

Grüße
Klaus

Nein Weil du dann eine Instanz, welche in der hashmap unter aKey steht einfach frei gibst und somit in der hashmap ein dangling pointer steht...

[Klaus01]

.. oh da hast Du recht.
Habe ich übersehen ...

Grüße
Klaus

[Rabenrecht]

Stevie: ich werde deine Multimap für spätere Probleme im Hinterkopf behalten. Danke dafür

Die Sache hier habe ich jetzt doch ganz anders gelöst.