Controlando o GridView.
O controle do
GridView, funciona como outros controles da caixa de ferramentas, e
herda seus atributos a partir da Classe de Controle, o GridView
implementa um controle que exibe os dados dentro do GridView. Essa
classe é criada, O padrão da Syntaxe da linguagem Gambas para o
GridView é:
DIM hGridView AS
GridView
hGridView = NEW
GridView ( Parent AS Container )
O código acima
criará um novo GridView,
Esta Classe age
como um array somente de leitura.
Para ter acesso aos
dados de uma célula desejada e preciso declarar da seguinte
maneira:
Declarar uma
GridCell variável que poderá ser obtida GridView array (the
GridCell is a virtual class): Para isso decflaramos duas variáveis:
uma para o GridView e outra para o GridCell.
DIM hGridView AS
GridView
DIM hGridCell AS
.GridCell
Agora referimos a
célula indexada por dois parâmetros inteiros.
hGridCell =
hGridView [ Row AS Integer, Column AS Integer ]
Primeiro declaramos
o GriudView depois a célula, e então obtemos o valor da célula
desejada, indexando com indexes da linha e coluna respectivamente.
Criaremos
um exemplo:
Nese caso vamos
criar um GridView com quatro linhas e três colunas, e vamos popular
as trẽs primeiras linhas com texto e a última linha com figura
Vamos acessar a
ultima linha com texto para demonstrar com o acesso aos dados
funciona, nosso programa terá três botões Quit, Clear e Reset
O botão quit irá
fechar o programa.
O botão Clear
invocara o método GridView.Clear para limpar o conteúdo da Grid
O botão reset irá
recompor o Grig com os dados originais
Agora vamos começas
a digiar o código. Dê um duplo click no form.
' Gambas class file
PUBLIC SUB
Form_Open()
Form1.Caption = "
GridView Example "
END
Quando o programa
começa se existir um construtor ele será executado primeiro.
Nosso constutor irá
carregar nossos três ícones e popular o grid.
Primeiro e preciso
declarar a três variáveis globais para as figuras como segue:
PUBLIC SUB _new()
DIM hPic1 AS
Picture
DIM hPic2 AS
Picture
DIM hPic3 AS
Picture
Agora vamos
instanciar nossa figura como um objeto.
hPic1 = NEW
Picture
hPic2 = NEW
Picture
hPic3 = NEW
Picture
Agora carregando as
figuras para os objetos.
hPic1.Load("GridPic.png")
hPic2.Load("GridPic2.png")
hPic3.Load("GridPic1.png")
Agora podemos
definir as configurações do grid, numero de linhas numero de
colunas e seu tamanho;
Definindo numero de
linhas e colunas respectivamente:
GridView1.Columns.Count = 3
GridView1.Rows.Count = 4
Para configurar o
tamanho das celulas precisamos definir duas coisas a largura das
colunas e a altura das linhas, como segue:
GridView1.Columns.Width = 72
GridView1.Rows.Height = 36
Tudo declarado
instanciado, carregado , definido o numero de linhas e colunas e
suas dimensões
Agora vamos carregar
cada celula com um valor:
GridView1[0,0].Text = "0,10"
GridView1[0,1].Text = "0,11"
GridView1[0,2].Text = "0,25"
GridView1[1,0].Text = "1,90"
GridView1[1,1].Text = "1,109"
GridView1[1,2].Text = "2.99"
Também podemos
fazer a carga alinhando o conteúdo dentro das células, como
segue.
GridView1[2,0].Alignment = Align.Center
GridView1[2,1].Alignment = Align.BottomLeft
GridView1[2,2].Alignment = Align.TopRight
Primeiro definimos o
alinhamento e agora podemos atribuir o conteúdo de cada célula.
GridView1[2,0].Text = "2,0"
GridView1[2,1].Text = "2,1"
GridView1[2,2].Text = "1,2"
Finamente podemos
carregar as imagens para as céulas do grida
GridView1[3,0].Picture = hPic1
GridView1[3,1].Picture = hPic2
GridView1[3,2].Picture = hPic3
END
Vamos acrescentar
três botões de Controle, Limpar , Ressetar Fechar
PUBLIC SUB
Button1_Click()
ME.Close
END
PUBLIC SUB
Button2_Click()
GridView1.Clear
END
_new
END
Pronto agora e
compilar e rodar o programa para ver como funciona.
VEJA O VÍDEO ABAIXO.
VEJA O VÍDEO ABAIXO.
A expressão:
ResponderExcluirDIM hGridCell AS .GridCell
já não funcionou logo após:
DIM hGridView AS GridView
Acusando:
Bad row index. O que está errado?