comp • gb • object[]

Object[] (gb)

Essa classe implementa uma matriz dinâmica de referências Object.

Esta classe herda Array.
Esta classe é criável.
Esta classe funciona como um array ler / escrever.
Esta classe é enumerável com FOR EACH palavras chaves.

Propriedades

Métodos
Retorna uma classe virtual que representa os limites de cada dimensão da matriz.
Bounds  
Retorna o número de elementos da matriz.
Count  
Retorna um ponteiro para os dados do array.
Data  
Retorna o número de dimensões de um array.
Dim  
First   Last  
Retorna o número de elementos na matriz.
Length  
Retorna o maior índice do array.
Max  
ReadOnly  
Retorna o tipo de dados que pode ser armazenado na matriz.
Type  
Insere um elemento na matriz na posição especificada por Index.
Add  
Remove a matriz.
Clear  
Returns a deep copy of the array.
Copy  
Um sinônimo para Extract.
Delete  
Retorna TRUE se o valor especificado existe na matriz.
Exist  
Verificar se um objeto específico está armazenados na matriz.
ExistByRef  
Remove um ou mais elementos da matriz, e o retorna.
Extract  
Preenche a matriz com o valor especificado.
Fill  
Retorna a posição da primeira ocorrência de Value procurado na matriz.
Find  
Retornar à posição da primeira ocorrência de um objeto específico da matriz.
FindByRef  
Insira um array na array atual no local especificado por Pos.
Insert  
Remove o último elemento do array e o retorna.
Pop  
Adiciona um elemento na extremidade da matriz.
Push  
Remove um ou mais elementos do array.
Remove  
Redimensiona o array.
Resize  
Inverter a ordem dos elementos do array, e retorna um array.
Reverse  
Shuffle  
Classifica a matriz.
Sort  
SortUsing  

Examplo

Este exemplo mostra como criar uma matriz de TextBox

PUBLIC aobjDisplay AS Object[9, 9]

PUBLIC SUB Form_Open()
DIM r AS Integer
DIM c AS Integer
DIM objTextBox AS TextBox

FOR r = 0 TO 8
    FOR c = 0 TO 8
      objTextBox = NEW TextBox(ME) ' criar o próxima dos 9 * 9 TextBoxes
      objTextBox.Y = 9 + r * 40
      objTextBox.X = 9 + c * 40
      objTextBox.Width = 32
      objTextBox.Height = 32
      aobjDisplay[r, c] = objTextBox
    NEXT '    c
  NEXT '      r
ENDIF