PageControl....

Delphi

19/08/2003

Gente é o seguinte...

Estou usando em um formulário três tabelas diferente de cadastro,
estou com seguinte dúvidas:
----Ativar cada query qdo eu estiver em determinada página do pagecontrol.
---- inserir editar ....pode ser um ou em cada página eu tenho que ter um botão ???

Se algúem tiver um exemplo, agradeço
Catharina.


Catharina

Catharina

Curtidas 0

Respostas

Nildo

Nildo

19/08/2003

Coloca no OnChange:

If pageControl(Sender).activePage = ´pagina_cadastro´ then
//Ativa Suas Queries

Inserir e editar pode estar na mesma página. A diferenca é que se for editar, tem que carregar os dados nos Edits. Se for incluir tem que deixar em branca. E uma variavel indicando se esta inserindo ou editando. Dae quando clicar em SAlvar voce checa se esta inserindo ou editando, e faz a operação necessaria.

t+


GOSTEI 0
Fred

Fred

19/08/2003

Selecione cada tabsheet do page control e em seu evento OnShow coloque

query1.open;//para cada tabela;

o botao acho melho voce fazer um para cada tabela


GOSTEI 0
Nildo

Nildo

19/08/2003

Mas Fred, porque voce acha melhor uma operacao (entre Inserir e Alterar), em cada pagina?

Vamos criar uma discussao sobre o assunto que é interessante


GOSTEI 0
Fred

Fred

19/08/2003

bom na verdade não necessariamente. Mas se ela colocar apenas um conjunto de botoes (inserir, editar, excluir) ela teria que verificar em cada botão em que página esta para fazer os códigos no dataset correto! acho que assim ficaria melhor. No caso da resposta eu apenas dei uma resposta rápida para não complicar :lol:


GOSTEI 0
Catharina

Catharina

19/08/2003

mas alguém tem algum exemplo pra disponibilizar???
de preferência com um botão inserir pra todas querys.



Valeu, Catharina.


GOSTEI 0
POSTAR