[delphi-br] query dinamica datasnap

2010-06-02 Por tôpico sergio cavalcante
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]

2009-02-18 Por tôpico marciosulfabril
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]

2009-02-18 Por tôpico Eduardo Silva dos Santos
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

2009-02-12 Por tôpico Eduardo Silva dos Santos
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

2009-02-11 Por tôpico Bruno Lepesqueur
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

2009-02-11 Por tôpico Ricardo César Cardoso
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

2009-02-11 Por tôpico Eduardo Silva dos Santos
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

2009-02-11 Por tôpico Daniel Sobrinho Laporte
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

2009-02-11 Por tôpico Bruno Lepesqueur
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]

2008-11-07 Por tôpico marciosulfabril
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]

2008-11-07 Por tôpico Luiz ESCobar
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

2008-09-29 Por tôpico Berdam
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

2008-09-29 Por tôpico Rodrigo Bevilacqua Marcondes
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

2008-09-29 Por tôpico Berdam

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

2008-07-17 Por tôpico rzzanatta
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

2008-07-17 Por tôpico Eduardo Silva dos Santos
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

2008-07-17 Por tôpico Guaranta Almeida
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.

2008-06-20 Por tôpico Marcos
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

2008-05-16 Por tôpico Flavio
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

2008-05-16 Por tôpico Bruno Lichot
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

2008-04-22 Por tôpico Eduardo Oliveira silva
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

2008-04-22 Por tôpico Alessandro DUARTE de Moraes
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

2008-04-22 Por tôpico Alcistemas Informática
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

2008-04-22 Por tôpico Eduardo Oliveira silva
è 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

2008-04-22 Por tôpico Alessandro DUARTE de Moraes
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... .?=

2008-04-16 Por tôpico Flavio
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...

2008-04-16 Por tôpico Flavio
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 !!!!!

2006-08-03 Por tôpico Jean
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 !!!!!

2006-08-02 Por tôpico Marco Aurélio \(DELPHI\)
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 !!!!!

2006-08-01 Por tôpico Flavio
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

2006-02-16 Por tôpico Eduardo Alves
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

2005-10-20 Por tôpico Rodrigo Tognin
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

2005-10-19 Por tôpico Rodrigo Tognin
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

2005-10-19 Por tôpico Vanderson de Almeida Correa de Sá
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

2005-10-19 Por tôpico Alvaro
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

2005-10-04 Por tôpico Eduardo
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

2005-10-03 Por tôpico Rodrigo Mota
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

2005-10-03 Por tôpico Ederson
 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

2005-09-15 Por tôpico Joel Lino
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

2005-08-18 Por tôpico Bruno Faria
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

2005-08-18 Por tôpico Fernando Mangussi
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

2005-06-23 Por tôpico carlos.maximo
Ô 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

2005-06-22 Por tôpico F D
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

2005-06-22 Por tôpico F D
   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

2005-06-22 Por tôpico Eduardo
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

2005-06-20 Por tôpico Edivaldo David
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

2005-06-20 Por tôpico Artur Guerra
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

2005-06-16 Por tôpico Ricardo Cerqueira
 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

2005-06-15 Por tôpico Eduardo
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

2005-06-14 Por tôpico Edivaldo David
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

2005-06-10 Por tôpico Edivaldo David
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

2005-06-10 Por tôpico Artur Guerra
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

2005-05-13 Por tôpico Rodrigo Othavio Farias
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

2005-05-12 Por tôpico stainle2003
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

2005-05-12 Por tôpico Rubem Rocha
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

2005-05-12 Por tôpico Diogo de Oliveira Cunha
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

2005-05-12 Por tôpico Nivaldo Stainle
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

2005-05-02 Por tôpico Adalberto Sousa Monteiro
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

2005-03-10 Por tôpico Fabiano Catrinck

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

2005-03-09 Por tôpico Hélder Rodrigues

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

2005-02-28 Por tôpico pcinfowave


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

2005-02-21 Por tôpico Miguel



 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

2005-02-21 Por tôpico Miguel


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

2005-02-19 Por tôpico villacortamiguel



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

2005-02-19 Por tôpico Paulo Alexsandro

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

2005-01-26 Por tôpico mrmabe



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

2005-01-26 Por tôpico Evolution

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

2005-01-12 Por tôpico itamar

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

2004-12-10 Por tôpico Rodrigo Americo

 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

2004-12-09 Por tôpico Edivaldo David

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

2004-12-09 Por tôpico Rodrigo Americo

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

2004-12-09 Por tôpico Walter Alves Chagas Junior

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

2004-12-09 Por tôpico Ulisses

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

2004-12-09 Por tôpico Edivaldo David

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

2004-11-16 Por tôpico er83pet04


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

2004-11-16 Por tôpico Marcelo Silva

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.

2004-11-11 Por tôpico Sedinei Oliveira

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.

2004-11-10 Por tôpico Marcelo

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.

2004-11-09 Por tôpico Marcelo

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

2004-11-05 Por tôpico cferdinandesi


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

2004-11-05 Por tôpico Alan

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

2004-10-08 Por tôpico Filipe

É 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

2004-10-07 Por tôpico Filipe

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

2004-10-07 Por tôpico Artur Anjos

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

2004-10-07 Por tôpico Filipe

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

2004-10-07 Por tôpico Surrute - Yahoo!


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

2004-09-23 Por tôpico Cícerot
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

2004-09-22 Por tôpico Filipe

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

2004-09-14 Por tôpico er83pet04
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