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