Pegar valor em um DBGrid
Olá Pessoal,
Tenho um form de cadastro de presenças, existe um campo que é o número de matríclo do aluno, porém quando eu não sei tenho que pesquisar pelo nome, então cliclo no botão de pesquisa e abre um outro form, este contento um edit para digitar o nome e um dbgrid, onde aparece duas colunas, uma para o número de matricula e outra para no nome, gostaria de saber como faço para que na hora em que o usuário der dois clicks na linha da dbgrid faça com que pegue o valor do campo que está o número de matricula, feche o form e leve este valor para o campo de matrícula do outro form, onde eu cadastro as presenças.
Valeu.
Paulo
Tenho um form de cadastro de presenças, existe um campo que é o número de matríclo do aluno, porém quando eu não sei tenho que pesquisar pelo nome, então cliclo no botão de pesquisa e abre um outro form, este contento um edit para digitar o nome e um dbgrid, onde aparece duas colunas, uma para o número de matricula e outra para no nome, gostaria de saber como faço para que na hora em que o usuário der dois clicks na linha da dbgrid faça com que pegue o valor do campo que está o número de matricula, feche o form e leve este valor para o campo de matrícula do outro form, onde eu cadastro as presenças.
Valeu.
Paulo
Oadventista
Curtidas 0
Respostas
Paulo_amorim
26/01/2004
Olá
vc pode fazer de duas maneiras:
uma eh gravar em uma variavel, atraves do comando
Numero := Grid.FieldByName(´matricula´).AsInteger
outra eh vc mandar direto
frmMatricula.Edit1.Text := Grid.FieldByName(´matricula´).AsString;
frmMatricula.Show;
Espero que tennha ajudado
Até+
vc pode fazer de duas maneiras:
uma eh gravar em uma variavel, atraves do comando
Numero := Grid.FieldByName(´matricula´).AsInteger
outra eh vc mandar direto
frmMatricula.Edit1.Text := Grid.FieldByName(´matricula´).AsString;
frmMatricula.Show;
Espero que tennha ajudado
Até+
GOSTEI 0
Osocram
26/01/2004
no botaum p chamar o consulta faz isso...
Var
wsql:String;
i:integer;
Begin
Try
FormConsulta := tformconsulta.create(self);
With (FormConsulta.QueryCon) Do Begin
FormConsulta.ShowModal;
End;
Finally
EdtCodMatricula.text := QueryCon.FieldbyName(´Cod_Matricula´).asString;
FormConsulta.free;
End;
acho q eh so isso... se naum der certo me avise.
Var
wsql:String;
i:integer;
Begin
Try
FormConsulta := tformconsulta.create(self);
With (FormConsulta.QueryCon) Do Begin
FormConsulta.ShowModal;
End;
Finally
EdtCodMatricula.text := QueryCon.FieldbyName(´Cod_Matricula´).asString;
FormConsulta.free;
End;
acho q eh so isso... se naum der certo me avise.
GOSTEI 0
Oadventista
26/01/2004
Caro Paulo,
Esta propriedade FildByName não tem no meu DBGrid.
Esta propriedade FildByName não tem no meu DBGrid.
GOSTEI 0
Paulo_amorim
26/01/2004
Olá
me desculpe, FIELDbyName...
me desculpe, FIELDbyName...
GOSTEI 0
Oadventista
26/01/2004
Paulo, não existe, ou eu estou fazendo algo de errado
GOSTEI 0
Osocram
26/01/2004
O DBgrid esta ligado a query....
dae vc pega o resultado da query do form consulta pelo FieldbyName e passa p seu edit do cadastro
dae vc pega o resultado da query do form consulta pelo FieldbyName e passa p seu edit do cadastro
GOSTEI 0
Oadventista
26/01/2004
e no caso do usuário digitar somente o primeiro nome e aparecer no DBGrid vários registros, como faço para pegar somente o que eu selecionar.
GOSTEI 0
Osocram
26/01/2004
O DBGrid eh um componente p BD... entaum vc pod perceber q no lado esq do DBGrid... tem um setinha preta... isso faz c q o registro q ele esta apontando eh o resultado q a query vai t trazer.
GOSTEI 0