Output all keys and values from TFPGMap

[LemonParty]

Hello.

I want to output all keys and values from TFPGMap. How can I do that?

[cdbc]

Hi
Does it have an 'Iterate' method, then use that...
It usually requires you to provide a procedure or method to call for each item in the map...
Maybe it's called 'ForEach'... that would be the same M.O. as above.
Regards Benny

eta: Forget iterating that list or its ancestors...! Just had a look 

[Thausand]

I want to output all keys and values from TFPGMap. How can I do that?

Code: Pascal  [Select][+][-]

1. program test;
2.  
3. {$mode objfpc}{$h+}
4.  
5. uses sysutils,fgl;
6. type TAMap = specialize TFPGMap<string,integer>;
7. var
8.   Map:TAMap;
9.   n,i:integer;
10. begin
11.   Map:=TAMap.Create;
12.   for n:=1 to 100 do Map.Add(n.ToString,n*2);
13.   for i:=0 to Map.Count-1 do writeln(Map.Keys[i],' -> ',Map.Data[i]);
14.   Map.Free;
15. end.
16.  

[LemonParty]

It works. Thank you.