Class strEntry
   Field entry:String
End

Class strMap
   
   Private
   
   Field sMap:StringMap<strEntry>
   Field tempEntry:strEntry
   
   Public
   
   Method New()
      Self.sMap = New StringMap<strEntry>
      Self.tempEntry = New strEntry
   End
   
   Method Set(Key:String,Value:String)
      tempEntry.entry=Value
      sMap.Set(Key,tempEntry)
   End
   
   Method Get:String(Key:String)
      Return sMap.Get(Key).entry
   End
End

Function Main()
   Local testmap:strMap= New strMap
   testmap.Set("Test1","Ergebnis1")
   testmap.Set("Test2","Ergebnis2")
   Print testmap.Get("Test1")
End

Function Main()
   Local m:StringMap<StringObject> = New StringMap<StringObject>
   
   m.Set("Test1", "Ergebnis1")
   m.Set("Test2", "Ergebnis2")

   Print m.Get("Test1")
End