Function CoordSysFromGMLWithSchema(value As String, schemaLocation As String) As ICoordSys
function CoordSysFromGMLWithSchema(const value: WideString; const schemaLocation: WideString): ICoordSys;
The CoordSysFromGMLWithSchema method retrieves the ICoordSys object that is described in the specified GML file and schema. The first argument to this method is a string that provides the path to the file containing the GML definition for the coordinate reference system. The second argument is optional, and it specifies the path to the schema file for the GML data. The ICoordSys object that corresponds to the coordinate reference system defined in the GML file is returned by this method.
Sub DataSource_CoordSysFromGMLWithSchema(data As DataSource, gmlPath As String, schemaPath As String)
On Error GoTo GMLError
Dim cs As ICoordSys
Set cs = data.CoordSysFromGMLWithSchema(gmlPath, schemaPath)
Exit Sub
GMLError:
MsgBox (err.Description)
End Sub
procedure DataSource_CoordSysFromGMLWithSchema(data : DataSource; gmlPath : WideString; schemaPath : WideString);
var
cs : ICoordSys;
begin
try
cs := data.CoordSysFromGMLWithSchema(gmlPath, schemaPath);
except
on e : EOleException do ShowMessage(e.Message);
end;
end;