COPIAR GRID
Viva,
Queria exibir no meu form principal, um msflexgrid existente num outro form, tal e qual como ele estiver: com os mesmos dados e aspecto.
Dá para fazer isto?
Se não der para fazer uma cópia exacta desse grid, como posso transportar os dados de um para o outro. Este grid tem 3 colunas e um numero indefinido de linhas.
Podem-me ajudar?
Queria exibir no meu form principal, um msflexgrid existente num outro form, tal e qual como ele estiver: com os mesmos dados e aspecto.
Dá para fazer isto?
Se não der para fazer uma cópia exacta desse grid, como posso transportar os dados de um para o outro. Este grid tem 3 colunas e um numero indefinido de linhas.
Podem-me ajudar?
faça a sql q carrega o msfl igual ao do form em questão .......
outra coisa vc pode acessar qlqer objeto de outro form batar usar
Nomedoform.Componente.Propriedade exemplo
Form1.Text1.Text , claro q o form deve estar pelo menos carregado Load , vc teria no caso o valor do campo Text1.text do form1 so outra ideia
Nomedoform.Componente.Propriedade exemplo
Form1.Text1.Text , claro q o form deve estar pelo menos carregado Load , vc teria no caso o valor do campo Text1.text do form1 so outra ideia
Obrigado, mas...não...não é isso!
1º - os dados não são carregados para o grid a partir de uma base de dados;
2º - eu sei que posso aceder a dados de outro form...mas não é isso que pretendo.
O que pretendo está explicito no primeiro post!
Mais alguém?
1º - os dados não são carregados para o grid a partir de uma base de dados;
2º - eu sei que posso aceder a dados de outro form...mas não é isso que pretendo.
O que pretendo está explicito no primeiro post!
Mais alguém?
humm...
não é só usar a propriedade Set?
Set GridDestino=GridOrigem
Set GridDestino=GridOrigem
Obrigado, mas não funciona!!
Alguém pode ajudar?
Alguém pode ajudar?
Alguém?
Bem.... muito obrigado ...!
Já consegui...
Fiz assim:

Já consegui...
Fiz assim:
With formFails.Grid
For I = 1 To .Rows - 1
strVAR = .TextMatrix(I, 0) & Chr(9) & .TextMatrix(I, 1) & Chr(9) & .TextMatrix(I, 2)
GridF.AddItem strVAR
Next
GridF.ColWidth(3) = 0
End With
Tópico encerrado , respostas não são mais permitidas