Declaração de Propriedades
PROPERTY [ READ ] Identificador AS Tipo_de_dado
Isto declara uma propriedade de classe.
Se a palavra-chave
READ
é especificada, então a propriedade será de somente-leitura.
Uma vez declarada, a propriedade deve ser implementada : você deverá escrever uma função para ler a propriedade, e, se ela não for de somente-leitura, uma função para escrever a propriedade.
O nome da função de leitura é o nome da propriedade seguida por um underscore e a palavra
Read
. Esta função não recebe argumentos e deve retornar um dado cujo tipo é o mesmo que a propriedade Tipo_de_dado.
O nome da função de escrita é o nome da propriedade seguida por um underscore e a palavra
Write
. Esta função é uma procedure que não retorna dada, e que recebe apenas um argumento cujo tipo é o mesmo que a propriedade Tipo_de_dado.
Examples
PROPERTY Enabled AS Boolean
PROPERTY READ Handle AS Integer
...
PRIVATE $bEnabled AS Boolean
PRIVATE $iHandle AS Integer
' Implementa a propriedade Enabled
FUNCTION Enabled_Read() AS Boolean
RETURN $bEnabled
END
SUB Enabled_Write(bEnabled AS Boolean)
$bEnabled = bEnabled
UpdateEverything
END
' Implementa a propriedade Handle
FUNCTION Handle_Read() AS Integer
RETURN $iHandle
END
Veja também