Scopo
Ritorna il tipo dell'oggetto il cui puntatore viene passato come parametro. L'indicazione completa del tipo di un oggetto è composta da tre parti: tipo, modello e versione. Questa funzione restituisce solo la prima parte mascherando modello e versione. Se si vuole ottenere il tipo completo occorre leggere la proprietà Tipo utilizzando la funzione GetPropInteger.
Sintassi
int Tipo = 0 // Tipo di oggetto
//
Tipo := INDE.GetObjectType(id oggetto)
//
Tipo := INDE.GetObjectType(id oggetto)
Argomenti
ID Oggetto | Puntatore dell'oggetto di cui si vuole conoscere il tipo. Solitamente il puntatore ad un oggetto viene recuperato tramite una delle seguenti funzioni: GetNextObject, GetObjectByID, GetObjectByCode, GetObjectByName, GetParentObject, GetPropObject. |
Valore di ritorno
Viene ritornato un numero intero corrispondente al tipo dell'oggetto. L'elenco dei possibili tipi è contenuto nella lista valori Tipi Oggetto.
Esempio di codice
// ************************
// Carica l'oggetto da INDE
// ************************
public boolean OggettoBase.LoadFromINDE(
int Puntatore // Puntatore dell'oggetto
)
{
// Imposto il puntatore
Puntatore := Puntatore
//
// Provo a recuperare le proprietà
try
{
// Carico le proprietà
GUID := EsempiMS.INDE.GetPropGUID(Puntatore, GUID, ??)
Tipo := EsempiMS.INDE.GetObjType(Puntatore)
//
if EsempiMS.INDE.IsPropReadable(Puntatore, Nome)
{
Nome := EsempiMS.INDE.GetPropString(Puntatore, Nome, ??)
}
//
if EsempiMS.INDE.IsPropReadable(Puntatore, Descrizione)
{
Descrizione := EsempiMS.INDE.GetPropString(Puntatore, Descrizione, ??)
}
//
if EsempiMS.INDE.IsPropReadable(Puntatore, Codice)
{
DBCode := EsempiMS.INDE.GetPropString(Puntatore, Codice, ??)
}
//
CodiceAutomatico := EsempiMS.INDE.TestFlag(Puntatore, Codice automatico)
//
Altro
...
}
catch
{
return False
}
//
this.SetOriginal()
//
return True
}
// Carica l'oggetto da INDE
// ************************
public boolean OggettoBase.LoadFromINDE(
int Puntatore // Puntatore dell'oggetto
)
{
// Imposto il puntatore
Puntatore := Puntatore
//
// Provo a recuperare le proprietà
try
{
// Carico le proprietà
GUID := EsempiMS.INDE.GetPropGUID(Puntatore, GUID, ??)
Tipo := EsempiMS.INDE.GetObjType(Puntatore)
//
if EsempiMS.INDE.IsPropReadable(Puntatore, Nome)
{
Nome := EsempiMS.INDE.GetPropString(Puntatore, Nome, ??)
}
//
if EsempiMS.INDE.IsPropReadable(Puntatore, Descrizione)
{
Descrizione := EsempiMS.INDE.GetPropString(Puntatore, Descrizione, ??)
}
//
if EsempiMS.INDE.IsPropReadable(Puntatore, Codice)
{
DBCode := EsempiMS.INDE.GetPropString(Puntatore, Codice, ??)
}
//
CodiceAutomatico := EsempiMS.INDE.TestFlag(Puntatore, Codice automatico)
//
Altro
...
}
catch
{
return False
}
//
this.SetOriginal()
//
return True
}
- L'elenco dei modelli e delle versioni previste per un certo tipo di oggetto si può trovare all'interno della lista valori delle proprietà di quel tipo.
- Se il puntatore passato come parametro ID Oggetto non corrisponde ad alcun oggetto nel progetto aperto, allora verrà generata un'eccezione.
Ultima modifica: 05/09/2008 / Validità: da 7.1.3300