[delphi-br] query dinamica datasnap
Pessoal, Olhando pela internet, vi essehttp://www.ericksasse.com.br/queries-dinmicas-no-servidor-datasnap/artigo no glob do Eric Sasse, sobre Queries dinâmicas, onde ele indicou esse blog aquihttp://dmalta.blogspot.com/2006/08/queries-dinmicas-no-servidor-datasnap.html . Nesse post ele explicaria a passagem de parâmetros da tela pro DM através do relacionamento ClientDataSet e Provider, consequentemente, montagem da query através de uma função MontaSQL, que serviria pra todos os where do sistema. Seria espectacular. procurei bastante, mas só achei, pro que quero especificamente, esse artigo. Agradeceria muito qualquer ajuda, ou o artigo original, que parece ter sido movido :) Atenciosamente, -- Sérgio Cavalcante [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: delphi-br-ow...@yahoogrupos.com.br 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: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] [ QUERY ADICIONAR OU EXCLUIR PARAMETROS]
Socorro amigos !! Presciso de um help . Como faco para excluir o incluir um parametro na query em tempo de execucao ??? Alquem pode me dar uma luz??? meu sql . INSERT INTO md_cat(NUMMAT, ID_ACI, emite,tipcat,dataNas) VALUES(:nummat,:id_aci,:emite,:tipcat,:dataNas) ja tentei de varias formas e sempre da erro .. Codigo if dataNas.text '' then begin //Query.Params.add('dataNas'); with Query.Params.CreateParam(ftInteger, dataNas, ptInput) do begin AsDate := StrToDAte(dataNas.text); end; // Query.Params.CreateParam(ftDate, 'dataNas', ptInput); // Query.Params.ParamByName('dataNas').AsDate := StrToDAte (edobito.text); end else begin Query.ParamByName('dataNas').AsDate := 0; Query.Params[9].Destroy; parteste := Query.Params[9]; Query.Params.RemoveParam(parteste); parametro := Query.Params[9].Name; end;
Re: [delphi-br] [ QUERY ADICIONAR OU EXCLUIR PARAMETROS]
Quando vc atribui um script SQL em tempo de execução o componente já se encarrega de criar os parâmetros para você. 2009/2/18 marciosulfabril mar...@sulfabril.com.br Socorro amigos !! Presciso de um help . Como faco para excluir o incluir um parametro na query em tempo de execucao ??? Alquem pode me dar uma luz??? meu sql . INSERT INTO md_cat(NUMMAT, ID_ACI, emite,tipcat,dataNas) VALUES(:nummat,:id_aci,:emite,:tipcat,:dataNas) ja tentei de varias formas e sempre da erro .. Codigo if dataNas.text '' then begin //Query.Params.add('dataNas'); with Query.Params.CreateParam(ftInteger, dataNas, ptInput) do begin AsDate := StrToDAte(dataNas.text); end; // Query.Params.CreateParam(ftDate, 'dataNas', ptInput); // Query.Params.ParamByName('dataNas').AsDate := StrToDAte (edobito.text); end else begin Query.ParamByName('dataNas').AsDate := 0; Query.Params[9].Destroy; parteste := Query.Params[9]; Query.Params.RemoveParam(parteste); parametro := Query.Params[9].Name; end; -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 8842-9489 MSN: eduardo@gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: Re: [delphi-br] Query MyDAC
Você pode ate usar a mesma query. é so não adicionar os campos.. e usar FieldByName... mas usar 2 tb é uma boa. 2009/2/11 Bruno Lepesqueur brunolbra...@yahoo.com.br Eduardo eu pensei bem aki e acho q estou dando bobeira mesmo! Consegui fazer oq eu queria de outra forma! Eu estava querendo usar a mesma query para duas tabelas (uma de cada vez) daí e teria que limpar e mandar inserir os outros campos a cada vez q eu ativasse uma tabela! Eu vou fazer com duas querys mesmo! Obrigado! ---Mensagem original--- De: Eduardo Silva dos Santos Data: 11/02/2009 10:36:13 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Query MyDAC Olá Bruno, desculpa a pergunta, mais qual a sua intenção em fazer isso? 2009/2/11 Bruno Lepesqueur brunolbra...@yahoo.com.brbrunolbrasil%40yahoo.com.br Pessoal, eu uso o MyDac em minhas aplicações e gostaria de tirar uma dúvida! Eu tenho uma query com um código select tipo: select * from clientes Se eu clicar na query com o botão direito, depois em Fields Edito... eu consigo add todos os campos, mas eu gostaria de fazer isso usando uma linha de códigos pelo delphi. To tentando algo assim: QueryCli.Fields.Clear; (para limpar todos os campos, mas não sei se dará certo) Agora eu preciso de outro comando que inclua todos novamente na query, tipo algo parecido com: QueryCli.Fields.Add(all); (Esse código não dá certo! Já testei!) Obrigado a todos! [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 8842-9489 MSN: eduardo@gmail.com eduardo.drd%40gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 8842-9489 MSN: eduardo@gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Query MyDAC
Pessoal, eu uso o MyDac em minhas aplicações e gostaria de tirar uma dúvida! Eu tenho uma query com um código select tipo: select * from clientes Se eu clicar na query com o botão direito, depois em Fields Edito... eu consigo add todos os campos, mas eu gostaria de fazer isso usando uma linha de códigos pelo delphi. To tentando algo assim: QueryCli.Fields.Clear; (para limpar todos os campos, mas não sei se dará certo) Agora eu preciso de outro comando que inclua todos novamente na query, tipo algo parecido com: QueryCli.Fields.Add(all); (Esse código não dá certo! Já testei!) Obrigado a todos! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Query MyDAC
Dá uma olhada nessa dica: [ http://www.linhadecodigo.com.br/dicas.asp?id_dica=374sub=14 ] []'s Ricardo. _ Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em qua, 11/2/09, Bruno Lepesqueur brunolbra...@yahoo.com.br escreveu: De: Bruno Lepesqueur brunolbra...@yahoo.com.br Assunto: [delphi-br] Query MyDAC Para: delphi-br@yahoogrupos.com.br Data: Quarta-feira, 11 de Fevereiro de 2009, 9:39 Pessoal, eu uso o MyDac em minhas aplicações e gostaria de tirar uma dúvida! Eu tenho uma query com um código select tipo: select * from clientes Se eu clicar na query com o botão direito, depois em Fields Edito... eu consigo add todos os campos, mas eu gostaria de fazer isso usando uma linha de códigos pelo delphi. To tentando algo assim: QueryCli.Fields. Clear; (para limpar todos os campos, mas não sei se dará certo) Agora eu preciso de outro comando que inclua todos novamente na query, tipo algo parecido com: QueryCli.Fields. Add(all); (Esse código não dá certo! Já testei!) Obrigado a todos! [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Query MyDAC
Olá Bruno, desculpa a pergunta, mais qual a sua intenção em fazer isso? 2009/2/11 Bruno Lepesqueur brunolbra...@yahoo.com.br Pessoal, eu uso o MyDac em minhas aplicações e gostaria de tirar uma dúvida! Eu tenho uma query com um código select tipo: select * from clientes Se eu clicar na query com o botão direito, depois em Fields Edito... eu consigo add todos os campos, mas eu gostaria de fazer isso usando uma linha de códigos pelo delphi. To tentando algo assim: QueryCli.Fields.Clear; (para limpar todos os campos, mas não sei se dará certo) Agora eu preciso de outro comando que inclua todos novamente na query, tipo algo parecido com: QueryCli.Fields.Add(all); (Esse código não dá certo! Já testei!) Obrigado a todos! [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 8842-9489 MSN: eduardo@gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Query MyDAC
Bruno da uma olhada : class procedure TDataSetUtils.AddFields(DataSet: TDataSet); var intFor: integer; intPacketRecords: integer; begin intPacketRecords := TClientDataSet(DataSet).PacketRecords; TClientDataSet(DataSet).PacketRecords := 0; try if Dataset.Active then Dataset.Close; if Dataset.FieldDefs.Count 0 then begin repeat Dataset.Fields[DataSet.FieldDefs.Count - DataSet.FieldDefs.Count].Destroy; Dataset.FieldDefs[Dataset.FieldDefs.Count - Dataset.FieldDefs.Count].Destroy; until Dataset.FieldDefs.Count = 0; end; Dataset.FieldDefs.Update; for intFor := 0 to Dataset.FieldDefs.Count - 1 do begin if Dataset.FindField(Dataset.FieldDefs[intFor].Name) = nil then Dataset.FieldDefs.Items[intFor].CreateField(Dataset); end; finally TClientDataSet(DataSet).PacketRecords := intPacketRecords; end; end; 2009/2/11 Eduardo Silva dos Santos eduardo@gmail.com Olá Bruno, desculpa a pergunta, mais qual a sua intenção em fazer isso? 2009/2/11 Bruno Lepesqueur brunolbra...@yahoo.com.brbrunolbrasil%40yahoo.com.br Pessoal, eu uso o MyDac em minhas aplicações e gostaria de tirar uma dúvida! Eu tenho uma query com um código select tipo: select * from clientes Se eu clicar na query com o botão direito, depois em Fields Edito... eu consigo add todos os campos, mas eu gostaria de fazer isso usando uma linha de códigos pelo delphi. To tentando algo assim: QueryCli.Fields.Clear; (para limpar todos os campos, mas não sei se dará certo) Agora eu preciso de outro comando que inclua todos novamente na query, tipo algo parecido com: QueryCli.Fields.Add(all); (Esse código não dá certo! Já testei!) Obrigado a todos! [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 8842-9489 MSN: eduardo@gmail.com eduardo.drd%40gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas] -- Abraços, Daniel. Sempre que a vida lhe apresentar um desafio, tenha certeza que junto dele está a solução, [As partes desta mensagem que não continham texto foram removidas]
Res: Re: [delphi-br] Query MyDAC
Eduardo eu pensei bem aki e acho q estou dando bobeira mesmo! Consegui fazer oq eu queria de outra forma! Eu estava querendo usar a mesma query para duas tabelas (uma de cada vez) daí e teria que limpar e mandar inserir os outros campos a cada vez q eu ativasse uma tabela! Eu vou fazer com duas querys mesmo! Obrigado! ---Mensagem original--- De: Eduardo Silva dos Santos Data: 11/02/2009 10:36:13 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Query MyDAC Olá Bruno, desculpa a pergunta, mais qual a sua intenção em fazer isso? 2009/2/11 Bruno Lepesqueur brunolbra...@yahoo.com.br Pessoal, eu uso o MyDac em minhas aplicações e gostaria de tirar uma dúvida! Eu tenho uma query com um código select tipo: select * from clientes Se eu clicar na query com o botão direito, depois em Fields Edito... eu consigo add todos os campos, mas eu gostaria de fazer isso usando uma linha de códigos pelo delphi. To tentando algo assim: QueryCli.Fields.Clear; (para limpar todos os campos, mas não sei se dará certo) Agora eu preciso de outro comando que inclua todos novamente na query, tipo algo parecido com: QueryCli.Fields.Add(all); (Esse código não dá certo! Já testei!) Obrigado a todos! [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 8842-9489 MSN: eduardo@gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] [QUERY GENERICA COM ARRAY OF VARIANT]
Amigos nao estou conseguindo executar a query pois estadando pau com o valor passado 31.31.. O que pode ser ??? da um erro de EDBEnginerError capability not suppored O que faco ??? UpdateDelete('U',CsSqlUpdateAtestado, ['id_reg','numhoras'],[1,31.31]) ; Procedure UpdateDelete(paAcao :char; paSQL: String; paByName: array of String; paByValue: array of Variant); var Query : TQuery; i,c : Integer; parametro : String; begin try Query := TQuery.Create(nil); Query.DatabaseName := DATABASE_NAME_SISTEMA; Query.close; Query.SQL.Clear; Query.SQL.Add(paSQL); ///PARAMETROS SQL c := 0; for i := Low(paByName) to High(paByName) do begin query.ParamByName(paByName[i]).Value := paByValue[i]; //parametro := Query.Params[i].Name; //Query.Params[i].value := paVlr[i]; end; try Query.ExecSQL; except raise Exception.Create('SQL_ERRO'); end; finally query.close; query.Free; end; end;
Re: [delphi-br] [QUERY GENERICA COM ARRAY OF VARIANT]
Passa a string SQL de CsSqlUpdateAtestado; Com certeza é algo dentro dela... []s Luiz Escobar Luiz Escobar - Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/ASSEMBLY/MySQL/xBase SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse11), Windows 2K/XP HARBOUR -- Borland C++ 5.5.1 (32 bit) Harbour 1.0.1 Intl. (Rev. 9429) xHarbour Compile build 1.1.0 (Simplex) Harbour MiniGUI 1.5 Extended Edition (Build 57d) - 2008.10.10 --- From: marciosulfabril Sent: Friday, November 07, 2008 3:15 PM To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] [QUERY GENERICA COM ARRAY OF VARIANT] Amigos nao estou conseguindo executar a query pois estadando pau com o valor passado 31.31.. O que pode ser ??? da um erro de EDBEnginerError capability not suppored O que faco ??? UpdateDelete('U',CsSqlUpdateAtestado, ['id_reg','numhoras'],[1,31.31]) ; Procedure UpdateDelete(paAcao :char; paSQL: String; paByName: array of String; paByValue: array of Variant); var Query : TQuery; i,c : Integer; parametro : String; begin try Query := TQuery.Create(nil); Query.DatabaseName := DATABASE_NAME_SISTEMA; Query.close; Query.SQL.Clear; Query.SQL.Add(paSQL); ///PARAMETROS SQL c := 0; for i := Low(paByName) to High(paByName) do begin query.ParamByName(paByName[i]).Value := paByValue[i]; //parametro := Query.Params[i].Name; //Query.Params[i].value := paVlr[i]; end; try Query.ExecSQL; except raise Exception.Create('SQL_ERRO'); end; finally query.close; query.Free; end; end; [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Query dinâmica
Galera, tenho um problema bobo aqui, eu tinha várias Tsqlquery no meu formulário, para diminuir o código e tbm o número de componentes na tela, resolvi criar e executar essas querys dinamicamente. Fiz o seguinte código procedure ExecutaQuerys(query: TSQLQuery; sqla: String); begin if not Assigned(query) then query := TSQLQuery.Create(nil); query.Close; try query.SQLConnection := dmCnx.cnSinpdados; with query do begin sql.Clear; sql.Add(sqla); Open(); end except on E:Exception do MessageDlg('Erro criando query. Causa : '+E.Message + ''+sqla, mtError, [mbOK], 0); end; end; end. dai depois, eu chamo essa procedure ExecutaQuerys(nomedaquery,sql); Quando tento acessar os valores depois de executar o comando acima, acontece AcessViolation, esse erro eu sei que acontece quando tento acessar uma objeto não criado, não deveria este objeto já estar criado na memória, pois ali em cima eu testo se ele está ou não criado. Alguém pode me ajudar??? O que acontece é que logo depois do open da query, se eu Uberdam Cavaletti Formado em Tecnologia da Informação - Unoesc - Xxe Pós-graduado em desenvolvimento Java - Unoesc - Xxe http://www.curricular.com.br/berdam Visite http://passandoveneno.blogspot.com Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Query dinâmica
tente passa por referencia procedure ExecutaQuerys(var query: TSQLQuery; sqla: String); dai vc pode acessar fora da procedure ... ExecutaQuerys() xxx.FieldByName('CAMPO').AsString Rodrigo ®¿® - Mensagem original De: Berdam [EMAIL PROTECTED] Para: Delphi delphi-br@yahoogrupos.com.br Enviadas: Segunda-feira, 29 de Setembro de 2008 9:43:37 Assunto: [delphi-br] Query dinâmica Galera, tenho um problema bobo aqui, eu tinha várias Tsqlquery no meu formulário, para diminuir o código e tbm o número de componentes na tela, resolvi criar e executar essas querys dinamicamente. Fiz o seguinte código procedure ExecutaQuerys(query: TSQLQuery; sqla: String); begin if not Assigned(query) then query := TSQLQuery.Create(nil); query.Close; try query.SQLConnection := dmCnx.cnSinpdados; with query do begin sql.Clear; sql.Add(sqla); Open(); end except on E:Exception do MessageDlg('Erro criando query. Causa : '+E.Message + ''+sqla, mtError, [mbOK], 0); end; end; end. dai depois, eu chamo essa procedure ExecutaQuerys(nomedaquery,sql); Quando tento acessar os valores depois de executar o comando acima, acontece AcessViolation, esse erro eu sei que acontece quando tento acessar uma objeto não criado, não deveria este objeto já estar criado na memória, pois ali em cima eu testo se ele está ou não criado. Alguém pode me ajudar??? O que acontece é que logo depois do open da query, se eu Uberdam Cavaletti Formado em Tecnologia da Informação - Unoesc - Xxe Pós-graduado em desenvolvimento Java - Unoesc - Xxe http://www.curricular.com.br/berdam Visite http://passandoveneno.blogspot.com Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
Re: Res: [delphi-br] Query dinâmica
valeu ai pela ajuda, rodrigo, acho que isso se chama variável por referência, já tinha visto, mas n sabia muito bem como se aplicava, valeu pela ajuda Uberdam Cavaletti Formado em Tecnologia da Informação - Unoesc - Xxe Pós-graduado em desenvolvimento Java - Unoesc - Xxe http://www.curricular.com.br/berdam Visite http://passandoveneno.blogspot.com --- Em seg, 29/9/08, Rodrigo Bevilacqua Marcondes [EMAIL PROTECTED] escreveu: De: Rodrigo Bevilacqua Marcondes [EMAIL PROTECTED] Assunto: Res: [delphi-br] Query dinâmica Para: delphi-br@yahoogrupos.com.br Data: Segunda-feira, 29 de Setembro de 2008, 10:10 tente passa por referencia procedure ExecutaQuerys( var query: TSQLQuery; sqla: String); dai vc pode acessar fora da procedure ... ExecutaQuerys( ) xxx.FieldByName( 'CAMPO'). AsString Rodrigo ®¿® - Mensagem original De: Berdam berdamzinho@ yahoo.com. br Para: Delphi [EMAIL PROTECTED] os.com.br Enviadas: Segunda-feira, 29 de Setembro de 2008 9:43:37 Assunto: [delphi-br] Query dinâmica Galera, tenho um problema bobo aqui, eu tinha várias Tsqlquery no meu formulário, para diminuir o código e tbm o número de componentes na tela, resolvi criar e executar essas querys dinamicamente. Fiz o seguinte código procedure ExecutaQuerys( query: TSQLQuery; sqla: String); begin if not Assigned(query) then query := TSQLQuery.Create( nil); query.Close; try query.SQLConnection := dmCnx.cnSinpdados; with query do begin sql.Clear; sql.Add(sqla) ; Open(); end except on E:Exception do MessageDlg(' Erro criando query. Causa : '+E.Message + ''+sqla, mtError, [mbOK], 0); end; end; end. dai depois, eu chamo essa procedure ExecutaQuerys( nomedaquery, sql); Quando tento acessar os valores depois de executar o comando acima, acontece AcessViolation, esse erro eu sei que acontece quando tento acessar uma objeto não criado, não deveria este objeto já estar criado na memória, pois ali em cima eu testo se ele está ou não criado. Alguém pode me ajudar??? O que acontece é que logo depois do open da query, se eu - - - - - - Uberdam Cavaletti Formado em Tecnologia da Informação - Unoesc - Xxe Pós-graduado em desenvolvimento Java - Unoesc - Xxe http://www.curricul ar.com.br/ berdam Visite http://passandovene no.blogspot. com - - - - - - Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail. com. http://br.new. mail.yahoo. com/addresses [As partes desta mensagem que não continham texto foram removidas] - - -- -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail. com. http://br.new. mail.yahoo. com/addresses [As partes desta mensagem que não continham texto foram removidas] Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] query
olá tenho essa sql dentro da query, mas nao funciona a parte do case, o q está errado? select fk_cliente, case when tipo=0 then 'Software' when tipo=1 then 'Hardware' end as tipo, data, descricao, valorminimo, qtdemodulos, precomodulo, descontomodulo, valorbruto, descontovalorbruto, valorfinal from contratos order by tipo delphi + Postgree
Re: [delphi-br] query
Parece que seu case ta errado... não sei no PostGree mas no MySQL é assim Case NomeDoCampo when '1' then 'Pago' when '2' then 'Aberto' end as Nome_Virtual_para_o_Campo 2008/7/17 rzzanatta [EMAIL PROTECTED]: olá tenho essa sql dentro da query, mas nao funciona a parte do case, o q está errado? select fk_cliente, case when tipo=0 then 'Software' when tipo=1 then 'Hardware' end as tipo, data, descricao, valorminimo, qtdemodulos, precomodulo, descontomodulo, valorbruto, descontovalorbruto, valorfinal from contratos order by tipo delphi + Postgree -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] query
aparentemente não tem nenhum problema ... qual a mensagem do erro !? --- Em qui, 17/7/08, Eduardo Silva dos Santos [EMAIL PROTECTED] escreveu: De: Eduardo Silva dos Santos [EMAIL PROTECTED] Assunto: Re: [delphi-br] query Para: delphi-br@yahoogrupos.com.br Data: Quinta-feira, 17 de Julho de 2008, 17:32 Parece que seu case ta errado... não sei no PostGree mas no MySQL é assim Case NomeDoCampo when '1' then 'Pago' when '2' then 'Aberto' end as Nome_Virtual_ para_o_Campo 2008/7/17 rzzanatta [EMAIL PROTECTED] com.br: olá tenho essa sql dentro da query, mas nao funciona a parte do case, o q está errado? select fk_cliente, case when tipo=0 then 'Software' when tipo=1 then 'Hardware' end as tipo, data, descricao, valorminimo, qtdemodulos, precomodulo, descontomodulo, valorbruto, descontovalorbruto, valorfinal from contratos order by tipo delphi + Postgree -- . . . . ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: eduardo.drd@ gmail.com Site: http://www.drdsiste mas.com.br/ . . . . ... [As partes desta mensagem que não continham texto foram removidas] Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Query não atualiza quando em dois mó dulos.
Olá Pessoal. Uso delphi 7 com BDE e estou tendo o seguinte problema: Faço a consulta de saldo do meu estoque no Frente de Caixa. Ítem x tem saldo = a 10. Através do módulo do estoque adiciono 10 unidades a este ítem e fico com saldo 20. No módulo de Frente de Caixa refaço a consulta e o saldo continua em 10. Se sair do Frente de Caixa e consultar de novo o saldo vem corrigido. Se eu colocar um starttransaction e um commit imediatamente antes da query também vem certo. Mas não acredito que esta seja a forma correta. Onde estou errando? Na configuração do banco? Existe alguma configuração especial pro Bde? Porque ele só atualiza realmente a query se houver um commit? Ele não consegue reconhecer o commit dado pelo outro módulo? Desde já agradeço. -- Marcos Scherer da Silva Ágil Informática Ltda - AgilSoft [EMAIL PROTECTED] 51 3599-3714 51 3039-2061 51 8423-8222
[delphi-br] Query - DataSetProvider - ClientDataSet
Olá pessoal, bom dia, a minha dúvida é sobre esses componentes citados no título do Assunto. Esse esquema é um tipo de acesso à base de dados feito em camadas, não é ?! Considerando q cada um está ligado um ao outro, por exemplo, eu faço uma consulta na query e então obtenho os resultados. Consequentemente esses resultados irão aparecer no ClientDataSet. Caso eu feche a Query ou mude seu SQL, os registros antes armazenados no ClientDataSet irão desaparecer tb Isso é utilizado para não sobrecarregar o servidor ?? Já que se o computador cliente estiver acessando diretamente a Query, cada acesso ou atualizacao na Query irá acessar o servidor e, portanto, diminuindo a eficiência do sistema. Agora, utilizando o ClientDataSet seria tudo de uma vez só... O conceito de usar esses 3 componentes é mesmo esse descrito acima Gostaria de entender melhor se alguém puder me responder ou explicar me ajudaria muiiito Obrigado pela atenção de todos, Abraços, Flávio. - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Query - DataSetProvider - ClientDataSet
Tem bastante a aprender sobre isso. No meu link de download gratuito (HTTP://cc.codegear.com/author/795118) tem uma apostila de desenvolvimento client/Server com DBX, Firebird e Delphi 7. Ela é bem básica mas bem passo a passo que te ajudará no entendimento prático do uso desta arquitetura. Quando vc usa um dataset neste modelo, após feita a consulta ele sempre é fechado, toda interação e manipulação de dados está no clientdataset e no dataset provider, o dataset que fica na ponta nada mais é do que o canal de acesso a dados. Abs BL From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Flavio Sent: sexta-feira, 16 de maio de 2008 14:25 To: Grupo_Delphi Subject: [delphi-br] Query - DataSetProvider - ClientDataSet Olá pessoal, bom dia, a minha dúvida é sobre esses componentes citados no título do Assunto. Esse esquema é um tipo de acesso à base de dados feito em camadas, não é ?! Considerando q cada um está ligado um ao outro, por exemplo, eu faço uma consulta na query e então obtenho os resultados. Consequentemente esses resultados irão aparecer no ClientDataSet. Caso eu feche a Query ou mude seu SQL, os registros antes armazenados no ClientDataSet irão desaparecer tb Isso é utilizado para não sobrecarregar o servidor ?? Já que se o computador cliente estiver acessando diretamente a Query, cada acesso ou atualizacao na Query irá acessar o servidor e, portanto, diminuindo a eficiência do sistema. Agora, utilizando o ClientDataSet seria tudo de uma vez só... O conceito de usar esses 3 componentes é mesmo esse descrito acima Gostaria de entender melhor se alguém puder me responder ou explicar me ajudaria muiiito Obrigado pela atenção de todos, Abraços, Flávio. - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] query
Pessoa. Eu posso usar duas query em uma só função. ex. no meu formulário tem um botão que pesquisa um campo e joga o resultado em algumas label. uso uma adoquery para fazer isso. Posso usar mais uma para buscar dados em uma outra tabela que não se relaciona, como ficaria o código. Já tentei mais sempre dá erro.
Re: [delphi-br] query
Pelo que entendi queres executar 2 query's, por que segundo o que disseste não há relacionamentos entre uma e a outra. Se você faz isso ao pressionar um botão, então execute uma query, pegue os resultados e depois execute a outra ... simples assim. Alessandro DUARTE de Moraes A.C. Santa Casa do Rio Grande. http://www.santacasarg.com.br - Original Message - From: Eduardo Oliveira silva To: delphi-br@yahoogrupos.com.br Sent: Tuesday, April 22, 2008 10:11 AM Subject: [delphi-br] query Pessoa. Eu posso usar duas query em uma só função. ex. no meu formulário tem um botão que pesquisa um campo e joga o resultado em algumas label. uso uma adoquery para fazer isso. Posso usar mais uma para buscar dados em uma outra tabela que não se relaciona, como ficaria o código. Já tentei mais sempre dá erro. -- E-mail Seguro Vetorial.net Mensagem classificada como NÃO-SPAM. Para classificar como SPAM, encaminhe para [EMAIL PROTECTED] Chave de Identificação: 54568,480deefe162185532659233 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] query
até pode, porém a query não pode ter campos adicionados nela. segundo antes de usar a query tem que limpa-la. ex: var grupo_cli:integer; begin query1.close; query1.sql.clear; query1.sql.add('select * from clientes'); query1.open; grupo_cli := query1.fieldbyname('GRUPO').value; EditCodigo.text := query1.fieldbyname('codigo').text; EditNome.text := query1.fieldbyname('Nome').text; query1.close; query1.sql.clear; query1.sql.add('select descricao from grupos_de_clientes where codigo =:busca'); query1.parameters.parambyname('busca').value := grupo_cli; query1.open; EditGrupo.text := query1.fieldbyname('descricao').text; se for algo parecido está aí.. - Original Message - From: Eduardo Oliveira silva To: delphi-br@yahoogrupos.com.br Sent: Tuesday, April 22, 2008 10:11 AM Subject: [delphi-br] query Pessoa. Eu posso usar duas query em uma só função. ex. no meu formulário tem um botão que pesquisa um campo e joga o resultado em algumas label. uso uma adoquery para fazer isso. Posso usar mais uma para buscar dados em uma outra tabela que não se relaciona, como ficaria o código. Já tentei mais sempre dá erro. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] query
è isso mesmo, mais se eu tiver uma query1 e uma query2. são tabelas diferentes. Em 01/05/08, Alcistemas Informática [EMAIL PROTECTED] escreveu: até pode, porém a query não pode ter campos adicionados nela. segundo antes de usar a query tem que limpa-la. ex: var grupo_cli:integer; begin query1.close; query1.sql.clear; query1.sql.add('select * from clientes'); query1.open; grupo_cli := query1.fieldbyname('GRUPO').value; EditCodigo.text := query1.fieldbyname('codigo').text; EditNome.text := query1.fieldbyname('Nome').text; query1.close; query1.sql.clear; query1.sql.add('select descricao from grupos_de_clientes where codigo =:busca'); query1.parameters.parambyname('busca').value := grupo_cli; query1.open; EditGrupo.text := query1.fieldbyname('descricao').text; se for algo parecido está aí.. - Original Message - From: Eduardo Oliveira silva To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Tuesday, April 22, 2008 10:11 AM Subject: [delphi-br] query Pessoa. Eu posso usar duas query em uma só função. ex. no meu formulário tem um botão que pesquisa um campo e joga o resultado em algumas label. uso uma adoquery para fazer isso. Posso usar mais uma para buscar dados em uma outra tabela que não se relaciona, como ficaria o código. Já tentei mais sempre dá erro. [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] query
Então queres que retorne valores que não se relacionam numa mesma query? Buenos, talvez seja isso então: SELECT '01' as CODIGO, desc AS NOME, vlr AS VALOR FROM tabela1 WHERE condição1 UNION SELECT '02' as CODIGO, nome AS NOME, vlr_final AS VALOR FROM tabela2 WHERE condição2 Isso seria uma forma de unir 2 querys em uma só. Mas para isso os nomes das colunas precisam ser os mesmos, por isso utilizei o AS ... Alessandro DUARTE de Moraes A.C. Santa Casa do Rio Grande. http://www.santacasarg.com.br - Original Message - From: Eduardo Oliveira silva To: delphi-br@yahoogrupos.com.br Sent: Tuesday, April 22, 2008 1:45 PM Subject: Re: [delphi-br] query è isso mesmo, mais se eu tiver uma query1 e uma query2. são tabelas diferentes. Em 01/05/08, Alcistemas Informática [EMAIL PROTECTED] escreveu: até pode, porém a query não pode ter campos adicionados nela. segundo antes de usar a query tem que limpa-la. ex: var grupo_cli:integer; begin query1.close; query1.sql.clear; query1.sql.add('select * from clientes'); query1.open; grupo_cli := query1.fieldbyname('GRUPO').value; EditCodigo.text := query1.fieldbyname('codigo').text; EditNome.text := query1.fieldbyname('Nome').text; query1.close; query1.sql.clear; query1.sql.add('select descricao from grupos_de_clientes where codigo =:busca'); query1.parameters.parambyname('busca').value := grupo_cli; query1.open; EditGrupo.text := query1.fieldbyname('descricao').text; se for algo parecido está aí.. - Original Message - From: Eduardo Oliveira silva To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Tuesday, April 22, 2008 10:11 AM Subject: [delphi-br] query Pessoa. Eu posso usar duas query em uma só função. ex. no meu formulário tem um botão que pesquisa um campo e joga o resultado em algumas label. uso uma adoquery para fazer isso. Posso usar mais uma para buscar dados em uma outra tabela que não se relaciona, como ficaria o código. Já tentei mais sempre dá erro. [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- E-mail Seguro Vetorial.net Mensagem classificada como NÃO-SPAM. Para classificar como SPAM, encaminhe para [EMAIL PROTECTED] Chave de Identificação: 54568,480e1b18223227374815427 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Query usada não deixa ser usada ne novo... .?=
Olá pessoal, bom dia, tentei resolver de várias maneiras e não consegui. Tenho uma query q é ligada a um DataSetProvider q é ligado em um ClientDataSet que é utilizado em um relatório do Rave. A primeira vez q gero o relatório executa perfeito, mas na segunda vez q tento executar, o sistema não deixa eu manipular (query-SQL-Clear,etc...) a query que foi usada no relatório e gera um erro de AccessViolation, porém a query está instanciada. Tentei fechar a query antes, tentei setar Prepared = false de qualquer comando q manipulasse a query mas não funcionou. Alguém sabe o que está acontecendo ? Obrigado pela atenção de todos. Flávio. - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Query em runtime no Rave não está funcio nando...
Olá pessoal, bom dia, tenho uma query que é construída correta e dinamicamente no aplicativo do delphi, mas na hora q vai gerar o relatorio, o Rave não reconhece os resultados que a query gerou. A query está conectada corretamente com o Rave, pq se eu editar o SQL da query em design time, o programa roda corretamente. Algúem sabe trabalhar no Rave com querys criadas dinamicamente ?? Obrigado pela atenção de todos. Flávio. - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Query usando outra Query !!!!!
select campos, count(*) from tabela1, tabela2 where . group by tabela2.campo (Neste caso iria acumar os registros da tabela2) se não funcionar o COUNT normal use assim... select campos, campos, (select count(*) from tabela where ... ) as campo from tabela - Original Message - From: Flavio To: Grupo_Delphi Sent: Tuesday, August 01, 2006 5:20 PM Subject: [delphi-br] Query usando outra Query ! Olá pessoal, estou precisando de uma ajuda rápida. Preciso somar os registros (count) e somar os valores (sum) de uma tabela resultante de uma query executada. Alguém sabe como posso executar uma query em função de outra !??! Obrigado pela atenção! Flávio - Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas! [As partes desta mensagem que não continham texto foram removidas] -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.1.394 / Virus Database: 268.10.5/404 - Release Date: 31/07/06 [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
Re: [delphi-br] Query usando outra Query !!!!!
Registros: Query.recordCount --- traz o total de registros da query Somar O valor de um campo: Faz um sum(campo) as vltotal no select que está utilizando na query Exemplo: Select sum(Sal) from emp Abraços Marco Aurélio Gerônimo - Original Message - From: Flavio To: Grupo_Delphi Sent: Tuesday, August 01, 2006 5:20 PM Subject: [delphi-br] Query usando outra Query ! Olá pessoal, estou precisando de uma ajuda rápida. Preciso somar os registros (count) e somar os valores (sum) de uma tabela resultante de uma query executada. Alguém sabe como posso executar uma query em função de outra !??! Obrigado pela atenção! Flávio - Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas! [As partes desta mensagem que não continham texto foram removidas] [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
[delphi-br] Query usando outra Query !!!!!
Olá pessoal, estou precisando de uma ajuda rápida. Preciso somar os registros (count) e somar os valores (sum) de uma tabela resultante de uma query executada. Alguém sabe como posso executar uma query em função de outra !??! Obrigado pela atenção! Flávio - Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas! [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
RE: [delphi-br] Query de outra query
Seja um pouco mais claro! Vc quer fazer uma sub query ??? Se for isso so depende do BD. Eduardo -Original Message- From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of wanderson_raimundo Sent: quinta-feira, 16 de fevereiro de 2006 14:27 To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Query de outra query Pessoal , Sou iniciante , existe a possibilidade de criar um query a partir de outra query sem utilizar a clausula Where, ex: select * from ( select * from tabela). Ou devo salvar o resultado da primeira query em uma tabela ? Alguém tem uma dica ? o que é mais comum nesse caso ? -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 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] 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] Query não funciona
Vanderson, eu não sei usar o left join ainda. Aqueles códigos que você me passou, eu não consegui montar para que eles fucionassem certo, pois havia mais uma tabela que eu deveria mencionar. Agradeço a sua ajuda, abraço Rodrigo Tognin -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Vanderson de Almeida Correa de Sá Enviada em: quarta-feira, 19 de outubro de 2005 13:19 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Query não funciona Amigo tente utilizar LEFT JOIN conforme te orientei anteriormente!! Da maneira que vc colocou (coletanea.colcodigo = cd_coletanea.codigocoletanea) só vai trazer se tiver registro nas duas tabelas e o LEFT JOIN vai trazer mesmo se a tabela cd_coletanea não tenha registro!! Um abraço, Vanderson Sá Rodrigo Tognin [EMAIL PROTECTED] escreveu: Boa tarde pessoal, tenho o seguinte código numa query: select coletanea.colcodigo, coletanea.colnome, count (cd_coletanea.codigo) as [total] from coletanea, cd_coletanea, dono where coletanea.colcodigo = cd_coletanea.codigocoletanea AND coletanea.coldono = dono.donocodigo AND dono.donocodigo = :CodigoDono group by coletanea.colcodigo, coletanea.colnome É exibido numa DbGrid o código, o nome da coletanea e a quantidade de cds que estão em cada coletanea. A tabela CD guarda informação do CD, e a tabela CD_Coletanea tem uma chave primária (normal) e duas chaves estrangeiras, uma guarda o código do cd e a outra o código da coletanea, fazendo assim a ligação entre os dois. Eis o problema: quando eu crio uma coletanea e não adiciono nenhum cd nela, ela não aparece na dbgrid. Só aparece quando eu adiciono pelo menos um cd nela. Alguém tem alguma sugestão do que poderia fazer? Rodrigo Tognin Estudante e estagiário Técnico em informática ESALQ/USP - IPEF -- 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
[delphi-br] Query não funciona
Boa tarde pessoal, tenho o seguinte código numa query: select coletanea.colcodigo, coletanea.colnome, count (cd_coletanea.codigo) as [total] from coletanea, cd_coletanea, dono where coletanea.colcodigo = cd_coletanea.codigocoletanea AND coletanea.coldono = dono.donocodigo AND dono.donocodigo = :CodigoDono group by coletanea.colcodigo, coletanea.colnome É exibido numa DbGrid o código, o nome da coletanea e a quantidade de cds que estão em cada coletanea. A tabela CD guarda informação do CD, e a tabela CD_Coletanea tem uma chave primária (normal) e duas chaves estrangeiras, uma guarda o código do cd e a outra o código da coletanea, fazendo assim a ligação entre os dois. Eis o problema: quando eu crio uma coletanea e não adiciono nenhum cd nela, ela não aparece na dbgrid. Só aparece quando eu adiciono pelo menos um cd nela. Alguém tem alguma sugestão do que poderia fazer? Rodrigo Tognin Estudante e estagiário Técnico em informática ESALQ/USP - IPEF -- 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
Re: [delphi-br] Query não funciona
Amigo tente utilizar LEFT JOIN conforme te orientei anteriormente!! Da maneira que vc colocou (coletanea.colcodigo = cd_coletanea.codigocoletanea) só vai trazer se tiver registro nas duas tabelas e o LEFT JOIN vai trazer mesmo se a tabela cd_coletanea não tenha registro!! Um abraço, Vanderson Sá Rodrigo Tognin [EMAIL PROTECTED] escreveu: Boa tarde pessoal, tenho o seguinte código numa query: select coletanea.colcodigo, coletanea.colnome, count (cd_coletanea.codigo) as [total] from coletanea, cd_coletanea, dono where coletanea.colcodigo = cd_coletanea.codigocoletanea AND coletanea.coldono = dono.donocodigo AND dono.donocodigo = :CodigoDono group by coletanea.colcodigo, coletanea.colnome É exibido numa DbGrid o código, o nome da coletanea e a quantidade de cds que estão em cada coletanea. A tabela CD guarda informação do CD, e a tabela CD_Coletanea tem uma chave primária (normal) e duas chaves estrangeiras, uma guarda o código do cd e a outra o código da coletanea, fazendo assim a ligação entre os dois. Eis o problema: quando eu crio uma coletanea e não adiciono nenhum cd nela, ela não aparece na dbgrid. Só aparece quando eu adiciono pelo menos um cd nela. Alguém tem alguma sugestão do que poderia fazer? Rodrigo Tognin Estudante e estagiário Técnico em informática ESALQ/USP - IPEF -- 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] Yahoo! Grupos, um serviço oferecido por: - 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 Termos do Serviço do Yahoo!. Vanderson de Sá Programador Tel.: (21) 9243-7035 [EMAIL PROTECTED] - Promoção Yahoo! Acesso Grátis: a cada hora navegada você acumula cupons e concorre a mais de 500 prêmios! Participe! [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 * 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
Re: [delphi-br] Query não funciona
experimente colocar um OR nos dois codigos qdo forem nullos ou qdo vc incluir colocar o codigo nos campos!! Em 19/10/05, Rodrigo Tognin[EMAIL PROTECTED] escreveu: Boa tarde pessoal, tenho o seguinte código numa query: select coletanea.colcodigo, coletanea.colnome, count (cd_coletanea.codigo) as [total] from coletanea, cd_coletanea, dono where coletanea.colcodigo = cd_coletanea.codigocoletanea AND coletanea.coldono = dono.donocodigo AND dono.donocodigo = :CodigoDono group by coletanea.colcodigo, coletanea.colnome É exibido numa DbGrid o código, o nome da coletanea e a quantidade de cds que estão em cada coletanea. A tabela CD guarda informação do CD, e a tabela CD_Coletanea tem uma chave primária (normal) e duas chaves estrangeiras, uma guarda o código do cd e a outra o código da coletanea, fazendo assim a ligação entre os dois. Eis o problema: quando eu crio uma coletanea e não adiciono nenhum cd nela, ela não aparece na dbgrid. Só aparece quando eu adiciono pelo menos um cd nela. Alguém tem alguma sugestão do que poderia fazer? Rodrigo Tognin Estudante e estagiário Técnico em informática ESALQ/USP - IPEF -- 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 -- Alvaro Esteves Alves Consultoria em Delphi 11 8214 - 7819 [EMAIL PROTECTED] The information contained in this message and in the attached files are restricted, and its confidentiality protected by law. In case you are not the addressee, be aware that the reading, spreading and copy of this message is unauthorized. Please, delete this message and notify the sender. The improper use of this information will be treated according the company's internal rules and legal laws. -- 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
Re: [delphi-br] Query + DataSetProvider + ClientDataSet
Bom dia alexandre. Pode ser que DataSetProvider não esteja conseguindo gerar o update correto com base no seu select, pois envolve joins. Vc pode habilitar o stop on delphi exceptions e comprovar isso. Vc tem várias saídas: 1 - manualmente fornecer o update no BeforeUpdateRecord do DSP 2 - Configurar os providerFlags dos TFields do DataSet e instruir o DSP a utilizá-los no where 3 - Além do passo 2, fornecer o nome da tabela no OnGetTableName do DSP Eduardo Campelo - Original Message - From: Alexandre Yahoo To: delphi-br@yahoogrupos.com.br Sent: Monday, October 03, 2005 1:25 PM Subject: [delphi-br] Query + DataSetProvider + ClientDataSet Fala galera...po meu problema eh o seguinte... eu coloquei Uma Query, Um DataSetProvider e um ClientDataSet para naum ter q fazer um código para Update(naum vai ter inserção nem deleção) ... Eu dou os comandos ClienteDataSet.Edit ClienteDataSet.FieldByName(campo)asTipo := Variavel... ClienteDataSet.Post; ClienteDataSet.ApplayUpdates(0); Há Algo d errado neste código? pois naum consigo midificar os dados...o meu select tem join mas naum sei c isto influencía... vlw galera... [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] Yahoo! Grupos, um serviço oferecido por: -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.344 / Virus Database: 267.11.9/116 - Release Date: 30/09/05 [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 * 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] Query + DataSetProvider + ClientDataSet
Quando vc faz relacionamento via SQL e faz alterações e manda gravarnão...funciona..somente Com uma tabela...para funcionar vc vai ter que fazer esqueme mestre/detalhe Ou fazer os updates na mão Rodrigo Mota Consultor de Informática Respec Recursos Humanos -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alexandre Yahoo Enviada em: segunda-feira, 3 de outubro de 2005 13:25 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Query + DataSetProvider + ClientDataSet Fala galera...po meu problema eh o seguinte... eu coloquei Uma Query, Um DataSetProvider e um ClientDataSet para naum ter q fazer um código para Update(naum vai ter inserção nem deleção) ... Eu dou os comandos ClienteDataSet.Edit ClienteDataSet.FieldByName(campo)asTipo := Variavel... ClienteDataSet.Post; ClienteDataSet.ApplayUpdates(0); Há Algo d errado neste código? pois naum consigo midificar os dados...o meu select tem join mas naum sei c isto influencía... vlw galera... [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] Yahoo! Grupos, um serviço oferecido por: http://br.i1.yimg.com/br.yimg.com/i/br/ads6/160905_pop_celsamsung_camdi g.gif _ 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] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do http://br.yahoo.com/info/utos.html Serviço do Yahoo!. [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 * 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
Re: [delphi-br] Query + DataSetProvider + ClientDataSet
Altere essa propriedade do DataSetProvider updatemode = upWhereKeyOnly Verifique os providerflags dos fields do clientdataset Epecifique melhor o seu problema para ser mais facil a solução - Original Message - From: Rodrigo Mota To: delphi-br@yahoogrupos.com.br Sent: Monday, October 03, 2005 4:33 PM Subject: RES: [delphi-br] Query + DataSetProvider + ClientDataSet Quando vc faz relacionamento via SQL e faz alterações e manda gravarnão...funciona..somente Com uma tabela...para funcionar vc vai ter que fazer esqueme mestre/detalhe Ou fazer os updates na mão Rodrigo Mota Consultor de Informática Respec Recursos Humanos -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alexandre Yahoo Enviada em: segunda-feira, 3 de outubro de 2005 13:25 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Query + DataSetProvider + ClientDataSet Fala galera...po meu problema eh o seguinte... eu coloquei Uma Query, Um DataSetProvider e um ClientDataSet para naum ter q fazer um código para Update(naum vai ter inserção nem deleção) ... Eu dou os comandos ClienteDataSet.Edit ClienteDataSet.FieldByName(campo)asTipo := Variavel... ClienteDataSet.Post; ClienteDataSet.ApplayUpdates(0); Há Algo d errado neste código? pois naum consigo midificar os dados...o meu select tem join mas naum sei c isto influencía... vlw galera... [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] Yahoo! Grupos, um serviço oferecido por: http://br.i1.yimg.com/br.yimg.com/i/br/ads6/160905_pop_celsamsung_camdi g.gif _ 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] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do http://br.yahoo.com/info/utos.html Serviço do Yahoo!. [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] Yahoo! Grupos, um serviço oferecido por: -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- Internal Virus Database is out-of-date. Checked by AVG Anti-Virus. Version: 7.0.344 / Virus Database: 267.11.6/111 - Release Date: 23/9/2005 [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 * 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
[delphi-br] query com limite de tempo
Pessoal, Bom dia !! Tenho uma aplicação onde utilizo uma query(BDE-Tquery) que eu gostaria de limitar tempo de execução para ela query. Ou seja, ela ficar executando por determinado periodo de tempo, trazendo ou não resultado. Isso é possível ??? Já agradeço a todos pela atenção, Joel. Joel da Silva Lino -- Desenvolvedor [EMAIL PROTECTED] __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ -- 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
[delphi-br] Query SQL
Boa tarde pessoal... Estou tentando fazer um filtro num query sql, para só mostrar no resultado os clientes que tem o inicio do contrato com od dias 05, 10, 15, 20, 25 e 30. Estou tentando com o ... LIKE %5% ou o ... LIKE 5% para o dia 05, por exemplo, mas não está mostrando resultado nenhum. O campo está formatado como data e existem clientes com a data 5/8/2005. É necessário outra formatação no código SQL para filtrar datas? Agradeço qualquer ajuda. -- _ Bruno Faria [EMAIL PROTECTED] (71) 9931-9429 / (75) 9974-7371 ** Ajude a combater o Spam: envie msgs com destinatário oculto Bcc ou Cco ** -- 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
Re: [delphi-br] Query SQL
Tá na mão, SELECT * FROM CLIENTES where (DT_CONTRATO is not null) and (Extract(day from DT_CONTRATO) IN (5,10,15,20,25,30)) att. Fernando Mangussi Em 18/08/05, Bruno Faria [EMAIL PROTECTED] escreveu: Boa tarde pessoal... Estou tentando fazer um filtro num query sql, para só mostrar no resultado os clientes que tem o inicio do contrato com od dias 05, 10, 15, 20, 25 e 30. Estou tentando com o ... LIKE %5% ou o ... LIKE 5% para o dia 05, por exemplo, mas não está mostrando resultado nenhum. O campo está formatado como data e existem clientes com a data 5/8/2005. É necessário outra formatação no código SQL para filtrar datas? Agradeço qualquer ajuda. -- _ Bruno Faria [EMAIL PROTECTED] (71) 9931-9429 / (75) 9974-7371 ** Ajude a combater o Spam: envie msgs com destinatário oculto Bcc ou Cco ** -- 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][EMAIL PROTECTED] - O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html. [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 * 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] QUERY
Ô carinha, tu não verifica os e-mails não??? Já te responderam, olha aí abaixo: QrConta.Close; QrConta.SQL.Clear; QrConta.SQL.Add('SELECT Codigo, Conta ||' + ' ' + '|| Titular1 As Descricao'); QrConta.SQL.Add('From BCOCOC.dbf Conta'); QrConta.Open; Isso Resolve Eduardo _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de F D Enviada em: quarta-feira, 22 de junho de 2005 16:24 Para: Delphi Grupo; Grupo Delphi Assunto: [delphi-br] QUERY Alguem ai sabe qual o erro que essa query tem. ela não está concatenado os valores. No Sql Funciona, Mas quando passo para o delphi não. QrConta.Close; QrConta.SQL.Clear; QrConta.SQL.Add('SELECT Codigo, Conta ||' '|| Titular1 As Descricao'); QrConta.SQL.Add('From BCOCOC.dbf Conta'); QrConta.Open; Grato Francisco __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ [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 * 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] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos http://br.yahoo.com/info/utos.html do Serviço do Yahoo!. [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 * 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
[delphi-br] QUERY
Alguem ai sabe qual o erro que essa query tem. ela não está concatenado os valores. No Sql Funciona, Mas quando passo para o delphi não. QrConta.Close; QrConta.SQL.Clear; QrConta.SQL.Add('SELECT Codigo, Conta ||' '|| Titular1 As Descricao'); QrConta.SQL.Add('From BCOCOC.dbf Conta'); QrConta.Open; Grato Francisco __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ [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 * 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
[delphi-br] QUERY
Alguem ai sabe qual o erro que essa query tem. ela não está concatenado os valores. No Sql Funciona, Mas quando passo para o delphi não. QrConta.Close; QrConta.SQL.Clear; QrConta.SQL.Add('SELECT Codigo, Conta ||' '|| Titular1 As Descricao'); QrConta.SQL.Add('From BCOCOC.dbf Conta'); QrConta.Open; Grato Francisco __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ [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 * 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
Re: [delphi-br] QUERY
QrConta.Close; QrConta.SQL.Clear; QrConta.SQL.Add('SELECT Codigo, Conta ||' + ' ' + '|| Titular1 As Descricao'); QrConta.SQL.Add('From BCOCOC.dbf Conta'); QrConta.Open; Isso Resolve Eduardo - Original Message - From: F D To: Delphi Grupo ; Grupo Delphi Sent: Wednesday, June 22, 2005 3:22 PM Subject: [delphi-br] QUERY Alguem ai sabe qual o erro que essa query tem. ela não está concatenado os valores. No Sql Funciona, Mas quando passo para o delphi não. QrConta.Close; QrConta.SQL.Clear; QrConta.SQL.Add('SELECT Codigo, Conta ||' '|| Titular1 As Descricao'); QrConta.SQL.Add('From BCOCOC.dbf Conta'); QrConta.Open; Grato Francisco __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ [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 a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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 * 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
Re: [delphi-br] Query
Artur, Acho que vc entendeu o espírito da coisa, e agora como monto essa query? Artur Guerra [EMAIL PROTECTED] escreveu: Se a estrutura da sua tabela for assim dá. Mas como eu acho q a sua estrutura não é assim, acho que seria melhor assim: Produto Qtd COR CONT_COR 10 Cor_Azul 4 YY 15 Cor_Azul 9 Em 10/06/05, Edivaldo David escreveu: Dá pra montar uma query assim? Produto Qtd Cor_Azul 10 4 YY 15 9 Lembrando que Qtd é a quantidade total do produto. - Yahoo! Mail: agora com 1GB de espaço grátis. Abra sua conta! [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 -- Artur Rodrigo Guerra mail: [EMAIL PROTECTED] skype: arturguerra [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 - 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 * 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
Re: [delphi-br] Query
Qual é a estrutura das tabelas ? Em 20/06/05, Edivaldo David [EMAIL PROTECTED] escreveu: Artur, Acho que vc entendeu o espírito da coisa, e agora como monto essa query? Artur Guerra [EMAIL PROTECTED] escreveu: Se a estrutura da sua tabela for assim dá. Mas como eu acho q a sua estrutura não é assim, acho que seria melhor assim: Produto Qtd COR CONT_COR 10 Cor_Azul 4 YY 15 Cor_Azul 9 Em 10/06/05, Edivaldo David escreveu: Dá pra montar uma query assim? Produto Qtd Cor_Azul 10 4 YY 15 9 Lembrando que Qtd é a quantidade total do produto. - Yahoo! Mail: agora com 1GB de espaço grátis. Abra sua conta! [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 -- Artur Rodrigo Guerra mail: [EMAIL PROTECTED] skype: arturguerra [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 - 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 -- Artur Rodrigo Guerra mail: [EMAIL PROTECTED] skype: arturguerra [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 * 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
Re: [delphi-br] Query
possvel se estiver algum campo relacionado com esta tabela, me diz a estrutura das duas tabelas que monto a query para voce! Ricardo Cerqueira On 6/15/05, Eduardo [EMAIL PROTECTED] wrote: Acho q vc quer colocar as areas nas colunas. Ento vc tera q construir varios union. Exemplo select Data as Data, livros as livros, Sum(QTD) AS Quantidade de Livros, Sum(Matematica) as Matematica, Sum(Portugues) as Portugues from ( SELECT DATA AS Data, '' as Tipo, Count(*) as QTD, 0 as Matematica, 0 as Portugues from livros where livros in ('matematica', 'portugues') group by data, livros union all SELECT DATA AS Data, livros as livros, 0 as QTD, Count(*) as Matematica, 0 as Portugues from livros where livros = 'matematica' group by data, livros union all SELECT DATA AS Data, livros as livros, 0 as QTD, 0 as Matematica, Count(*) as Portugues from livros where livros = 'portugues' group by data, livros) group by data, livros Isto com certeza funciona no Oracle no sei qual o seu banco e nem se exatamente isso q vc quer, mas esta ai. Eduardo Ps.: QQ entre em contato pelo MSN [EMAIL PROTECTED] ou em PVT. - Original Message - From: Edivaldo David To: delphi-br Sent: Tuesday, June 14, 2005 8:18 PM Subject: [delphi-br] Query Acho que no fui muito claro na minha pergunta, vou tentar demonstrar o que eu quero com outro exemplo, vamos supor uma biblioteca: (Aqui eu quero saber dentro do total emprest. qtos eram de uma rea especfica, Matemtica por DATA QTD_DE_LIVROS_EMPRESTADOS exemplo) 01/06 80 15 02/06 90 20 03/06 100 25 Lembrando que a rea do livro est em seu cadastro. isso possvel? - Yahoo! Mail: agora com 1GB de espao grtis. Abra sua conta! [As partes desta mensagem que no 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 a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que voc faz do Yahoo! Grupos est sujeito aos Termos do Servio do Yahoo!. [As partes desta mensagem que no 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 [As partes desta mensagem que no 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 * 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
Re: [delphi-br] Query
Acho q vc quer colocar as areas nas colunas. Então vc tera q construir varios union. Exemplo select Data as Data, livros as livros, Sum(QTD) AS Quantidade de Livros, Sum(Matematica) as Matematica, Sum(Portugues) as Portugues from ( SELECT DATA AS Data, '' as Tipo, Count(*) as QTD, 0 as Matematica, 0 as Portugues from livros where livros in ('matematica', 'portugues') group by data, livros union all SELECT DATA AS Data, livros as livros, 0 as QTD, Count(*) as Matematica, 0 as Portugues from livros where livros = 'matematica' group by data, livros union all SELECT DATA AS Data, livros as livros, 0 as QTD, 0 as Matematica, Count(*) as Portugues from livros where livros = 'portugues' group by data, livros) group by data, livros Isto com certeza funciona no Oracle não sei qual é o seu banco e nem se exatamente isso q vc quer, mas esta ai. Eduardo Ps.: QQ entre em contato pelo MSN [EMAIL PROTECTED] ou em PVT. - Original Message - From: Edivaldo David To: delphi-br Sent: Tuesday, June 14, 2005 8:18 PM Subject: [delphi-br] Query Acho que não fui muito claro na minha pergunta, vou tentar demonstrar o que eu quero com outro exemplo, vamos supor uma biblioteca: (Aqui eu quero saber dentro do total emprest. qtos eram de uma área específica, Matemática por DATA QTD_DE_LIVROS_EMPRESTADOS exemplo) 01/0680 15 02/0690 20 03/06100 25 Lembrando que a área do livro está em seu cadastro. isso é possível? - Yahoo! Mail: agora com 1GB de espaço grátis. Abra sua conta! [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 a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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 * 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
[delphi-br] Query
Acho que não fui muito claro na minha pergunta, vou tentar demonstrar o que eu quero com outro exemplo, vamos supor uma biblioteca: (Aqui eu quero saber dentro do total emprest. qtos eram de uma área específica, Matemática por DATA QTD_DE_LIVROS_EMPRESTADOS exemplo) 01/0680 15 02/0690 20 03/06100 25 Lembrando que a área do livro está em seu cadastro. isso é possível? - Yahoo! Mail: agora com 1GB de espaço grátis. Abra sua conta! [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 * 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
[delphi-br] Query
Dá pra montar uma query assim? ProdutoQtd Cor_Azul 10 4 YY 15 9 Lembrando que Qtd é a quantidade total do produto. - Yahoo! Mail: agora com 1GB de espaço grátis. Abra sua conta! [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 * 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
Re: [delphi-br] Query
Se a estrutura da sua tabela for assim dá. Mas como eu acho q a sua estrutura não é assim, acho que seria melhor assim: Produto Qtd COR CONT_COR 10 Cor_Azul 4 YY 15 Cor_Azul 9 Em 10/06/05, Edivaldo David [EMAIL PROTECTED] escreveu: Dá pra montar uma query assim? Produto Qtd Cor_Azul 10 4 YY 15 9 Lembrando que Qtd é a quantidade total do produto. - Yahoo! Mail: agora com 1GB de espaço grátis. Abra sua conta! [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 -- Artur Rodrigo Guerra mail: [EMAIL PROTECTED] skype: arturguerra [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 * 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
Re: [delphi-br] Query abrindo TXT
esse endereço ajuda http://tinyurl.com/5dj4u []´s Rodrigo O. Farias - Original Message - From: Nivaldo Stainle To: delphi-br@yahoogrupos.com.br Sent: Thursday, May 12, 2005 3:07 PM Subject: Re: [delphi-br] Query abrindo TXT onde encontro este componente Stainle Diogo de Oliveira Cunha [EMAIL PROTECTED] escreveu: Com a query nao sei, mas se voce usar o componente rxmemorytable da RXLib, tem como fazzer com um pe nas costas . . . []´s On 5/12/05, stainle2003 [EMAIL PROTECTED] wrote: será que consigo no QUERY da Paleta DATA ACCESS abrir um arquivo '.txt' para colocar no DBGRID por exemplo ou tenho que importá-lo para uma base PARADOX por exemplo para poder fazer isto ? grato Stainle -- 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 -- Todos os deuses são um deus, e todas as deusas são uma deusa, e há apenas um iniciador. E cada homem a sua verdade, e Deus com ela. -- 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] Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE - 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 Termos do Serviço do Yahoo!. - Yahoo! Mail: agora com 1GB de espaço grátis. Abra sua conta! [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] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE 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 Termos do Serviço do Yahoo!. -- 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
[delphi-br] Query abrindo TXT
será que consigo no QUERY da Paleta DATA ACCESS abrir um arquivo '.txt' para colocar no DBGRID por exemplo ou tenho que importá-lo para uma base PARADOX por exemplo para poder fazer isto ? grato Stainle -- 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
RES: [delphi-br] Query abrindo TXT
Não mesmo! Nem chance! Se vc estiver usando BDE, existe uma maneira de abrir um TXT delimitado como se fosse um TTable! Sugiro que vc pesquise sobre isso! Como dica, consulte o arquivo BDE32.HLP que vem com o Delphi! []s -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de stainle2003 Enviada em: quinta-feira, 12 de maio de 2005 12:51 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Query abrindo TXT será que consigo no QUERY da Paleta DATA ACCESS abrir um arquivo '.txt' para colocar no DBGRID por exemplo ou tenho que importá-lo para uma base PARADOX por exemplo para poder fazer isto ? grato Stainle -- 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 -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.11.9 - Release Date: 12/05/2005 -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.11.9 - Release Date: 12/05/2005 * Esta mensagem, incluindo os seus anexos, contém informações confidenciais destinadas a indivíduo e propósito específicos, e é protegida por lei. Caso você não seja o citado indivíduo, deve apagá-la imediatamente. É terminantemente proibida a utilização, acesso, cópia ou divulgação não autorizada das informações presentes neste email. As informações contidas nesta mensagem e em seus anexos são de responsabilidade de seu autor, não representando idéias, opiniões, pensamentos ou qualquer forma de posicionamento por parte da Fundação Desembargador Paulo Feitoza. The information contained in this communication is confidential, is law protected, and is intended only for the business use of the addressee. If you have received this communication in error, please immediately delete it. It's forbidden the unauthorized use, access, copy or disclose of the information contained in this communication. The content of this message is responsibility of the author, and does not represent ideas, opinions, thoughts or any kind of statement of Fundação Desembargador Paulo Feitoza. -- 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
Re: [delphi-br] Query abrindo TXT
Com a query nao sei, mas se voce usar o componente rxmemorytable da RXLib, tem como fazzer com um pe nas costas . . . []´s On 5/12/05, stainle2003 [EMAIL PROTECTED] wrote: será que consigo no QUERY da Paleta DATA ACCESS abrir um arquivo '.txt' para colocar no DBGRID por exemplo ou tenho que importá-lo para uma base PARADOX por exemplo para poder fazer isto ? grato Stainle -- 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 -- Todos os deuses são um deus, e todas as deusas são uma deusa, e há apenas um iniciador. E cada homem a sua verdade, e Deus com ela. -- 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
Re: [delphi-br] Query abrindo TXT
onde encontro este componente Stainle Diogo de Oliveira Cunha [EMAIL PROTECTED] escreveu: Com a query nao sei, mas se voce usar o componente rxmemorytable da RXLib, tem como fazzer com um pe nas costas . . . []´s On 5/12/05, stainle2003 [EMAIL PROTECTED] wrote: será que consigo no QUERY da Paleta DATA ACCESS abrir um arquivo '.txt' para colocar no DBGRID por exemplo ou tenho que importá-lo para uma base PARADOX por exemplo para poder fazer isto ? grato Stainle -- 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 -- Todos os deuses são um deus, e todas as deusas são uma deusa, e há apenas um iniciador. E cada homem a sua verdade, e Deus com ela. -- 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] Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE - 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 Termos do Serviço do Yahoo!. - Yahoo! Mail: agora com 1GB de espaço grátis. Abra sua conta! [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 * 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
[delphi-br] Query Read-Only
Bom dia pessoal, alguem poderia me dizer como posso resolver essa mensagem de erro que tem dado no programa ? Nao tenho como usar uma dbgrid ligada a uma query e editar os registros ?? Fiz o mesmo procedimento com uma TTable e funcionou normalmente, mas quanto passo para uma query, me da a mensagem Obrigado e uma boa semana a todos Adalberto [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 * 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
Re: [delphi-br] Query e RecordCount
Antes de utilizar o RecordCount coloque o seguinte comando: Query.FetchAll Um abraço, Fabiano Catrinck - Programador Softguild Informática Ltda www.softguild.com.br ICQ 178241485 -- 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
[delphi-br] Query e RecordCount
Boa noite amigos Estou enfrentando um problema com o componente da classe TQuery e a sua propriedade RecordCount ... ... acontece que, quando a SQL é simples ... por exemplo: --- Select * from cq_ativ.db where codigo = '99' --- ... e o registro com o código 99 não existe ... e abro o Query com o comando Open ... tudo blz ... a propriedade RecordCount dele é = a 0. Tudo bem até aqui ... só que quando uso instruções SQL um pouquinho mais complexas ... contendo o comando SUM por exemplo, e envolvendo 2 tabelas ou mais ... mesmo não encontrando nenhum registro que satisfaça a condição ... teoricamente teríamos RecordCount = 0 ... mas não é o que esta acontecendo ... nesse caso ... quando não foi encontrado nenhum registro ... a propriedade RecordCount = 1 ... ! E isso tá complicando a minha vida ... Alguém já passou por situação parecida ?? Estou usando Delphi 6 ... e tabelas piradoidox ... Estou enviando tb a instrução SQL ... pra quem tiver disponibilidade de dar uma olhada. Desde já obrigado a todos. Att. Hélder SQL: SELECT Cq_dd.CodCQ_MOEDA , Cq_dd.CodCQ_CLASS , Cq_ApClas.Classe , Cq_dd.QuantInsumo , Cq_dd.CustoUnitario , (Cq_insum.Descricao ) as Insumo , (sum(Cq_fatpl.QuantidadeNaoAcumulada * Cq_dd.QuantInsumo * Cq_dd.CustoUnitario ) ) as CustoExec FROM Cq_fatpl.DB Cq_fatpl , Cq_insum.DB Cq_insum , Cq_dd.DB Cq_dd , Cq_ApClas.DB Cq_ApClas WHERE (Cq_fatpl.CodCQ_ATIV = Cq_dd.CodCQ_ATIV ) AND (Cq_dd.CodCQ_INSUM = Cq_insum.CodCQ_INSUM ) AND (Cq_dd.CodCQ_CLASS = Cq_ApClas.CodCQ_CLASS ) AND (Cq_fatpl.CodCQ_ATIV = :Atividade ) AND (Cq_fatpl.Periodo = :Periodo ) GROUP BY (Cq_insum.Descricao ) , Cq_dd.CodCQ_CLASS , Cq_dd.CodCQ_MOEDA , Cq_ApClas.Classe , Cq_dd.QuantInsumo , Cq_dd.CustoUnitario ORDER BY Cq_dd.CodCQ_CLASS , Cq_ApClas.Classe , Cq_dd.CodCQ_MOEDA , Insumo --- -- 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
[delphi-br] Query acces com parametro
Ola... Como fazer p/ que consultas no access 97 utilizando parametros em valores monetarios sejam exibidas de forma correta, pois o resultado de minha query retorna valores inconsistentes. Quero fazer com que me retorne valores maiores ou iguais a um valor que devera ser informado como parametro em um edit. Grato pela ajuda! [] Paulo -- 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
Res: Re: [delphi-br] Query
Muito obrigado por oferecer-se a me ajudar, o problema é o seguinte: queria uma consulta utilizando um edit normal e um dbgrid, no vb utilizava o evento keypress, quero que a medida que vou digitando a palavra se realiza uma consulta do banco de dados mostrando os valores no dbgrid que correspondam com o que estou digitando. eu utilizava o curinga no select select campo, campo2 from tabela1 where campo like %edit1.text% Peço desculpas por fazer uma pergunta tão basica, mas é que to aprendendo a programar com Delphi. Grato Miguel Villacorta 4446-4100 ramal 4126 [EMAIL PROTECTED] www.dpfautopecas.com.br ---Mensagem original--- De: delphi-br@yahoogrupos.com.br Data: 02/20/05 01:52:30 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Query HI, tudo bom camarada coloquei 2 apostilas que tratam do uso de SQL, tabelas, etc. mas vc poderia por exemplo dizer qual a sua dificuldade, tipos de como criar uma SQL para ser usadas com parametros no Delphi, etc. qualquer coisa eu faço um pequeno exemplo e mando para teu email Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 --- villacortamiguel [EMAIL PROTECTED] escreveu: Pessoal, alguem possui e poderia enviar algum material de como trabalhar com consultas no delphi, segui o conselho de muitos e procurei na net, mas achei muito pouco. Grato Miguel -- 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 http://br.yahoo.com/info/utos.html ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso yahoo.com/ - Internet rápida e grátis -- 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 -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.2.0 - Release Date: 21/2/2005 . -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.2.0 - Release Date: 21/2/2005 [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 * 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: Re: [delphi-br] Query
estou utilizando delphi 7 com BDE Miguel Villacorta 4446-4100 ramal 4126 [EMAIL PROTECTED] www.dpfautopecas.com.br ---Mensagem original--- De: delphi-br@yahoogrupos.com.br Data: 02/21/05 16:11:47 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Query Oi Miguel, entao vc nao procurou direito, exemplos de acesso a banco de dados tem milhares pela net. De mais detalhes, qual banco, qual tecnologia de acesso (BDE, ADO, etc), qual versao do Delphi. Com esse dados fica mais facil indicar algum site para que vc pegue exemplos do que vc precisa. []´s Rodrigo O. Farias - Original Message - From: villacortamiguel To: delphi-br@yahoogrupos.com.br Sent: Saturday, February 19, 2005 4:02 PM Subject: [delphi-br] Query Pessoal, alguem possui e poderia enviar algum material de como trabalhar com consultas no delphi, segui o conselho de muitos e procurei na net, mas achei muito pouco. Grato Miguel -- 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] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE 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 Termos do Serviço do Yahoo!. -- 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 -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.2.0 - Release Date: 21/2/2005 . -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.2.0 - Release Date: 21/2/2005 [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 * 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
[delphi-br] Query
Pessoal, alguem possui e poderia enviar algum material de como trabalhar com consultas no delphi, segui o conselho de muitos e procurei na net, mas achei muito pouco. Grato Miguel -- 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
Re: [delphi-br] Query
HI, tudo bom camarada coloquei 2 apostilas que tratam do uso de SQL, tabelas, etc. mas vc poderia por exemplo dizer qual a sua dificuldade, tipos de como criar uma SQL para ser usadas com parametros no Delphi, etc. qualquer coisa eu faço um pequeno exemplo e mando para teu email Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 --- villacortamiguel [EMAIL PROTECTED] escreveu: Pessoal, alguem possui e poderia enviar algum material de como trabalhar com consultas no delphi, segui o conselho de muitos e procurei na net, mas achei muito pouco. Grato Miguel -- 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 http://br.yahoo.com/info/utos.html ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- 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
[delphi-br] Query e Table com DBGrid
Oi, tenho uma dúvida. Antes de levar esporro: já procurei no google e no help. hehehehehehehehehe Tenho um DBGrid associado a um TQuery com consulta filtrada. Quero fazer alterações (tipo excluir, atualizar, etc). Não consigo. A solução que encontrei foi colocar um TTable e criar uma rotina que seleciona o mesmo do TQuery no TTable. Tem como sincronizar isto, sem usar a propriedade filter do Ttable? Abraços, Márcio Frossard -- 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
Re: [Possível Spam] [delphi-br] Query e Table com DBGrid
Qual banco de dados vc esta utilizando.. paradox ,firebird...? Se for paradox para que os resultados feitos na TQuery reflitam na Table vc tem que setar a propriedade da TQuery RequestLive para True. Teste ai e reporte novamente.. ok Fausto - Original Message - From: mrmabe [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, January 25, 2005 6:04 PM Subject: [Possível Spam] [delphi-br] Query e Table com DBGrid Oi, tenho uma dúvida. Antes de levar esporro: já procurei no google e no help. hehehehehehehehehe Tenho um DBGrid associado a um TQuery com consulta filtrada. Quero fazer alterações (tipo excluir, atualizar, etc). Não consigo. A solução que encontrei foi colocar um TTable e criar uma rotina que seleciona o mesmo do TQuery no TTable. Tem como sincronizar isto, sem usar a propriedade filter do Ttable? Abraços, Márcio Frossard -- 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 -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.4 - Release Date: 25/01/2005 -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.4 - Release Date: 25/01/2005 -- 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
Re: [delphi-br] Query
coloca outro componente query liga ele e no evento on exit dester campo data faça a verificaçao, se a data existe da o aviso de retorna o foco ao campo data. e-mail - [EMAIL PROTECTED] MSN - [EMAIL PROTECTED] Analista de Sistemas itamar roloff --- - Original Message - From: Daniel Coelho [EMAIL PROTECTED] To: delphi-br delphi-br@yahoogrupos.com.br Sent: Wednesday, January 12, 2005 9:48 PM Subject: [delphi-br] Query Olá para todos.. Tenho uma query que seu resultado é exibido em um DBGrid.. Quando dou 2 clicks na Grid, chama outro form com todos os campos desta query, é onde eu altero os dados.. O problema é que existe um campo de data, onde esta data não poderá repetir na tabela.. Portanto eu precisava, antes de dar o POST, verificar se a data informada existe, caso existir eu preciso dar um aviso e não deixar concluir, caso contrário, poderá ser salvo normalmente. Então quando estou anterando um certo registro da query e vou consultar os outros registros, simplesmente perco o registro atual (o que estavo alterando).. Acho que deu pra entender o que está acontecendo. Como que posso fazer este processo sem perder minhas informações ??? Utilizo Delphi 7, FireBird 1.5.. Atenciosamente, Daniel.. [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
Re: RES: RES: [delphi-br] Query
Gostaria de fazer um termômetro durante o processamento de uma Query, é possível? gProgresso: TGauge; .. procedure blabla... var _numreg, _numregtot : Integer; begin gProgresso.Progress := 0; _reg := 0; _regtot := suatabela.RecordCount; suatabela.disableControls; suatabela.first; while not suatabela.eof do begin .. Processamento inc(_numreg); gProgresso.Progress := round((_numreg*100)/_numregtot); end; suatabela.enablecontrols; end; Tente aí. Se achar que : suatabela.recordcount não irá funcionar (pois usas query e não table) coloque outra query, execute ela antes com o seguinte sql : SELECT COUNT(*) FROM SUATABELA para obter o número de registros. Agora tem aqueles detalhes de performance né...se você tem clausúlas where pra usar use nessa query também. Agora sim vai precisar de um termômetro... para medir a temperatura do processador. Essa procedure sugerida simplesmente enche um gauge depois que a query já aconteceu e, sinceramente, só serve para consumir processamento. O que realmente funcionaria seria algo como um evento tipo OnQueryProgress ou OnFetchProgress. Este presente no TADOQuery e aquele no TDBISAMQuery (que é pago). Se não me engano, já os vi em outros componentes nativos de acesso a dados. Para o TQuery existe uma solução meio tortuosa que vi uma vez no famigerado DTDelphi com o nome de Mostrando progresso de uma SQL. Hoje este arquivo de dicas em formato de help lançado por José J. Carvalho Júnior (Llovd Dickinson) está na versão 2.6 e pode ser baixado em http://200.241.52.8/meep/lloydsoft/download.php?download=1 Antigamente o Dick aparecia por aqui. Boa sorte. Att. -- Rodrigo Américo Cunha de Souza [EMAIL PROTECTED] ICQ# 4270625 -- 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
[delphi-br] Query
Olá Galera! Gostaria de fazer um termômetro durante o processamento de uma Query, é possível? Obrigado, Edivaldo David. - Yahoo! Mail - Agora com 250MB de espaço gratuito. Abra uma conta 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 * 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
Re: [delphi-br] Query
Edivaldo, Não entendi sua dúvida. Poderia explicar? Gostaria de fazer um termômetro durante o processamento de uma Query, é possível? Att. -- Rodrigo Américo Cunha de Souza [EMAIL PROTECTED] Skype: rodrigoamerico ICQ# 4270625 -- 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
RES: [delphi-br] Query
Ele deve tar querendo é fazer um progressbar ou um Gauge []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: Rodrigo Americo [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 9 de dezembro de 2004 08:00 Para: [EMAIL PROTECTED] Assunto: Re: [delphi-br] Query Edivaldo, Não entendi sua dúvida. Poderia explicar? Gostaria de fazer um termômetro durante o processamento de uma Query, é possível? Att. -- Rodrigo Américo Cunha de Souza [EMAIL PROTECTED] Skype: rodrigoamerico ICQ# 4270625 -- 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 [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 * 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
Re: [delphi-br] Query
Bom dia! Se estiver usando o ADO, é possível, nunca fiz, mas de uma olhada nos eventos OnFetchProgress e OnFetchComplete. Boa sorte. Ulisses - Original Message - From: Edivaldo David To: delphi-br Sent: Thursday, December 09, 2004 8:47 AM Subject: [delphi-br] Query Olá Galera! Gostaria de fazer um termômetro durante o processamento de uma Query, é possível? Obrigado, Edivaldo David. - Yahoo! Mail - Agora com 250MB de espaço gratuito. Abra uma conta 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] Yahoo! Grupos, um serviço oferecido por: -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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 * 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
Re: RES: [delphi-br] Query
Isso mesmo Walter, quem souber me ajude por favor. Edivaldo David. Walter Alves Chagas Junior [EMAIL PROTECTED] wrote: Ele deve tar querendo é fazer um progressbar ou um Gauge []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: Rodrigo Americo [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 9 de dezembro de 2004 08:00 Para: [EMAIL PROTECTED] Assunto: Re: [delphi-br] Query Edivaldo, Não entendi sua dúvida. Poderia explicar? Gostaria de fazer um termômetro durante o processamento de uma Query, é possível? Att. -- Rodrigo Américo Cunha de Souza [EMAIL PROTECTED] Skype: rodrigoamerico ICQ# 4270625 -- 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 [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 - Yahoo! Mail - Agora com 250MB de espaço gratuito. Abra uma conta 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 * 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
[delphi-br] Query não funciona
Pessoal, Em uma aplicação que estou desenvolvendo, tenho que controlar alguns intervalos de datas. Ex. não posso ter o mesmo usuário com datas de acesso iguais. Tenho na tela, dois componentes DateTimePicker (1 para data_inicio e outro p/data_final), e para o controle coloquei uma query que é chamada no evento onExit do DateTimePicker data_final. Com essa query, no sqlPlus obtenho o resultado correto, ou seja, o sql está correto, mas quando passo os parâmetros (e eles estão sendo passados corretamente, pois fiz o debug e vi que os valores passados são corretos) dentro do Delphi Estou usando o seguinte código no evento onExit do DateTimePicker data_final: with qryValidaData do begin Close; ParamByName( 'pUsu' ).AsString := Usuario.text; ParamByName( 'pInicio' ).AsDateTime := StrToDate (edtDatInicio.Text); ParamByName( 'pFim' ).AsDateTime:= StrToDate (edtDatFim.Text); Open; end; if qryValidaData.FieldByName( 'count' ).Value 0 then begin ShowMessage ('Já existe acesso para o usuário nessa data'); exit; end; No sqlPlus o valor do count = 3, mas no delphi se colocar um showmessage (IntToStr(count.Value)) o valor é sempre 0. Criei tb procedure e function e está acontecendo a mesma coisa, se executá-la fora do delphi o valor retornado é 3, mas no delphi é sempre = 0. query SELECT COUNT(*) FROMacesso V WHERE V.usu = :pUsu AND V.dt_inicio between TO_DATE(:pDataInicio, 'DD/MM/') AND TO_DATE(:pDataFinal, 'DD/MM/') AND V.dt_final between TO_DATE(:pDataInicio, 'DD/MM/') AND TO_DATE(:pDataFinal, 'DD/MM/') Por favor, não sei mais o que fazer, alguém pode me ajudar? Obrigada. -- 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
Re: [delphi-br] Query não funciona
Não entendi muito bem o que quer ... mas vamos lá ... O que voce queria não é ver se existe a data procurada ? Não seria mais facil com um campo Data somente ? Tabela ACESSOS Campos - Usuario e Data Select Count(Usuario) as Qtd From ACESSOS Where Data Between :pInicio and :pFinal Ou seja somente um campo data pois ali voce colocaria os dias acessados ... Depois no delphi ficaria: Query.Close; Query.ParamByName('pInicio').AsString := edtDatInicio.Text; Query.ParamByName('pFinal').AsString := edtDatFinal.Text; Query.Open; if (Query.RecordCount 0) then ShowMessage('Já foram feitos '+QueryQtd.AsString+' acessos nesta data.') else ShowMessage('Não existe acesso nesta data.'); * Acho que não precisa dois campo data na sua tabela, a não ser que sua intenção seja outra. Marcelo Silva Cel. 11 9693-4251 ICQ - 49224093 MSN [EMAIL PROTECTED] - Original Message - From: er83pet04 To: [EMAIL PROTECTED] Sent: Tuesday, November 16, 2004 10:38 AM Subject: [delphi-br] Query não funciona Pessoal, Em uma aplicação que estou desenvolvendo, tenho que controlar alguns intervalos de datas. Ex. não posso ter o mesmo usuário com datas de acesso iguais. Tenho na tela, dois componentes DateTimePicker (1 para data_inicio e outro p/data_final), e para o controle coloquei uma query que é chamada no evento onExit do DateTimePicker data_final. Com essa query, no sqlPlus obtenho o resultado correto, ou seja, o sql está correto, mas quando passo os parâmetros (e eles estão sendo passados corretamente, pois fiz o debug e vi que os valores passados são corretos) dentro do Delphi Estou usando o seguinte código no evento onExit do DateTimePicker data_final: with qryValidaData do begin Close; ParamByName( 'pUsu' ).AsString := Usuario.text; ParamByName( 'pInicio' ).AsDateTime := StrToDate (edtDatInicio.Text); ParamByName( 'pFim' ).AsDateTime:= StrToDate (edtDatFim.Text); Open; end; if qryValidaData.FieldByName( 'count' ).Value 0 then begin ShowMessage ('Já existe acesso para o usuário nessa data'); exit; end; No sqlPlus o valor do count = 3, mas no delphi se colocar um showmessage (IntToStr(count.Value)) o valor é sempre 0. Criei tb procedure e function e está acontecendo a mesma coisa, se executá-la fora do delphi o valor retornado é 3, mas no delphi é sempre = 0. query SELECT COUNT(*) FROMacesso V WHERE V.usu = :pUsu AND V.dt_inicio between TO_DATE(:pDataInicio, 'DD/MM/') AND TO_DATE(:pDataFinal, 'DD/MM/') AND V.dt_final between TO_DATE(:pDataInicio, 'DD/MM/') AND TO_DATE(:pDataFinal, 'DD/MM/') Por favor, não sei mais o que fazer, alguém pode me ajudar? Obrigada. -- 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] Yahoo! Grupos, um serviço oferecido por: -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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 * 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
Re: [delphi-br] Query simples, mas nem tanto.
O INNER JOIN é pra ligar o campo da tabela do FROM com outra... sendo que no resultado vão aparecer obrigatoriamente os registros do FROM que tiverem coinscidência com o INNER JOIN. Ou seja: nesse teu caso só vão aparecer os pedidos que tiverem itens. Pra filtrar o pedido armazenado na variável deves usar o WHERE no SQL. Podes fazer isso mudando a linha do SQL em tempo de execução, ou tentar usar um parâmetro no SQL. On Wed, 10 Nov 2004 13:46:06 -0300, Marcelo [EMAIL PROTECTED] wrote: Bem, entendi o básico dessa instrução, só não sei direito como funciona esse INNER JOIN. Após gravar o pedido, tenho uma variável global chamada CODPEDIDO onde armazeno o número do pedido (CODPED) que foi gerado na gravação. Como faço para nessa instrução SQL filtrar a tabela de pedidos por essa variável, e imprimir os itens pertencentes à este pedido? []´s Marcelo - Original Message - From: Sedinei Oliveira [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Wednesday, November 10, 2004 6:45 AM Subject: Re: [delphi-br] Query simples, mas nem tanto. SELECT PEDIDOS.CODPED, ITENSPED.QTD, ITENSPED.PRECO, (ITENSPED.QTD * ITENSPED.PRECO) AS VALOR FROM ITENSPED INNER JOIN PEDIDOS ON PEDIDOS.CODPED = ITENSPED.CODPED On Tue, 9 Nov 2004 18:03:38 -0300, Marcelo [EMAIL PROTECTED] wrote: Pessoal Tenho 2 tabelas, PEDIDOS e ITENSPED sendo (simplificadamente): PEDIDOS CodPed Integer ITENSPED CodPed Integer Qtd Real PrecoReal Como ficaria minha Query para que eu pudesse imprimir o pedido, que ficasse assim: PEDIDO: X QTDPRECO TOTAL 5 12,0060,00 2 20,0040,00 -- TOTAL PEDIDO: 100,00 Sou bem novato nisso, e fiz algumas tentativas mas gerou um monte de erros. Uso Delphi5 + ADO + Access Qualquer ajuda será muito bem vinda. Grato Marcelo [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 -- Sedinei K. Oliveira -- 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 -- Sedinei K. Oliveira -- 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
Re: [delphi-br] Query simples, mas nem tanto.
Bem, entendi o básico dessa instrução, só não sei direito como funciona esse INNER JOIN. Após gravar o pedido, tenho uma variável global chamada CODPEDIDO onde armazeno o número do pedido (CODPED) que foi gerado na gravação. Como faço para nessa instrução SQL filtrar a tabela de pedidos por essa variável, e imprimir os itens pertencentes à este pedido? []´s Marcelo - Original Message - From: Sedinei Oliveira [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Wednesday, November 10, 2004 6:45 AM Subject: Re: [delphi-br] Query simples, mas nem tanto. SELECT PEDIDOS.CODPED, ITENSPED.QTD, ITENSPED.PRECO, (ITENSPED.QTD * ITENSPED.PRECO) AS VALOR FROM ITENSPED INNER JOIN PEDIDOS ON PEDIDOS.CODPED = ITENSPED.CODPED On Tue, 9 Nov 2004 18:03:38 -0300, Marcelo [EMAIL PROTECTED] wrote: Pessoal Tenho 2 tabelas, PEDIDOS e ITENSPED sendo (simplificadamente): PEDIDOS CodPed Integer ITENSPED CodPed Integer Qtd Real PrecoReal Como ficaria minha Query para que eu pudesse imprimir o pedido, que ficasse assim: PEDIDO: X QTDPRECO TOTAL 5 12,0060,00 2 20,0040,00 -- TOTAL PEDIDO: 100,00 Sou bem novato nisso, e fiz algumas tentativas mas gerou um monte de erros. Uso Delphi5 + ADO + Access Qualquer ajuda será muito bem vinda. Grato Marcelo [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 -- Sedinei K. Oliveira -- 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
[delphi-br] Query simples, mas nem tanto.
Pessoal Tenho 2 tabelas, PEDIDOS e ITENSPED sendo (simplificadamente): PEDIDOS CodPed Integer ITENSPED CodPed Integer Qtd Real PrecoReal Como ficaria minha Query para que eu pudesse imprimir o pedido, que ficasse assim: PEDIDO: X QTDPRECO TOTAL 5 12,0060,00 2 20,0040,00 -- TOTAL PEDIDO: 100,00 Sou bem novato nisso, e fiz algumas tentativas mas gerou um monte de erros. Uso Delphi5 + ADO + Access Qualquer ajuda será muito bem vinda. Grato Marcelo [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 * 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
[delphi-br] Query : Dataset not in edit or insert mode
Pessoal, estou querendo fazer uma alteração nos dados de uma nota fiscal que ja existe dentro do banco de dados(paradox), mas acontece que não estou conseguindo fazer a alteração, estou usando edit para pesquisar a nota dentro do banco de dados, ela encontra a nota então tenho que alterar o valor, mas quando vou gravar as informações esta dando a seguinte mensagem Query : Dataset not in edit or insert mode, sei que é o problema do estado da tabela, não estar em modo de edição, mas tenho colocado um query.edit mas não esta dando certo. Tenho colocado meu código da seguinte forma: procedure TFrmAlteraDocumento.Edit3NumDocumentoExit(Sender: TObject); begin with DataModule1.QryConsulta do Begin Close; SQL.Clear; SQL.Add('Select * From Db_Protocolo'); SQL.Add('Where Transportador ='++Edit1CodTransportadora.Text+); SQL.add('And Tipo_Documento ='++Edit2TpDocumento.Text+); SQL.Add('And Documento ='++Edit3NumDocumento.Text+); DataModule1.QryConsulta.Open; end; if DataModule1.QryConsulta.FieldByName ('Documento').AsString'' Then Begin Edit4Valor.Text:= DataModule1.QryConsulta['Valor']; Edit5Data.Text := DataModule1.QryConsulta['Data']; end; with DataModule1.QryProtocolo do Begin Open; Edit; DataModule1.QryProtocoloVALOR.AsString := Edit4Valor.Text; DataModule1.QryProtocoloDATA.AsString := Edit5Data.Text; Refresh; ApplyUpdates; CommitUpdates; end; Agradeço a ajuda de vc, desde ja. Charlles Ferdinand -- 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
Re: [delphi-br] Query : Dataset not in edit or insert mode
acho que isso ajuda procedure TFrmAlteraDocumento.Edit3NumDocumentoExit(Sender: TObject); begin with DataModule1.QryConsulta do Begin Close; SQL.Clear; SQL.Add('Select * From Db_Protocolo'); SQL.Add('Where Transportador ='++Edit1CodTransportadora.Text+); SQL.add('And Tipo_Documento ='++Edit2TpDocumento.Text+); SQL.Add('And Documento ='++Edit3NumDocumento.Text+); DataModule1.QryConsulta.Open; end; if DataModule1.QryConsulta.FieldByName('Documento').AsString'' Then Begin Edit4Valor.Text:= DataModule1.QryConsulta['Valor']; Edit5Data.Text := DataModule1.QryConsulta['Data']; end; with DataModule1.QryProtocolo do Begin Open; Edit; DataModule1.QryProtocoloVALOR.AsString := Edit4Valor.Text; DataModule1.QryProtocoloDATA.AsString := Edit5Data.Text; *POST* Refresh; ApplyUpdates; CommitUpdates; end; Agradeço a ajuda de vc, desde ja. Charlles Ferdinand -- [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 * 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
Re: [delphi-br] Query doida
É isso aí... Comigo deu certo. - Original Message - From: Artur Anjos To: [EMAIL PROTECTED] Sent: Thursday, October 07, 2004 8:45 PM Subject: Re: [delphi-br] Query doida Eu já dei a solução: veja no seu componente de conexão a propriedade de Charaqcter Set. Use ISO8859_1 por exemplo. Artur Surrute - Yahoo! wrote: O q causa este erro são os acentos usandos dentro das strings, passo pelo mesmo problema e ainda não encontrei solução, mas percebi q se tirar os acentos não ocorre mais os erros, no entanto é muito difícil um usuario não usar acentos na entrada de dados... -- 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] Yahoo! Grupos, um serviço oferecido por: -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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 * 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
[delphi-br] Query doida
Será q alguém jah passou por isso? Estou usando FireBird 1.5, Delphi 7, e ClientDataSet + IBx. Qdo ativo uma certa query no delphi, q deveria trazer os campos CODIGO e DESCR, aparece o seguinte erro: arithmedic excption, numeric overflow, or string truncation Cannot transliterate character beetween character sets. Me parece que não há nada de errado com a tabela. Esta é a estrutura (mais ou menos): DIALECT 3; PAGE_SIZE 2048 DEFAULT CHARACTER SET NONE; TABLE CATEGOR ( CODIGO CHAR(8) NOT NULL, DESCR VARCHAR(35), PRIORIDADE INTEGER, COMISS_FNUMERIC(9,4), COMISS_RNUMERIC(9,4), COMISS_NEG CHAR(1) ); CODIGO DESCR PRIORIDADE COMISS_F COMISS_R COMISS_NEG 'C30', 'INSTITUCIONAL ESTADUAL/MUNICIPAL', 0, 0, 0, NULL); 'C70', 'MATÉRIAS PRIMAS INDUSTRIAIS', 0, 0, 0, NULL); 'C40', 'GRANDES CONSUMIDORES', 0, 0, 0, NULL); 'C80', 'HOSPITALAR', 0, 0, 0, NULL); 'C41', 'ATACADISTAS', 0, 0, 0, NULL); 'C42', 'RESTAURANTES PRIVADOS / FAST FOOD', 0, 0, 0, NULL); 'C43', 'RESTAURANTES OUTROS GESTAS', 0, 0, 0, NULL); 'C44', 'CONCESSIONÁRIOS', 0, 0, 0, NULL); 'C45', 'DIVERSOS', 0, 0, 0, NULL); 'C46', 'DISTRIBUIDORES', 0, 0, 0, NULL); 'C60', 'QUALIMAX', 0, 0, 0, NULL); 'C32', 'INSTITUCIONAL . EST./MUN. - BÁSIC', 0, 0, 0, NULL); 'C75', 'MARCAS PRÓPRIAS', 0, 0, 0, NULL); 'F11', 'AÇÚCARES ( VÁRIOS )', 0, 0, 0, NULL); 'F25', 'ADITIVOS (DIVERSOS)', 0, 0, 0, NULL); 'F24', 'AROMATIZANTES (AROMAS ESSENCIAS)', 0, 0, 0, NULL); 'F23', 'EDULCORANTES (ASPARTAME E OUTROS)', 0, 0, 0, NULL); 'F22', 'CORANTES', 0, 0, 0, NULL); 'F16', 'AMIDOS E FÉCULAS', 0, 0, 0, NULL); 'F27', 'BÁSICOS PARA REVENDA', 0, 0, 0, NULL); 'F15', 'CACAU/CAFÉ', 0, 0, 0, NULL); 'F02', 'CARNES (BOVINOS, AVES, DIVERSOS)', 0, 0, 0, NULL); 'F10', 'CEREAIS ( FEIJÃO, ERVILHA, OUTROS)', 0, 0, 0, NULL); 'F07', 'DESIDRATADOS(VEG., COND.,FRUTAS)', 0, 0, 0, NULL); 'F14', 'FARINHAS DIVERSAS', 0, 0, 0, NULL); 'F17', 'GELATINAS', 0, 0, 0, NULL); 'F13', 'LEITES EM PÓ', 0, 0, 0, NULL); 'F12', 'MACARRÕES', 0, 0, 0, NULL); 'F28', 'MATERIAIS DE LIMPEZA E SIMILARES', 0, 0, 0, NULL); 'F18', 'ÓLEOS E GORDURAS', 0, 0, 0, NULL); 'F05', 'OVOS ( LÍQUIDOS E DESIDRATADOS )', 0, 0, 0, NULL); 'F20', 'PRODUTOS QUÍMICOS', 0, 0, 0, NULL); 'F19', 'PROTÉINAS DE SOJA E OUTROS', 0, 0, 0, NULL); 'F06', 'QUEIJOS', 0, 0, 0, NULL); 'F31', 'RAÇÃO DIVERSOS', 0, 0, 0, NULL); 'F26', 'REALÇADORES DE SABOR', 0, 0, 0, NULL); 'F01', 'HORTIFRUTI', 0, 0, 0, NULL); 'F21', 'VITAMINAS E MINERAIS', 0, 0, 0, NULL); 'F09', 'ARROZ ( VÁRIOS )', 0, 0, 0, NULL); 'F51', 'BOBINAS(PEBD,PEAD,NAO ALUMINIZADAS)', 0, 0, 0, NULL); 'F50', 'BOBINAS ALUMINIZADAS/METALIZADAS', 0, 0, 0, NULL); 'F53', 'CAIXAS DE PAPELÃO (EMB. E DISPLAYS)', 0, 0, 0, NULL); 'F54', 'CARTUCHOS/DISPLAYS (CARTÃO)', 0, 0, 0, NULL); 'F55', 'EMBALAGENS ACESSÓRIOS(FITAS,BAR...)', 0, 0, 0, NULL); 'F57', 'ETIQUETAS/RÓTULOS', 0, 0, 0, NULL); 'F58', 'MATERIAL GRAFICOS ( FOLHETOS )', 0, 0, 0, NULL); 'F56', 'EMB.RÍGIDAS(POTES/LATAS/BOMBONAS)', 0, 0, 0, NULL); 'F60', 'SACOS/FARDOS ( KRAFT )', 0, 0, 0, NULL); 'V30', 'VENDEDORES INSTITUCIONAL', 0, 0, 0, NULL); 'V40', 'VENDEDORES GC', 0, 0, 0, NULL); 'V60', 'VENDEDORES QUALIMAX', 0, 0, 0, NULL); 'V70', 'VENDEDORES M.P.I.', 0, 0, 0, NULL); 'V75', 'VENDEDORES MARCAS PROPRIAS', 0, 0, 0, NULL); 'F03', 'PEIXES E FRUTOS DO MAR', 0, 0, 0, NULL); 'F08', 'CARNES DESIDRATADAS/LIOFILIZADAS', 0, 0, 0, NULL); 'F29', 'PRESTAÇÕES DE SERVIÇOS', 0, 0, 0, NULL); 'F61', 'INGREDIENTES IMPORTADOS', 0, 0, 0, NULL); 'F04', 'POLPAS (TOMATE E FRUTAS)', 0, 0, 0, NULL); 'OUTROS', 'OUTROS', 0, 0, 0, NULL); 'C01', 'CLIENTES', 0, 0, 0, NULL); 'F1', 'TRANSPORTE', 0, 0, 0, NULL); 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] 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
Re: [delphi-br] Query doida
Filipe wrote: Será q alguém jah passou por isso? Estou usando FireBird 1.5, Delphi 7, e ClientDataSet + IBx. Qdo ativo uma certa query no delphi, q deveria trazer os campos CODIGO e DESCR, aparece o seguinte erro: arithmedic excption, numeric overflow, or string truncation Cannot transliterate character beetween character sets. O seu problema é a nível de Character Set. Veja as suas definições de conexão (no componente de Conexão). Artur -- 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
Re: [delphi-br] Query doida
Era isso mesmo... Obrigado. - Original Message - From: Artur Anjos To: [EMAIL PROTECTED] Sent: Thursday, October 07, 2004 2:54 PM Subject: Re: [delphi-br] Query doida Filipe wrote: Será q alguém jah passou por isso? Estou usando FireBird 1.5, Delphi 7, e ClientDataSet + IBx. Qdo ativo uma certa query no delphi, q deveria trazer os campos CODIGO e DESCR, aparece o seguinte erro: arithmedic excption, numeric overflow, or string truncation Cannot transliterate character beetween character sets. O seu problema é a nível de Character Set. Veja as suas definições de conexão (no componente de Conexão). Artur -- 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] Yahoo! Grupos, um serviço oferecido por: -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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 * 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
Re: [delphi-br] Query doida
O q causa este erro são os acentos usandos dentro das strings, passo pelo mesmo problema e ainda não encontrei solução, mas percebi q se tirar os acentos não ocorre mais os erros, no entanto é muito difícil um usuario não usar acentos na entrada de dados... - Original Message - From: Filipe To: ((Delphi ; ((FireBase Sent: Thursday, October 07, 2004 2:24 PM Subject: [delphi-br] Query doida Será q alguém jah passou por isso? Estou usando FireBird 1.5, Delphi 7, e ClientDataSet + IBx. Qdo ativo uma certa query no delphi, q deveria trazer os campos CODIGO e DESCR, aparece o seguinte erro: arithmedic excption, numeric overflow, or string truncation Cannot transliterate character beetween character sets. Me parece que não há nada de errado com a tabela. Esta é a estrutura (mais ou menos): DIALECT 3; PAGE_SIZE 2048 DEFAULT CHARACTER SET NONE; TABLE CATEGOR ( CODIGO CHAR(8) NOT NULL, DESCR VARCHAR(35), PRIORIDADE INTEGER, COMISS_FNUMERIC(9,4), COMISS_RNUMERIC(9,4), COMISS_NEG CHAR(1) ); CODIGO DESCR PRIORIDADE COMISS_F COMISS_R COMISS_NEG 'C30', 'INSTITUCIONAL ESTADUAL/MUNICIPAL', 0, 0, 0, NULL); 'C70', 'MATÉRIAS PRIMAS INDUSTRIAIS', 0, 0, 0, NULL); 'C40', 'GRANDES CONSUMIDORES', 0, 0, 0, NULL); 'C80', 'HOSPITALAR', 0, 0, 0, NULL); 'C41', 'ATACADISTAS', 0, 0, 0, NULL); 'C42', 'RESTAURANTES PRIVADOS / FAST FOOD', 0, 0, 0, NULL); 'C43', 'RESTAURANTES OUTROS GESTAS', 0, 0, 0, NULL); 'C44', 'CONCESSIONÁRIOS', 0, 0, 0, NULL); 'C45', 'DIVERSOS', 0, 0, 0, NULL); 'C46', 'DISTRIBUIDORES', 0, 0, 0, NULL); 'C60', 'QUALIMAX', 0, 0, 0, NULL); 'C32', 'INSTITUCIONAL . EST./MUN. - BÁSIC', 0, 0, 0, NULL); 'C75', 'MARCAS PRÓPRIAS', 0, 0, 0, NULL); 'F11', 'AÇÚCARES ( VÁRIOS )', 0, 0, 0, NULL); 'F25', 'ADITIVOS (DIVERSOS)', 0, 0, 0, NULL); 'F24', 'AROMATIZANTES (AROMAS ESSENCIAS)', 0, 0, 0, NULL); 'F23', 'EDULCORANTES (ASPARTAME E OUTROS)', 0, 0, 0, NULL); 'F22', 'CORANTES', 0, 0, 0, NULL); 'F16', 'AMIDOS E FÉCULAS', 0, 0, 0, NULL); 'F27', 'BÁSICOS PARA REVENDA', 0, 0, 0, NULL); 'F15', 'CACAU/CAFÉ', 0, 0, 0, NULL); 'F02', 'CARNES (BOVINOS, AVES, DIVERSOS)', 0, 0, 0, NULL); 'F10', 'CEREAIS ( FEIJÃO, ERVILHA, OUTROS)', 0, 0, 0, NULL); 'F07', 'DESIDRATADOS(VEG., COND.,FRUTAS)', 0, 0, 0, NULL); 'F14', 'FARINHAS DIVERSAS', 0, 0, 0, NULL); 'F17', 'GELATINAS', 0, 0, 0, NULL); 'F13', 'LEITES EM PÓ', 0, 0, 0, NULL); 'F12', 'MACARRÕES', 0, 0, 0, NULL); 'F28', 'MATERIAIS DE LIMPEZA E SIMILARES', 0, 0, 0, NULL); 'F18', 'ÓLEOS E GORDURAS', 0, 0, 0, NULL); 'F05', 'OVOS ( LÍQUIDOS E DESIDRATADOS )', 0, 0, 0, NULL); 'F20', 'PRODUTOS QUÍMICOS', 0, 0, 0, NULL); 'F19', 'PROTÉINAS DE SOJA E OUTROS', 0, 0, 0, NULL); 'F06', 'QUEIJOS', 0, 0, 0, NULL); 'F31', 'RAÇÃO DIVERSOS', 0, 0, 0, NULL); 'F26', 'REALÇADORES DE SABOR', 0, 0, 0, NULL); 'F01', 'HORTIFRUTI', 0, 0, 0, NULL); 'F21', 'VITAMINAS E MINERAIS', 0, 0, 0, NULL); 'F09', 'ARROZ ( VÁRIOS )', 0, 0, 0, NULL); 'F51', 'BOBINAS(PEBD,PEAD,NAO ALUMINIZADAS)', 0, 0, 0, NULL); 'F50', 'BOBINAS ALUMINIZADAS/METALIZADAS', 0, 0, 0, NULL); 'F53', 'CAIXAS DE PAPELÃO (EMB. E DISPLAYS)', 0, 0, 0, NULL); 'F54', 'CARTUCHOS/DISPLAYS (CARTÃO)', 0, 0, 0, NULL); 'F55', 'EMBALAGENS ACESSÓRIOS(FITAS,BAR...)', 0, 0, 0, NULL); 'F57', 'ETIQUETAS/RÓTULOS', 0, 0, 0, NULL); 'F58', 'MATERIAL GRAFICOS ( FOLHETOS )', 0, 0, 0, NULL); 'F56', 'EMB.RÍGIDAS(POTES/LATAS/BOMBONAS)', 0, 0, 0, NULL); 'F60', 'SACOS/FARDOS ( KRAFT )', 0, 0, 0, NULL); 'V30', 'VENDEDORES INSTITUCIONAL', 0, 0, 0, NULL); 'V40', 'VENDEDORES GC', 0, 0, 0, NULL); 'V60', 'VENDEDORES QUALIMAX', 0, 0, 0, NULL); 'V70', 'VENDEDORES M.P.I.', 0, 0, 0, NULL); 'V75', 'VENDEDORES MARCAS PROPRIAS', 0, 0, 0, NULL); 'F03', 'PEIXES E FRUTOS DO MAR', 0, 0, 0, NULL); 'F08', 'CARNES DESIDRATADAS/LIOFILIZADAS', 0, 0, 0, NULL); 'F29', 'PRESTAÇÕES DE SERVIÇOS', 0, 0, 0, NULL); 'F61', 'INGREDIENTES IMPORTADOS', 0, 0, 0, NULL); 'F04', 'POLPAS (TOMATE E FRUTAS)', 0, 0, 0, NULL); 'OUTROS', 'OUTROS', 0, 0, 0, NULL); 'C01', 'CLIENTES', 0, 0, 0, NULL); 'F1', 'TRANSPORTE', 0, 0, 0, NULL); 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] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL
RES: [delphi-br] query... outro
Sim,,, nao vejo problema nisso query1.fieldbyname('nome').asstring; vai ser igual a x. query2.fieldbyname('nome'.asstring; vai ter o mesmo valor.. Talvez voce tenha um caso especial, do contrario pense melhor nessa opcao.. -Mensagem original- De: Filipe [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 23 de setembro de 2004 11:12 Para: _Delphi Assunto: [delphi-br] query... outro Alguem sabe se eh possivel duas querys (ou dois datasets) acessarem o mesmo campo da mesma tabela ao mesmo tempo??? [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 --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.698 / Virus Database: 455 - Release Date: 02/06/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.698 / Virus Database: 455 - Release Date: 02/06/2004 -- 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
[delphi-br] Query
Alguem sabe de alguma apostila q ensine como utilizar o IbQuery??? Tô Apanhando feio... [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 * 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
[delphi-br] Query no QuickReport
Criei um relatório onde tenho três queries (qry1, qry2, qry3) e devo passar parâmetros para as mesmas. 1. O que devo colocar na propriedade DATASET do relatório, pois se colocar como sendo o DataSet a qry1, o valor da qry1 é exibido certo mas os valores das outras queries não são exibidos no relatório e se deixar a propriedade DataSet em branco, nada do relatório é exibido. Como faço para dizer que o relatório é ligado às três queries? 2. A primeira query é para buscar o codigo do usuário e está funcionando bem com a seguinte consulta: with qry1 do begin Close; SQL.Clear; SQL.Add('SELECT DISTINCT USUARIO FROM RELATORIOS '); SQL.Add('WHERE UF_RELAT = ' + #39 + ComboUF.Text + #39 ); Open; end; O problema agora é que tenho as duas outras consultas, onde devo passar para as duas o resultado da query acima, ou seja, o USUARIO, e para cada usuário tenho um DBText no relatório para exibir o seu resultado. Coloquei o seguinte código para isso: with qry2 do begin Close; SQL.Clear; SQL.Add('SELECT COUNT(USUARIO) FROM AVALIACOES '); SQL.Add('WHERE USUARIO = ' + #39 + qry1.FieldByName ('USUARIO').AsString + #39 ); Open; end; Onde deve ser inserida essa parte do código? Dentro do with da primeira query ou depois? Há outra forma de fazer isso? Essa forma funcionou em parte, pois está exibindo o mesmo resultado para todos os usuários, não sei se o problema é a propriedade DataSet do relatório ou se é na hora de passar o resultado da qry1. O que está errado? Obrigada -- 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