equal
deleted
inserted
replaced
664 ZoomValue:= cDefaultZoomLevel; |
664 ZoomValue:= cDefaultZoomLevel; |
665 end; |
665 end; |
666 |
666 |
667 procedure chMapGen(var s: shortstring); |
667 procedure chMapGen(var s: shortstring); |
668 begin |
668 begin |
669 cMapGen:= StrToInt(s) |
669 cMapGen:= TMapGen(StrToInt(s)) |
670 end; |
670 end; |
671 |
671 |
672 procedure chTemplateFilter(var s: shortstring); |
672 procedure chTemplateFilter(var s: shortstring); |
673 begin |
673 begin |
674 cTemplateFilter:= StrToInt(s) |
674 cTemplateFilter:= StrToInt(s) |