DB =gt; StringGrid =gt; DB
Preciso carrager dados de 2 tabelas (paradox) em 1 String Grid e após digitação do usuário, gravar os dados em uma terceira...
Exemplo
Tabela 1 carrega todos as linhas (fixa).
Tabela 2 Carrega todas as colunas (fixa).
Tabela 3 receberá os dados digitados nas células (linha,coluna).
Alguem pode me ajudar? A quantidade de registros da tabela 1 é variável e da tabela 2 é fixo.
Obrigado.
Exemplo
Tabela 1 carrega todos as linhas (fixa).
Tabela 2 Carrega todas as colunas (fixa).
Tabela 3 receberá os dados digitados nas células (linha,coluna).
Alguem pode me ajudar? A quantidade de registros da tabela 1 é variável e da tabela 2 é fixo.
Obrigado.
A.maia
Curtidas 0
Respostas
Lucas Silva
17/03/2005
Boa Noite,
Para gravar os dados do String Grid, vc tera que fazer tudo a mão mesmo...
Tipo:
e por ai vai...
Se tiver alguma duvida posta ai...
Para gravar os dados do String Grid, vc tera que fazer tudo a mão mesmo...
Tipo:
Table1.FieldByName(´Nome´).AsString := StringGrid.Cells[0,1];
e por ai vai...
Se tiver alguma duvida posta ai...
GOSTEI 0
A.maia
17/03/2005
A gravação ok, a minha dúvida é mais no carregamento dos dados das tabelas para o StringGrid, ou seja, os dados das tabelas podem variar e o String Grid tem que ser atualizado de acordo com o conteúdo da tabela a cada exibição... Não sei se fui claro...
Mais ou menos como se fosse uma planilha do Excel, que armazena dados em colunas e linhas, onde o resultado de alguns cruzamentos devem ser armazenados, em um outro local.
Agradeço a ajuda.
Mais ou menos como se fosse uma planilha do Excel, que armazena dados em colunas e linhas, onde o resultado de alguns cruzamentos devem ser armazenados, em um outro local.
Agradeço a ajuda.
GOSTEI 0
Lucas Silva
17/03/2005
Blz,
Acho que entendi..
Vamos Supor que o Seu String Grid Seja assim: Codigo - Nome
Acho que entendi..
Vamos Supor que o Seu String Grid Seja assim: Codigo - Nome
For i:= 1 to query1.Recordcount do Begin StringGrid.Cells[i,0] := query1.FieldByName(´Codigo´).AsString; StringGrid.Cells[i,1] := query1.FieldByName(´Nome´).AsString; query1.Next; end;
GOSTEI 0
A.maia
17/03/2005
Na verdade esse era o passo para montar as celulas fixas. De qualquer forma te agradeço.
Valeu!
Valeu!
GOSTEI 0