Shell 03-03-2024, 00:46
Buenas!.
En el lenguaje Java (supongo que este también lo puede hacer de distintas formas). Los atributos, sus propiedades
pueden ser privadas, ocultas.
Lo curioso de Java es que para esto, cuando hablamos de propiedades, ejemplo, color, edad, (si fueran propiedades) usa el
comando "this", en Gambas usamos "Me" como referencia. Ahora bien, una propiedad creada en Gambas es
"pública". Cuando declaramos una instancia de esa clase o la usamos, "siempre" estamos viendo sus propiedades.
A modo de ejemplo os mostraré algo creado en Gambas. La idea es que hay que "ocultar" sus propiedades o lo que quieran
que solo este al alcance lo que interesa. (No todo).
He creado una clase Alumno y una clase Alumno2.
Alumno:
Y ahora parecida, Alumno2
En este último caso, no se puede cambiar la propiedad edad o nombre desde su instancia, (no lo vemos), solo podemos obtenerlo.
Y si queremos ya cambiarlo, pues se crearía un método para ello. O nos olvidaríamos de otros métodos. como getedad o setedad.
En la clase principal he usado esto:
¿ Qué opinan ustedes de la visibilidad de las propiedades o métodos en la programación orientada objeto en "Gambas" ?
Normalmente no uso formas como el ocultar las propiedades y luego mediante un método acceder a esta. Suelo declarar
propiedades. Y ya saben que estas son públicas.
Ah, en Python no existe algo como private o públic, son públicas, todas. En cambio en Java si y en C++ seguramente si.
Otra forma, declarar la propiedad como solo lectura.
Aunque es de solo lectura, es visible. Pero no puedes cambiarla, es casi como una constante, como un variable de clase ( no de instancia ).
Que estas pueden ser públicas y ojo con eso. Imaginar que a la hora de crear una clase, siempre se crea con valores por defecto.
coche , cuatro ruedas y así. Y ahora viene alguien y dice, pues no, ahora voy y le cambio la propiedad de ruedas y digo que el coche
cuando ya se ha creado la instancia, que va a tener seis ruedas. ( Pero ojo, eso solo cambia en la instancia, no la clase ).
![[Imagen: 2KKJsCD.png]](https://i.imgur.com/2KKJsCD.png)
Saludos
En el lenguaje Java (supongo que este también lo puede hacer de distintas formas). Los atributos, sus propiedades
pueden ser privadas, ocultas.
Lo curioso de Java es que para esto, cuando hablamos de propiedades, ejemplo, color, edad, (si fueran propiedades) usa el
comando "this", en Gambas usamos "Me" como referencia. Ahora bien, una propiedad creada en Gambas es
"pública". Cuando declaramos una instancia de esa clase o la usamos, "siempre" estamos viendo sus propiedades.
A modo de ejemplo os mostraré algo creado en Gambas. La idea es que hay que "ocultar" sus propiedades o lo que quieran
que solo este al alcance lo que interesa. (No todo).
He creado una clase Alumno y una clase Alumno2.
Alumno:
Código:
Property nombre As String Use $nombre
Property edad As Integer Use $edad
Public Sub _new(nom As String, ed As Integer)
Me.nombre = nom
Me.edad = ed
EndY ahora parecida, Alumno2
Código:
Private nombre As String
Private edad As Integer
Public Sub _new(nom As String, ed As Integer)
nombre = nom
edad = ed
End
Public Function getnombre() As String
Return nombre
End
Public Sub getedad() As Integer
Return edad
EndEn este último caso, no se puede cambiar la propiedad edad o nombre desde su instancia, (no lo vemos), solo podemos obtenerlo.
Y si queremos ya cambiarlo, pues se crearía un método para ello. O nos olvidaríamos de otros métodos. como getedad o setedad.
En la clase principal he usado esto:
Código:
Public Sub Form_Open()
Ejemplo1()
Ejemplo2()
End
Public Sub MostrarAlumnos(lista As Object)
If lista Is Array Then
If Object.Type(lista[0]) = "Alumno" Then
For Each al1 As Alumno In lista
Print "Nombre: " & al1.nombre & " edad: " & al1.edad
Next
Else If Object.Type(lista[0]) = "Alumno2" Then
For Each al2 As Alumno2 In lista
Print "Nombre: " & al2.getnombre() & " edad: " & al2.getedad()
Next
Endif
Else
Print "Esto no es un array"
Endif
Print
End
Public Sub Ejemplo1()
Dim aalumnos As Alumno[]
Dim al As Alumno
aalumnos = New Alumno[]
al = New Alumno("Julio", 15)
aalumnos.Add(al)
al = New Alumno("Maria", 21)
aalumnos.Add(al)
al = New Alumno("Roman", 12)
aalumnos.Add(al)
MostrarAlumnos(aalumnos)
End
Public Sub Ejemplo2()
Dim aalumnos2 As Alumno2[]
Dim al As Alumno2
aalumnos2 = New Alumno2[]
al = New Alumno2("Julio", 15)
aalumnos2.Add(al)
al = New Alumno2("Maria", 21)
aalumnos2.Add(al)
al = New Alumno2("Roman", 12)
aalumnos2.Add(al)
MostrarAlumnos(aalumnos2)
End¿ Qué opinan ustedes de la visibilidad de las propiedades o métodos en la programación orientada objeto en "Gambas" ?
Normalmente no uso formas como el ocultar las propiedades y luego mediante un método acceder a esta. Suelo declarar
propiedades. Y ya saben que estas son públicas.
Ah, en Python no existe algo como private o públic, son públicas, todas. En cambio en Java si y en C++ seguramente si.
Otra forma, declarar la propiedad como solo lectura.
Código:
Property Read nombre As String Use $nombre
Property Read edad As Integer Use $edad
Public Sub _new(nom As String, ed As Integer)
$nombre = nom
$edad = ed
End
Private Function nombre_Read() As String
Return $nombre
EndAunque es de solo lectura, es visible. Pero no puedes cambiarla, es casi como una constante, como un variable de clase ( no de instancia ).
Que estas pueden ser públicas y ojo con eso. Imaginar que a la hora de crear una clase, siempre se crea con valores por defecto.
coche , cuatro ruedas y así. Y ahora viene alguien y dice, pues no, ahora voy y le cambio la propiedad de ruedas y digo que el coche
cuando ya se ha creado la instancia, que va a tener seis ruedas. ( Pero ojo, eso solo cambia en la instancia, no la clase ).
Saludos
Archivos adjuntos
jorge trejos 29-02-2024, 17:17
Hola gente
He avanzado un programa que he tenido dificultades de hacer, sin embargo ahora me esta dando un error de conexión a base de datos que rotundamente no entiendo. Realmente no se que pasa... les adjunto el programa en zip les agradecería a quien me explique por qué pasa, pues ya no logro entender ...a ojos de un profesional debo ser un desorden... agradecería un consejo para mejorar el punto.
Adjunto el link de mediafire ya que dice que el zip es muy pesado.
https://www.mediafire.com/file/rj83kiy16...2.zip/file
Saludos y gracias de antemano
He avanzado un programa que he tenido dificultades de hacer, sin embargo ahora me esta dando un error de conexión a base de datos que rotundamente no entiendo. Realmente no se que pasa... les adjunto el programa en zip les agradecería a quien me explique por qué pasa, pues ya no logro entender ...a ojos de un profesional debo ser un desorden... agradecería un consejo para mejorar el punto.
Adjunto el link de mediafire ya que dice que el zip es muy pesado.
https://www.mediafire.com/file/rj83kiy16...2.zip/file
Saludos y gracias de antemano
alessandri 29-02-2024, 03:46
Saludos amigos.
Les dejo aquí un ejemplo de un proyecto con WebForm usando Mysql y GridView.
he adjutado la DB.
el usuario de la plicacion es juan y el pass 12345678, lo puden verificar en la tabla de usuarios.
Saludos.
Les dejo aquí un ejemplo de un proyecto con WebForm usando Mysql y GridView.
he adjutado la DB.
el usuario de la plicacion es juan y el pass 12345678, lo puden verificar en la tabla de usuarios.
Saludos.
Archivos adjuntos
Bienvenido, Invitado
Últimos temas
Publicidad
Foro: Sobre gambas-es.orgÚltimo mensaje por: Shordi, 18-06-2025, 07:35
Respuestas: 5 - Vistas: 126
Web con gambas, a ver si ...
Foro: WebApp/WebFormsÚltimo mensaje por: jackrobot, 16-06-2025, 17:11
Respuestas: 40 - Vistas: 31,677
Un sistema de ayudas cont...
Foro: VideotutorialesÚltimo mensaje por: Shordi, 30-05-2025, 13:22
Respuestas: 0 - Vistas: 169
Crear una aplicación para...
Foro: Bases de DatosÚltimo mensaje por: Shell, 29-05-2025, 20:11
Respuestas: 11 - Vistas: 1,188
Paso de parámetros a una ...
Foro: GeneralÚltimo mensaje por: guizans, 29-05-2025, 19:27
Respuestas: 9 - Vistas: 732