Pegando valor de um determinado campo e salvando em uma var

Question

Pessoal,Tenho um formul�rio frm_propriedades aonde dentre v�rios campos, existe um PROPRCOD (que refere-se ao c�digo de uma determinada propriedade); coloquei um button neste formul�rio, que quando eu...

Ksotte · Answer

Algu�m pode me ajudar ???T� desesperado aqui ..rs......

Marcelo_mileris · Answer

Eu n�o entendi direto, mas vc quer passar um valor de um formul�rio para outro? Tipo criar no Form1 carregar uma vari�vel e no Form2 vc usar esta vari�vel � isso?...

Ksotte · Answer

Caro Marcelo,� exatamente isso; s� que a parte da vari�vel, t� tranquilo, sei como funciona; � s� declar�-la como p�blica e boa .. o que eu n�o t� conseguindo � o seguinte:Tenho um formul�rio frm_propriedades que tem os componentes IBDatabase1 + IBTransaction1 + IBDataset1 + Datasource1 e os DBedit est�o todos ligados;Tenho um bot�o neste formul�rio btn_cobran�a, aonde ao clicar, gravaria em uma vari�vel o valor que consta no campo PROPRCOD e chama um outro formul�rio frm_cobran�a, aonde dever� aparecer o endere�o de cobran�a de um determinada propriedade...

M@gnun · Answer

eh isso q vc quer?form2.EditResponsavelPeloCodigo.Text := DBEDIT_PROPRCOD.Text;Form2.Show;se for, t� a� ......

Ksotte · Answer

Caro m@gnun,Por exemplo :Eu posiciono o formul�rio (ligado ao IBDataset1) no registro cujo c�digo da propriedade � 67; quero que quando eu clicar em um bot�o (que chama outro formul�rio), grave este valor �67� em uma vari�vel p�blica (que ser� utilizado no outro formul�rio). O que n�o estou conseguindo � salvar este valor �67� (um exemplo) na vari�vel p�blica.Abra�o...

M@gnun · Answer

Vc pelo menos testou o codigo? Acho q num precisa de var publica pra isso:

Explicando:
�
Eu posiciono o formul�rio (ligado ao IBDataset1) no registro cujo c�digo da propriedade � 67;
�
�
quero que quando eu clicar em um bot�o (que chama outro formul�rio) ...
�

Quando vc clica neste botao, vc tem um codigo +- assim, n�o eh?

Form2.Show; ou Form2.ShowModal; (q no seu caso o modal parece ser mais aconselh�vel)

entao antes de chamar o segundo form, vc faz assim:
Form2.EditResponsavelPeloCodigo.Text := DBEDIT_PROPRCOD.Text;

se vc estiver usando apenas o grid fa�a assim:
Form2.EditResponsavelPeloCodigo.Text := IBDataset1.FieldByName(�PROPRCOD�).AsString;

com uma dessas linhas, (vc escolhe dependendo do seu caso) sempre antes de chamar esse form, vc passa para ele o valor q est� no dataset.
q no seu exemplo vai ser 67, a� eh soh fazer a pesquisa com esse parametro.

entendeu? testa a� agora e depois posta o resultado.

Ksotte · Answer

Caro m@gnun,se vc estiver usando apenas o grid fa�a assim: Form2.EditResponsavelPeloCodigo.Text := IBDataset1.FieldByName(�PROPRCOD�).AsString; Esse exemplo que voc� enviou, usando uma GRID eu consegui fazer em outro formul�rio meu; � exatamente isso que eu quero (por�m agora eu n�o tenho a GRID, tenho que pegar o valor pelo IBDataset), s� que eu salvei o resultado em uma vari�vel p�blica e n�o no form2.EditResponsavelPeloCodigo.Text; porque eu preciso usar o conte�do desta vari�vel em outro formul�rio.Bom, estou no trampo agora; quando chegar em casa vou testar se o primeiro exemplo que voc� passou da certo.Mais uma vez obrigado pela ajuda[]�sKleber...

M@gnun · Answer

�(por�m agora eu n�o tenho a GRID, tenho que pegar o valor pelo IBDataset)�IBDataset1.FieldByName(�PROPRCOD�).AsString; isso pega os dados do dataset, mesmo vc usando grid, dbedits, edis, labels, etc ......

F�rum Pegando valor de um determinado campo e salvando em uma var #321406