MapGetAt

(   hMap  : Longint;
    Pos   : Longint;
dim Key   : ...;
dim Value : ...)

Slouží ke zjištění věty na pozici Pos v mapě, jejiž identifikátor je hMap.

• Pozice Pos musí být v rozsahu: '0 .. _MapCount-1', jinak je hlášena chyba.
• Klíč Key bude naplněn hodnotou klíče z nalezené věty.
• Hodnota Value bude naplněna hodnotou z nalezené věty.
• Funkci nelze použít na netříděné mapy!
• Způsob řazení (vzestupně / sestupně) bude záležet na nastavení.

Procedura se v kombinaci s funkcí _MapCount používá k setříděnému procházení jednotlivých vět mapy hMap.

Podívejte se na: Procedury a funkce - Mapy

Příklad:

procedure TestDateMap
    dim hMap : longInt;
    dim Key  : DateTime;
    dim Pos  : LongInt;
    dim I    : Longint;
    dim Idx  : Longint;
	
    hMap := _MapOpen(MAP_SORT_DATE_TIME);
    MapAdd(hMap, _DateTime(24, 5, 2014, 10, 00, 0), 1);
    MapAdd(hMap, _DateTime(20, 5, 2014, 13, 35, 0), 3);
    MapAdd(hMap, _DateTime(19, 3, 2014,  7, 15, 0), 4);
    MapAdd(hMap, _DateTime(16, 9, 2014, 16, 23, 0), 2);
	
    for Idx := 0 to _MapCount(hMap)-1 do
        MapGetAt(hMap, Idx, Key, I);
        Trace(I,"  ",Key);
    end
endproc

procedure TestStringMap
    dim hMap : longInt;
    dim Key  : String;
    dim Pos  : LongInt;
    dim I    : Longint;
    dim Idx  : Longint;
	
    hMap := _MapOpen(MAP_SORT_STRING);
    MapAdd(hMap, "Vorel", 1);
    MapAdd(hMap, "Opice", 2);
    MapAdd(hMap, "Novák", 3);
    MapAdd(hMap, "Macháně", 4);
	
    for Idx := 0 to _MapCount(hMap)-1 do
        MapGetAt(hMap, Idx, Key, I);
        Trace(I,"  ",Key);
    end
endproc