RES: [delphi-br] Consulta SQL - Access 2003 e Delphi
Ricardo Você irá utilizar a opção NOT EXIST na cláusula... Select * from Tabela1 where nota_fiscal not exists (select * from tabela2) De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Ricardo Ravelli Enviada em: quarta-feira, 1 de abril de 2009 23:41 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Consulta SQL - Access 2003 e Delphi Boa noite, Preciso de uma ajuda. Tenho duas tabelas no access 2003 e preciso fazer uma consulta no qual ele traz os registros que não foram encontrados na Tabela2. Ex: Tabela 1 (aproximadamente 2000 registros) Tabela 2 (aproximadamente 80 registros) O campo em comum nas duas é a nota_fiscal (que tem registros duplicados na duas tabelas). Resumindo, preciso verificar quais dos 2000 registros da Tabela1 não está dentro da Tabela2 e retornar esse valor. Tenho um sistema em delphi que utiliza o access e preciso cruzar essas informações. Fiz alguns testes a não consegui nenhum resultado correto. Agradesço desde já. Obrigado. Att. Ricardo Ravelli [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 3981 (20090401) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Consulta sql mais de um campos
Tente isso:
strSQL, sendo strSQL uma string com o seu comando sem ordem.
Em sequida, no evento click do dbgridTitleClick, vc abre um outro
comando sql da seguinte forma.
{ cabeçalho da procedure}
var
strSQL : string;
qry : TSQLQuery;
begin
qry := TSQLQuery.create(nil);
strSQL := select * from cliente where dp1 like
{ o resto do seu
código}
try
try
qry.SQLConnection:= { sua conexao de banco de dados }
qry.close;
qry.sql.clear;
qry.sql.add(strSQL);
qry.sql.add(Order by + column.fieldname);
qry.open;
finally
qry.free;
qry:= nil;
end;
except
on Exc: Exception do raiseMessage(Erro, Exc.getMessage);
end;
end;
{ ** Não testei, por isso não posso me certificar 100% de que está
certo, sobretudo no uso dos comando try... except que eu ainda estou
estudando **}
No banco tente usar sql preparadas. Se for possível.. Da maneira que vc
está usando, ele vai criar o mesmo plano de consulta todas as vezes que
essa rotina for executada.
Espero ter ajudado.
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Ruth
Enviada em: quinta-feira, 6 de setembro de 2007 08:10
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Consulta sql mais de um campos
Vc precisa colocar todos os campos da tabela em uma unica coluna?
e depois dar order by nessa coluna unica?
- Original Message -
From: Hudson
To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br
os.com.br
Sent: Thursday, September 06, 2007 12:15 AM
Subject: [delphi-br] Consulta sql mais de um campos
Ola gente,
estou com uma duvida, e gostaria de compartilhar aqui na lista...
tenho que fazer uma consulta sql like dados % em mais de uma campo
exemplo:
select * from cliente where dp1 like '+ Edit1.Text +'% or dp2 like '+
Edit1.Text +'% or dp3 like '+ Edit1.Text +'% or dp4 like '+
Edit1.Text +'% or dp5 like '+ Edit1.Text +'% or dp6 like '+
Edit1.Text +'%'
o problema e que apos feito isso tenho que jogar em uma coluna no dbgrid
e dar order by..
alguem ja teve essa duvida, poois não tenho como separar estes campos,
já tem mais ou mesno 30,000 registro na tabela...
Atenciosamente Hudson Dias
www.alcancedigital.com.br
MSN: [EMAIL PROTECTED] mailto:hudson_bh%40hotmail.com com
Skype: hudson_bh
Tele: (31)3434-6304
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Consulta sql mais de um campos
Não entendi muito bem a sua dúvida mas poderia tentar algo assim:
select * from cliente where dp1 like '+ Edit1.Text +'%
union all
select * from cliente where dp2 like
'+ Edit1.Text +'%
union all
select * from cliente where dp3 like '+ Edit1.Text +'%
union all
select * from cliente where dp4 like '+
Edit1.Text +'%
union all
select * from cliente where dp5 like '+ Edit1.Text +'%
union all
select * from cliente where dp6 like '+
Edit1.Text +'%'
Agora só uma dica evite usar o *, coloque os nomes dos campos que vc quer que
retorne.
GYNCOWBOY
André Luis da Silveira
- Mensagem original
De: Hudson [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 6 de Setembro de 2007 0:15:42
Assunto: [delphi-br] Consulta sql mais de um campos
Ola gente,
estou com uma duvida, e gostaria de compartilhar aqui na lista...
tenho que fazer uma consulta sql like dados % em mais de uma campo exemplo:
select * from cliente where dp1 like '+ Edit1.Text +'% or dp2 like '+
Edit1.Text +'% or dp3 like '+ Edit1.Text +'% or dp4 like '+ Edit1.Text +'%
or dp5 like '+ Edit1.Text +'% or dp6 like '+ Edit1.Text +'%'
o problema e que apos feito isso tenho que jogar em uma coluna no dbgrid e dar
order by..
alguem ja teve essa duvida, poois não tenho como separar estes campos, já tem
mais ou mesno 30,000 registro na tabela...
Atenciosamente Hudson Dias
www.alcancedigital. com.br
MSN: [EMAIL PROTECTED] com
Skype: hudson_bh
Tele: (31)3434-6304
[As partes desta mensagem que não continham texto foram removidas]
!--
#ygrp-mkp{
border:1px solid #d8d8d8;font-family:Arial;margin:14px 0px;padding:0px 14px;}
#ygrp-mkp hr{
border:1px solid #d8d8d8;}
#ygrp-mkp #hd{
color:#628c2a;font-size:85%;font-weight:bold;line-height:122%;margin:10px 0px;}
#ygrp-mkp #ads{
margin-bottom:10px;}
#ygrp-mkp .ad{
padding:0 0;}
#ygrp-mkp .ad a{
color:#ff;text-decoration:none;}
--
!--
#ygrp-sponsor #ygrp-lc{
font-family:Arial;}
#ygrp-sponsor #ygrp-lc #hd{
margin:10px 0px;font-weight:bold;font-size:78%;line-height:122%;}
#ygrp-sponsor #ygrp-lc .ad{
margin-bottom:10px;padding:0 0;}
--
!--
#ygrp-mlmsg {font-size:13px;font-family:arial, helvetica, clean, sans-serif;}
#ygrp-mlmsg table {font-size:inherit;font:100%;}
#ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean,
sans-serif;}
#ygrp-mlmsg pre, code {font:115% monospace;}
#ygrp-mlmsg * {line-height:1.22em;}
#ygrp-text{
font-family:Georgia;
}
#ygrp-text p{
margin:0 0 1em 0;}
#ygrp-tpmsgs{
font-family:Arial;
clear:both;}
#ygrp-vitnav{
padding-top:10px;font-family:Verdana;font-size:77%;margin:0;}
#ygrp-vitnav a{
padding:0 1px;}
#ygrp-actbar{
clear:both;margin:25px 0;white-space:nowrap;color:#666;text-align:right;}
#ygrp-actbar .left{
float:left;white-space:nowrap;}
.bld{font-weight:bold;}
#ygrp-grft{
font-family:Verdana;font-size:77%;padding:15px 0;}
#ygrp-ft{
font-family:verdana;font-size:77%;border-top:1px solid #666;
padding:5px 0;
}
#ygrp-mlmsg #logo{
padding-bottom:10px;}
#ygrp-vital{
background-color:#e0ecee;margin-bottom:20px;padding:2px 0 8px 8px;}
#ygrp-vital #vithd{
font-size:77%;font-family:Verdana;font-weight:bold;color:#333;text-transform:uppercase;}
#ygrp-vital ul{
padding:0;margin:2px 0;}
#ygrp-vital ul li{
list-style-type:none;clear:both;border:1px solid #e0ecee;
}
#ygrp-vital ul li .ct{
font-weight:bold;color:#ff7900;float:right;width:2em;text-align:right;padding-right:.5em;}
#ygrp-vital ul li .cat{
font-weight:bold;}
#ygrp-vital a{
text-decoration:none;}
#ygrp-vital a:hover{
text-decoration:underline;}
#ygrp-sponsor #hd{
color:#999;font-size:77%;}
#ygrp-sponsor #ov{
padding:6px 13px;background-color:#e0ecee;margin-bottom:20px;}
#ygrp-sponsor #ov ul{
padding:0 0 0 8px;margin:0;}
#ygrp-sponsor #ov li{
list-style-type:square;padding:6px 0;font-size:77%;}
#ygrp-sponsor #ov li a{
text-decoration:none;font-size:130%;}
#ygrp-sponsor #nc{
background-color:#eee;margin-bottom:20px;padding:0 8px;}
#ygrp-sponsor .ad{
padding:8px 0;}
#ygrp-sponsor .ad #hd1{
font-family:Arial;font-weight:bold;color:#628c2a;font-size:100%;line-height:122%;}
#ygrp-sponsor .ad a{
text-decoration:none;}
#ygrp-sponsor .ad a:hover{
text-decoration:underline;}
#ygrp-sponsor .ad p{
margin:0;}
o{font-size:0;}
.MsoNormal{
margin:0 0 0 0;}
#ygrp-text tt{
font-size:120%;}
blockquote{margin:0 0 0 4px;}
.replbq{margin:4;}
--
Flickr agora em português. Você clica, todo mundo vê.
http://www.flickr.com.br/
[As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Consulta SQL no DBEXPRESS
Banco.sdsCliente. Active := False;
Banco.sdsCliente. CommandType := ctQuery;
Banco.sdsCliente. CommandText := '';
Banco.sdsCliente. CommandText := 'select * from CLIENTE where
NOME_CLIENTE like :Valor;
Banco.sdsCliente. ParamByName( 'valor'). AsString :=
quotedstr(Input+'%');
Banco.sdsCliente. Active := True;
Banco.Cliente. Refresh;
Banco.DataCliente. DataSet.Open;
GYNCOWBOY
André Luis da Silveira
- Mensagem original
De: Hudson [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 26 de Julho de 2007 22:45:15
Assunto: Re: [delphi-br] Consulta SQL no DBEXPRESS
como ficari a buscapois esta dando erro
quando busco o campo id_cliente da certo mesmo colocando Asstring como
parametro, mas quando mudo para nome_cliente da um erro assim:
Dynamic SQL Error
SQL Error code = - 206
Column unknown p%
at line 1, column 42
Column does not belong to referenced table Error Code: 249
o SQL que estou fazendo:
Banco.sdsCliente. Active := False;
Banco.sdsCliente. CommandType := ctQuery;
Banco.sdsCliente. CommandText := '';
Banco.sdsCliente. CommandText := 'select * from CLIENTE where
NOME_CLIENTE like :valor%';
Banco.sdsCliente. ParamByName( 'valor'). AsString := Input;
Banco.sdsCliente. Active := True;
Banco.Cliente. Refresh;
Banco.DataCliente. DataSet.Open;
sem aspas no parametro ele da o erro assim: 'select * from CLIENTE where
NOME_CLIENTE like :valor%';
fala que o parametro não existe
- Original Message -
From: Anderson Marques Ferraz
To: [EMAIL PROTECTED] os.com.br
Sent: Wednesday, July 25, 2007 9:21 AM
Subject: Re: [delphi-br] Consulta SQL no DBEXPRESS
Ela retorna uma string entre aspas (as aspas estão dentro da string).
2007/7/24, Hudson hudson_dias@ yahoo.com. br:
como seria esta função quotedstr??? ?
- Original Message -
From: Anderson Marques Ferraz
To: [EMAIL PROTECTED] os.com.br delphi-br%40yahoog rupos.com. br
Sent: Tuesday, July 24, 2007 11:00 AM
Subject: Re: [delphi-br] Consulta SQL no DBEXPRESS
Utilizar a função QuotedStr(Input) também é uma alternativa.
2007/7/24, gustavo ... [EMAIL PROTECTED] com.brgustavohss% 40yahoo.com.
br
:
vê assim, com as aspas...
Banco.sdsCliente. Active:= False;
Banco.sdsCliente. CommandType := ctQuery;
Banco.sdsCliente. CommandText :=
'select * ' +
'from CLIENTE ' +
'where ' + DBEdit1.DataField + ' = ''' + Input ;
Banco.sdsCliente. Active := True;
eu n lembro se esse componente aceita parâmetros.. testa assim:
Banco.sdsCliente. Active:= False;
Banco.sdsCliente. CommandType := ctQuery;
Banco.sdsCliente. CommandText :=
'select * ' +
'from CLIENTE ' +
'where ' + DBEdit1.DataField + ' = :valor';
ParamByName( 'valor'). AsString := Input; // pode ser AsInteger, As...
Banco.sdsCliente. Active := True;
- Mensagem original
De: Hudson hudson_dias@ yahoo.com. br hudson_dias% 40yahoo.com.
brhudson_ dias%
40yahoo.com. br
Para: [EMAIL PROTECTED] os.com.br delphi-br%40yahoog rupos.com.
brdelphi- br%40yahoog
rupos.com.br
Enviadas: Terça-feira, 24 de Julho de 2007 1:01:20
Assunto: [delphi-br] Consulta SQL no DBEXPRESS
Gente estou levando um coro pra fazer uma consulta em SQLDataSet.. .
estou neste caminho, criei SQLConnection - SQLDataSet - SetProvader -
ClientDataSet - DataSource
Duvidas:
como faço uma consulta SQL... já tentei
Banco.sdsCliente. Active:= False;
Banco.sdsCliente. CommandType := ctQuery;
Banco.sdsCliente. CommandText := '';
Banco.sdsCliente. CommandText := 'select * from CLIENTE where
'+DBEdit1.DataField +' = '+Input;
Banco.sdsCliente. Active := True;
deu certo não
não me da resultatos..
Atenciosamente Hudson Dias
www.alcancedigital. com.br
MSN: [EMAIL PROTECTED] com
Skype: hudson_bh
Tele: (31)3434-6304
[As partes desta mensagem que não continham texto foram removidas]
!--
#ygrp-mlmsg {font-size:13px; font-family: arial, helvetica, clean,
sans-serif;}
#ygrp-mlmsg table {font-size:inherit; font:100% ;}
#ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean,
sans-serif;}
#ygrp-mlmsg pre, code {font:115% monospace;}
#ygrp-mlmsg * {line-height: 1.22em;}
#ygrp-text{
font-family: Georgia;
}
#ygrp-text p{
margin:0 0 1em 0;}
#ygrp-tpmsgs{
font-family: Arial;
clear:both;}
#ygrp-vitnav{
padding-top: 10px;font- family:Verdana; font-size: 77%;margin: 0;}
#ygrp-vitnav a{
padding:0 1px;}
RES: [delphi-br] Consulta SQL no DBEXPRESS
Esse SQL daí tá meio viajado não acha?
Eu faria assim:
Banco.ctQuery.Close;
Banco.ctQuery.SQL.Add('select * from CLIENTE where CAMPO = :CAMPO');
Banco.ctQuery.Parameters.ParamByName('CAMPO').Value;
Banco.nome do datasource.DataSet.Open;
partindo ro pressuposto que Banco é o nome do seu Datamodule.
[]s
Walter Alves Chagas Junior
Projeto e desenvolvimento de sistemas
Telemont Engenharia de telecomunicações S/A
Belo Horizonte - MG - Brasil
[EMAIL PROTECTED]
Fone: (31) 3389-8217 Fax: (31) 3389-8215
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Hudson
Enviada em: terça-feira, 24 de julho de 2007 01:01
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Consulta SQL no DBEXPRESS
Gente estou levando um coro pra fazer uma consulta em SQLDataSet...
estou neste caminho, criei SQLConnection - SQLDataSet - SetProvader -
ClientDataSet - DataSource
Duvidas:
como faço uma consulta SQL... já tentei
Banco.sdsCliente.Active:= False;
Banco.sdsCliente.CommandType := ctQuery;
Banco.sdsCliente.CommandText := '';
Banco.sdsCliente.CommandText := 'select * from CLIENTE where
'+DBEdit1.DataField+' = '+Input;
Banco.sdsCliente.Active := True;
deu certo não
não me da resultatos..
Atenciosamente Hudson Dias
www.alcancedigital.com.br
MSN: [EMAIL PROTECTED]
Skype: hudson_bh
Tele: (31)3434-6304
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Links do Yahoo! Grupos
Res: [delphi-br] Consulta SQL no DBEXPRESS
vê assim, com as aspas...
Banco.sdsCliente.Active:= False;
Banco.sdsCliente.CommandType := ctQuery;
Banco.sdsCliente.CommandText :=
'select * ' +
'from CLIENTE ' +
'where ' + DBEdit1.DataField + ' = ''' + Input ;
Banco.sdsCliente. Active := True;
eu n lembro se esse componente aceita parâmetros.. testa assim:
Banco.sdsCliente.Active:= False;
Banco.sdsCliente.CommandType := ctQuery;
Banco.sdsCliente.CommandText :=
'select * ' +
'from CLIENTE ' +
'where ' + DBEdit1.DataField + ' = :valor';
ParamByName('valor').AsString := Input; // pode ser AsInteger, As...
Banco.sdsCliente. Active := True;
- Mensagem original
De: Hudson [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 24 de Julho de 2007 1:01:20
Assunto: [delphi-br] Consulta SQL no DBEXPRESS
Gente estou levando um coro pra fazer uma consulta em SQLDataSet.. .
estou neste caminho, criei SQLConnection - SQLDataSet - SetProvader -
ClientDataSet - DataSource
Duvidas:
como faço uma consulta SQL... já tentei
Banco.sdsCliente. Active:= False;
Banco.sdsCliente. CommandType := ctQuery;
Banco.sdsCliente. CommandText := '';
Banco.sdsCliente. CommandText := 'select * from CLIENTE where
'+DBEdit1.DataField +' = '+Input;
Banco.sdsCliente. Active := True;
deu certo não
não me da resultatos..
Atenciosamente Hudson Dias
www.alcancedigital. com.br
MSN: [EMAIL PROTECTED] com
Skype: hudson_bh
Tele: (31)3434-6304
[As partes desta mensagem que não continham texto foram removidas]
!--
#ygrp-mlmsg {font-size:13px;font-family:arial, helvetica, clean, sans-serif;}
#ygrp-mlmsg table {font-size:inherit;font:100%;}
#ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean,
sans-serif;}
#ygrp-mlmsg pre, code {font:115% monospace;}
#ygrp-mlmsg * {line-height:1.22em;}
#ygrp-text{
font-family:Georgia;
}
#ygrp-text p{
margin:0 0 1em 0;}
#ygrp-tpmsgs{
font-family:Arial;
clear:both;}
#ygrp-vitnav{
padding-top:10px;font-family:Verdana;font-size:77%;margin:0;}
#ygrp-vitnav a{
padding:0 1px;}
#ygrp-actbar{
clear:both;margin:25px 0;white-space:nowrap;color:#666;text-align:right;}
#ygrp-actbar .left{
float:left;white-space:nowrap;}
.bld{font-weight:bold;}
#ygrp-grft{
font-family:Verdana;font-size:77%;padding:15px 0;}
#ygrp-ft{
font-family:verdana;font-size:77%;border-top:1px solid #666;
padding:5px 0;
}
#ygrp-mlmsg #logo{
padding-bottom:10px;}
#ygrp-vital{
background-color:#e0ecee;margin-bottom:20px;padding:2px 0 8px 8px;}
#ygrp-vital #vithd{
font-size:77%;font-family:Verdana;font-weight:bold;color:#333;text-transform:uppercase;}
#ygrp-vital ul{
padding:0;margin:2px 0;}
#ygrp-vital ul li{
list-style-type:none;clear:both;border:1px solid #e0ecee;
}
#ygrp-vital ul li .ct{
font-weight:bold;color:#ff7900;float:right;width:2em;text-align:right;padding-right:.5em;}
#ygrp-vital ul li .cat{
font-weight:bold;}
#ygrp-vital a {
text-decoration:none;}
#ygrp-vital a:hover{
text-decoration:underline;}
#ygrp-sponsor #hd{
color:#999;font-size:77%;}
#ygrp-sponsor #ov{
padding:6px 13px;background-color:#e0ecee;margin-bottom:20px;}
#ygrp-sponsor #ov ul{
padding:0 0 0 8px;margin:0;}
#ygrp-sponsor #ov li{
list-style-type:square;padding:6px 0;font-size:77%;}
#ygrp-sponsor #ov li a{
text-decoration:none;font-size:130%;}
#ygrp-sponsor #nc {
background-color:#eee;margin-bottom:20px;padding:0 8px;}
#ygrp-sponsor .ad{
padding:8px 0;}
#ygrp-sponsor .ad #hd1{
font-family:Arial;font-weight:bold;color:#628c2a;font-size:100%;line-height:122%;}
#ygrp-sponsor .ad a{
text-decoration:none;}
#ygrp-sponsor .ad a:hover{
text-decoration:underline;}
#ygrp-sponsor .ad p{
margin:0;}
o {font-size:0;}
.MsoNormal {
margin:0 0 0 0;}
#ygrp-text tt{
font-size:120%;}
blockquote{margin:0 0 0 4px;}
.replbq {margin:4;}
--
Flickr agora em português. Você cria, todo mundo vê.
http://www.flickr.com.br/
[As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Consulta SQL Invertendo linha em Coluna
Valeu Eduardo, vou tentar aqui! Daniel Loureiro - Depto. de Análise de Sistemas Fone : (19) - 3432-8101 email : [EMAIL PROTECTED] [EMAIL PROTECTED] Página: www.transport.com.br http://www.transport.com.br/ _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Eduardo Enviada em: quinta-feira, 10 de agosto de 2006 09:44 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Consulta SQL Invertendo linha em Coluna Possivel é mas vc tera q trabalhar muito. Faca um UNION para cada coluna q vc quer criar. Se vc não sabe a quantidade de colunas, vc tera q descobrir primeiro, para dedpois montar a sua consulta. Ja fiz isso uma vez. O resultado é exatamente o q vc quer !!! Boa Sorte Eduardo Daniel Loureiro Depto. de Análise de Sistemas escreveu: Senhores, bom dia! Será que é possivel, mediante uma condição fazer a inversão de uma linha retornada em uma query virar coluna? Exemplo: O resultado do SQL é apresentado desta forma: NomePresença Data DanielS 01/08/2006 DanielS 01/08/2006 DanielN 01/08/2006 DanielN 01/08/2006 Gostaria que ficasse assim: NomeP1P2P3P4 Pn... Data DanielS S N N ... 01/08/2006 Será que temos solução? Agradeço a todos atecipadamente. Daniel Loureiro - Depto. de Análise de Sistemas Fone : (19) - 3432-8101 email : [EMAIL PROTECTED] [EMAIL PROTECTED] Página: www.transport.com.br [As partes desta mensagem que não continham texto foram removidas] ___ Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas ! http://br.answers.yahoo.com/ __ Informação do NOD32 IMON 1.1700 (20060810) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br _ E-mail classificado pelo Identificador de Spam Inteligente. Para alterar a categoria classificada, visite o Terra http://mail.terra.com.br/protected_email/imail/imail.cgi?+_u=compdan_l=1,1 155213663.682996.31379.alcuta.terra.com.br,11612,Des15,Des15 Mail _ Esta mensagem foi verificada pelo E-mail Protegido Terra http://mail.terra.com.br/ . Scan engine: McAfee VirusScan / Atualizado em 09/08/2006 / Versão: 4.4.00/4825 Proteja o seu e-mail Terra: http://mail.terra.com.br/ [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Consulta SQL
o delphi tem um comando FINDNEAREST que faz isso para você. ao digitar a a tabela fica posicionada em abel antonio e assim por diante. Se não me engano a tabela precisa ter um indice por nome. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Alan Enviada em: domingo, 9 de julho de 2006 23:33 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Consulta SQL olá pessoal Estou com um problema preciso fazer uma consulta a um banco de dados utilizando SQL procurei na net alguma referencia mas não achei nada sobre esse tipo de consulta. Preciso fazer com que ao usuario digitar algo no campo nome como resultado apareça todos os nomes que começarem com as palavras digitadas ex o usuario digita al como resultado apareceria Alan Alexandre Almeida e asssim por diante Muito obrigado. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Consulta SQL
Não há misterio,,
o valor que você quer está no dbgrid mas soh dando o display. Mesmo mesmo
ele esta em seu ibquery
para pegar ele eh só: ibquery1.fieldbyname('nomedocampo').asstring;
se está no dbgrid (setado) você está com ele.. byby
[EMAIL PROTECTED]
-Mensagem original-
De: Paty CL [mailto:[EMAIL PROTECTED]
Enviada em: domingo, 10 de abril de 2005 17:45
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Consulta SQL
Pessoal, tenho o codigo abaixo, onde o mesmo faz pesquisa na tabela
atividade e me mostra o resultado em um DBGrid.
O que quero agora é pegar o valor localizado no DBGrid e armazenalo em outro
formulario gravando o mesmo em outra tabela. Como posso fazer isso?
with IBQuery1 do
begin
Close;
Sql.Clear;
Sql.Add('select * ');
Sql.Add('from atividade ');
Sql.Add('where atividade_nome like '+QuotedStr('%'+edbusca.Text+'%'));
Open;
try
if edbusca.text 'atividade_nome' then
except
on exception do
ShowMessage('Atividade não foi localizada!');
end;
end;
-
Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora!
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
