Fórum Pegar Codigo de Dbgrid e Jogar em campo Código #332105
26/10/2006
0
Galera to usando Delphi 07 e Acess com ADO.
Tenho uma tela de cadastro
CodLinhadeProdutos
Produto
valor
E tenho um Cadastro de Linhas de Produtos
CodLinha
NomeLinha
Criei um form que quando aperto F2 ele abre com um dbgrid listando a lista do cadastro de linhas de produtos.
Quero fazer o seguinte na hora de cadastrar o produto, na parte
CodLinhadeProdutos eu paerto F2 dai a tela abre eu clico em cima do codigo o form fecha e o codigo clicado vai para o campo CodLinhadePordutos
Tenho uma tela de cadastro
CodLinhadeProdutos
Produto
valor
E tenho um Cadastro de Linhas de Produtos
CodLinha
NomeLinha
Criei um form que quando aperto F2 ele abre com um dbgrid listando a lista do cadastro de linhas de produtos.
Quero fazer o seguinte na hora de cadastrar o produto, na parte
CodLinhadeProdutos eu paerto F2 dai a tela abre eu clico em cima do codigo o form fecha e o codigo clicado vai para o campo CodLinhadePordutos
Digital_man
Curtir tópico
+ 0
Responder
Posts
30/10/2006
Queiroz
Olá... saudações. Tente o seguinte:
ao entrar no Form que tem o DBGRid
cod := (frmLivros.DBGrid1.Columns.Items[0].Field.Value);
onde, no caso .Items[0] é a coluna que tem o valor do código.
No form anterior você precisa declarar a variavel cod em
var
frmCadLivros: TfrmCadLivros;
cod: integer;
implementation
.
.
.
Espero ter ajudado.
Abraços.
Queiroz
ao entrar no Form que tem o DBGRid
cod := (frmLivros.DBGrid1.Columns.Items[0].Field.Value);
onde, no caso .Items[0] é a coluna que tem o valor do código.
No form anterior você precisa declarar a variavel cod em
var
frmCadLivros: TfrmCadLivros;
cod: integer;
implementation
.
.
.
Espero ter ajudado.
Abraços.
Queiroz
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)