' gambas module file
Public Struct Fuente
Nombre As String
Tamano As Integer
ColorFrente As Color
ColorFondo As Color
End Struct
Public Struct Titulo
Fuente As Fuente
X As Integer
Y As Integer
Texto As String
PuntoReferencia As String
End Struct
[...]
Public TituloX As Titulo
Public TituloY As Titulo
[...]
Public Sub Dibujar()
[...]
With TituloX
.Texto = "Aumentos"
.Fuente.ColorFrente = &H00FF00
.Fuente.Nombre = "Liberation Mono"
.Fuente.Tamano = h0
End With
[...]
End
Public Struct Fuente
Nombre As String
Tamano As Integer
ColorFrente As Color
ColorFondo As Color
End Struct
Public Struct Titulo
Fuente As Fuente
X As Integer
Y As Integer
Texto As String
PuntoReferencia As String
End Struct
[...]
Public TituloX As Titulo
Public TituloY As Titulo
[...]
Public Sub Dibujar()
[...]
With TituloX
.Texto = "Aumentos"
.Fuente.ColorFrente = &H00FF00
.Fuente.Nombre = "Liberation Mono"
.Fuente.Tamano = h0
End With
[...]
End
Me aparece el error: «Objeto Nulo en GradicoDispersión:89.» —La línea 89 es la de «.Texto = "Aumentos"».—