Comunidad Gambas-es
Otra forma de declarar una propiedad - Versión para impresión

+- Comunidad Gambas-es (https://gambas-es.org)
+-- Foro: Gambas (https://gambas-es.org/forum-3.html)
+--- Foro: General (https://gambas-es.org/forum-4.html)
+--- Tema: Otra forma de declarar una propiedad (/thread-983.html)



Otra forma de declarar una propiedad - Shell - 29-07-2022

Buenas!.

Repasando un tema que se comentó en su día sobre las ventajas de la programación orientada a objetos frente a la procedimental.
Y viendo de nuevo el vídeo de Julio, en el código hace referencia a otra posibilidad de declarar una propiedad.
Haciendo referencia a la ayuda de gambas.

A ver que os parece la forma de declarar la propiedad.

La propiedad base se declara como hemos estado haciendo hasta una versión de Gambas.
Y la propiedad altura se declara usando una nueva forma. No tiene código de getter y setter.
No se crean automáticamente.

Código:
Property base As Integer
Private hbase As Integer

Property altura As Integer Use haltura

Public Sub _new($ialtura As Integer, $ibase As Integer)
 
  haltura = $ialtura
  hbase = $ibase
 
End

Public Function Calculo() As Float
 
  Return (Me.base * Me.altura) / 2
 
End

Private Function base_Read() As Integer
 
  Return hbase  
 
End

Private Sub base_Write(Value As Integer)
 
  hbase = Value
 
End

Ademas si fuese necesario se puede modificar el código del getter y el setter, pero ya sería manualmente.
Habría que crear todo el código.

Se puede apreciar que la reducción de código es notable. 
Como todo cuesta acostumbrarse a usarla por primera vez y sobre todo recordarlo.

Property Declaration

Saludos