Differenze tra le versioni di "Distruggere gli Oggetti che non posseggono il Metodo .Delete()"

Versione attuale delle 12:38, 20 giu 2024

In Gambas taluni Oggetti, specialmente quelli grafici, posseggono il Metodo ".Delete()" per essere distrutti.

Per poter distruggere, invece, quegli Oggetti che non dispongono del Metodo .Delete() o comunque di altro tipo, è sufficiente assegnare alla variabile del tipo di Oggetto specifico il valore Null.

Mostriamo un esempio pratico utilizzando un Oggetto "Struttura" e un Oggetto "Image":

Public Struct STRUTTURA
  b As Byte
  c As Short
End Struct


Public Sub Main()

 Dim im As Image
 Dim sra As STRUTTURA
 
' Crea un Oggetto "Image":
 im = New Image(100, 100, Color.Red, Image.Standard)
' Verifica l'esistenza dell'Oggetto "Image":
 Print im
' Distrugge l'Oggetto di tipo "Image":
 im = Null
' Verifica:
 Print im

' Crea un Oggetto "Structure":
 sra = New STRUTTURA
' Verifica l'esistenza dell'Oggetto "Structure":
 Print sra
' Distrugge l'Oggetto del tipo della Struttura:
 sra = Null
' Verifica:
 Print sra
 Print sra.b

End