--gt; Pegar Dados de Uma Tabela Paradox
Queria Pegar os Dados de uma Tabela de um Campo Número e jogar Num Edit.Text. Até ai tudo Bem. O problema é assim:
Tem no Form Edit1 Edit2 Edit3 Edit4
Edit5 Edit6 Edit7 Edit8
Queria Pegar as 2 Primeiras Linha da Tabela e Jogar nesses Campos Edit,
Sempre as 2 Linha Primeiras.
Qualquer Idéa de Como Fazer Isso, Vai Ser Bem Vinda.
Tem no Form Edit1 Edit2 Edit3 Edit4
Edit5 Edit6 Edit7 Edit8
Queria Pegar as 2 Primeiras Linha da Tabela e Jogar nesses Campos Edit,
Sempre as 2 Linha Primeiras.
Qualquer Idéa de Como Fazer Isso, Vai Ser Bem Vinda.
Ageualves
Curtidas 0
Respostas
Arc
16/04/2003
não entendi , poderia explicar melhor ????
GOSTEI 0
Ageualves
16/04/2003
Ta Vou Tentar...
Num Form Tenho 4 Campos Edit1... Edit4 Logo Abaixo Destes Tenho Mais 4 Edits.
Quero Pegar as 2 Primeiras Linha da Tabela(Ex. Campo1 ~ Campo4)
Por os Valores Desses Campos nos Edit1~Edit4.
Passar Para a 2ª Linha da Tabela Pegar os Valores dos Campos1~Compo4 e por nos Edit que Estão Abaixo do Edit1...Edit4.
Num Form Tenho 4 Campos Edit1... Edit4 Logo Abaixo Destes Tenho Mais 4 Edits.
Quero Pegar as 2 Primeiras Linha da Tabela(Ex. Campo1 ~ Campo4)
Por os Valores Desses Campos nos Edit1~Edit4.
Passar Para a 2ª Linha da Tabela Pegar os Valores dos Campos1~Compo4 e por nos Edit que Estão Abaixo do Edit1...Edit4.
não entendi , poderia explicar melhor ????
GOSTEI 0
Midas
16/04/2003
[quote=´AgeuAlves´]Ta Vou Tentar...
Num Form Tenho 4 Campos Edit1... Edit4 Logo Abaixo Destes Tenho Mais 4 Edits.
Quero Pegar as 2 Primeiras Linha da Tabela(Ex. Campo1 ~ Campo4)
Por os Valores Desses Campos nos Edit1~Edit4.
Passar Para a 2ª Linha da Tabela Pegar os Valores dos Campos1~Compo4 e por nos Edit que Estão Abaixo do Edit1...Edit4.
[quote=´arc´]não entendi , poderia explicar melhor ????
tabela.first;
edit1:=tabela.fieldbyname(´campo1´).asinteger;
edit2:=tabela.fieldbyname(´campo2).asstring;
edit3:= ´ ´ (´campo3). ´ ;
edit4:= ´ ´ (´campo4). ´ ;
tabela.next;
edit5:=tabela.fieldbyname(´campo5´).asinteger;
edit6:=tabela.fieldbyname(´campo6´).asstring;
edit7:= ´ ´ (´campo7´). ´ ;
edit8:= ´ ´ (´campo8´). ´ ;
é por ai ..
:idea:
Num Form Tenho 4 Campos Edit1... Edit4 Logo Abaixo Destes Tenho Mais 4 Edits.
Quero Pegar as 2 Primeiras Linha da Tabela(Ex. Campo1 ~ Campo4)
Por os Valores Desses Campos nos Edit1~Edit4.
Passar Para a 2ª Linha da Tabela Pegar os Valores dos Campos1~Compo4 e por nos Edit que Estão Abaixo do Edit1...Edit4.
[quote=´arc´]não entendi , poderia explicar melhor ????
tabela.first;
edit1:=tabela.fieldbyname(´campo1´).asinteger;
edit2:=tabela.fieldbyname(´campo2).asstring;
edit3:= ´ ´ (´campo3). ´ ;
edit4:= ´ ´ (´campo4). ´ ;
tabela.next;
edit5:=tabela.fieldbyname(´campo5´).asinteger;
edit6:=tabela.fieldbyname(´campo6´).asstring;
edit7:= ´ ´ (´campo7´). ´ ;
edit8:= ´ ´ (´campo8´). ´ ;
é por ai ..
:idea:
GOSTEI 0