I created a WEB application for generate a polygon, and now i need to make this polygon editable for the final user, how can i made this? The documentation talks about a "Editable" porperty, but there's no such property on the FNCMaps component. Here's the code i'm using:
procedure TForm2.WebButton1Click(Sender: TObject);
var
i: Integer;
Center: TCoordinate;
Polygon: TTMSFNCMapsCoordinateRecArray;
pg: TTMSFNCMapsPolygon;
begin
if (edtLatitude.Text = '') or (edtLongitude.Text = '') or
(edtMeters.Text = '') or (edtSides.Text = '') then
exit;
Center.Latitude := StrToFloat(StringReplace(edtLatitude.Text, '.', ',',
[rfReplaceAll]));
Center.Longitude := StrToFloat(StringReplace(edtLongitude.Text, '.', ',',
[rfReplaceAll]));
Polygon := GeneratePolygon(Center, StrToint(edtMeters.Text),
StrToint(edtSides.Text));
TMSFNCMaps1.ClearPolygons;
pg := TMSFNCMaps1.AddPolygon(Polygon, True);
pg.DataInteger := 5;
pg.StrokeColor := gcBlue;
pg.StrokeWidth := 2;
pg.FillColor := gcBlue;
pg.FillOpacity := 0.1;
TMSFNCMaps1.ZoomToBounds(Polygon);
end;