funzioneScopo
Ritorna True se l'oggetto XMLNode ha ancora attributi da visitare. Questa funzione solitamente si utilizza come condizione di un ciclo While in cui vengono visitati tutti gli attributi del nodo.
Sintassi
boolean AncoraAttributi = False //
//
AncoraAttributi := XMLNode.HasNextAttribute()
//
AncoraAttributi := XMLNode.HasNextAttribute()
Argomenti
Questa funzione non ha argomenti.Valore di ritorno
Ritorna True se l'oggetto XMLNode ha ancora attributi da visitare, False altrimenti.
Esempio di codice
// ****************************************************************************
// Scrive nella tabella IMDB un debug che spiega la struttura del nodo XML
// passato
// ****************************************************************************
public void XMLDocument.ScriviDebugStruttura(
XMLNode Nodo // Nodo di cui esaminare la struttura
)
{
string debug = "" //
//
// Scrivo nel debug un cappello d'intestazione del nodo
debug := debug +c FormatMessage(Struttura nodo |1:, Nodo.GetAttribute(Nome
), ??, ??, ??, ??)
//
// Finché il nodo ha attributi da leggere
while Nodo.HasNextAttribute()
{
string Nome = "" // Nome dell'attributo trovato
string Valore = "" // Valore dell'attributo trovato
//
// Prendo i dati dell'attributi
Nodo.GetNextAttribute(Nome, Valore)
debug := debug +c Space +c Nome +c C: +c Valore +c C;
}
debug := debug +c Acapo
//
// Metto la riga nel debug
XMLString.Log := XMLString.Log +c debug
}
// Scrive nella tabella IMDB un debug che spiega la struttura del nodo XML
// passato
// ****************************************************************************
public void XMLDocument.ScriviDebugStruttura(
XMLNode Nodo // Nodo di cui esaminare la struttura
)
{
string debug = "" //
//
// Scrivo nel debug un cappello d'intestazione del nodo
debug := debug +c FormatMessage(Struttura nodo |1:, Nodo.GetAttribute(Nome
), ??, ??, ??, ??)
//
// Finché il nodo ha attributi da leggere
while Nodo.HasNextAttribute()
{
string Nome = "" // Nome dell'attributo trovato
string Valore = "" // Valore dell'attributo trovato
//
// Prendo i dati dell'attributi
Nodo.GetNextAttribute(Nome, Valore)
debug := debug +c Space +c Nome +c C: +c Valore +c C;
}
debug := debug +c Acapo
//
// Metto la riga nel debug
XMLString.Log := XMLString.Log +c debug
}
- L'elenco degli attributi può essere visitato nuovamente utilizzando la procedura Reset che imposta tutti gli attributi ed i nodi figli come non visitati.
Ultima modifica: 23/03/2021 / Validità: da 6.5.2680