Defines the properties of a horizontal datum.
[Visual Basic .NET] Public Sub Define ( _ [ByRef Name As Object], _ [ByRef Alias As Object], _ [ByRef Abbreviation As Object], _ [ByRef Remarks As Object], _ [ByRef Spheroid As Object] _ )
[C#] public void Define ( ref object Name, ref object Alias, ref object Abbreviation, ref object Remarks, ref object Spheroid );
Optional Values
[C++]
HRESULT Define(
VARIANT* Name,
VARIANT* Alias,
VARIANT* Abbreviation,
VARIANT* Remarks,
VARIANT* Spheroid
);
[C++]Parameters
Name [optional] Name is a parameter of type VARIANTTo indicate this parameter is undefined pass a reference to a VARIANT with type VT_ERROR and scode value of DISP_E_PARAMNOTFOUND.
Alias [optional] Alias is a parameter of type VARIANTTo indicate this parameter is undefined pass a reference to a VARIANT with type VT_ERROR and scode value of DISP_E_PARAMNOTFOUND.
Abbreviation [optional] Abbreviation is a parameter of type VARIANTTo indicate this parameter is undefined pass a reference to a VARIANT with type VT_ERROR and scode value of DISP_E_PARAMNOTFOUND.
Remarks [optional] Remarks is a parameter of type VARIANTTo indicate this parameter is undefined pass a reference to a VARIANT with type VT_ERROR and scode value of DISP_E_PARAMNOTFOUND.
Spheroid [optional] Spheroid is a parameter of type VARIANTTo indicate this parameter is undefined pass a reference to a VARIANT with type VT_ERROR and scode value of DISP_E_PARAMNOTFOUND.
Product Availability
Description
The properties of a datum that you need to set include the name and a spheroid.
private void DefineDatum(ISpheroid sphere)
{
IDatum datum = new DatumClass();
//Query interface for DatumEdit
IDatumEdit datumEdit = datum as IDatumEdit;
//Define the properties of the datum
//sphere represents an ISpheroid object
object name = "D_North_American_1983";
object alias = "NAD83";
object abbreviation = "NAD83";
object remarks = "NAD83 is the datum";
object spheroid = sphere;
datumEdit.Define(ref name, ref alias, ref abbreviation, ref remarks, ref spheroid);
}
Sub DefineDatum(ByRef pSphere As ISpheroid)
Dim pDatum As IDatum
Dim pDatumEdit As IDatumEdit
pDatum = New Datum
'Query interface for DatumEdit
pDatumEdit = pDatum
'Define the properties of the datum
'pSphere represents an ISpheroid object
pDatumEdit.Define(Name:="D_North_American_1983", _
Alias:="NAD83", Abbreviation:="NAD83", _
Remarks:="NAD83 is the datum", Spheroid:=pSphere)
End Sub