Thanks for the link.
The _DMap method AddLayerFromFilename hangs in Windows xp, but works in Windows 7.
I just downloaded that version.
Some problems between windows versions (Delphi XE3).
The _DMap method AddLayerFromFilename hangs in Windows xp, but works in Windows 7.
The marker always is a diamond... how to change?
Ex.
procedure X(filename: String);
var shape: IShapeFile;
myHandler: integer;
segm: ILineSegment;
util: TUtils;
begin
myMap.RemoveAllLayers;
myHandler := MyMap.AddLayerFromFilename(filename, fosAutodetect, True); //hangs in Windows XP
shape := MyMap.ShapeFile[myHandle];
chape.DefaultDrawingOptions.PointType := ptShapeFlag;
shape.DefaultDrawingOptions.FillColor := clRed;
shape.CollisionMode := AllowCollisions;
shape.DefaultDrawingOptions.LinePattern := TLinePattern.Create(Self).DefaultInterface;
segm := shape.DefaultDrawingOptions.LinePattern.AddMarker(dpsFlag);
// segm := chape.DefaultDrawingOptions.LinePattern.InsertMarker(0, dpsFlag);
util := TUtils.Create(Self);
segm.Color := util.ColorByName(Orange);
segm.MarkerSize := 16;
segm.MarkerInterval := 32;
MyMap.Redraw;
//the line color orange appears, but the marker isn't a flag, it's a diamond.
MyMap.ZoomToLayer(myHandler);
end;
