[delphi-br] Conexão Interbase

2008-01-20 Por tôpico Régis Júlio Bender
Boa tarde pessoal, 

tenho um sistema desenvolvido com banco interbase e preciso fazer a conexão 
dele pela internet.
Pesquisei mas achei pouca coisa.
Alguém poderia me dar uma luz?

 

sds
 
Bender Desenvolvimento de Sistemas 
   e  Serviços Contábeis (Régis)
   (51) 98470699
 
Novo Hamburgo/RS
MSN: [EMAIL PROTECTED]
www.regisbender.com.br 



[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Quick Report - Urgente

2007-05-01 Por tôpico Régis Júlio Bender

Boa Noite pessoal, 
preciso que meu relatório apareça o total do mês e um total geral.

Por exemplo:
Hoje eu tenho isso:

debito credito   saldo
01/02  Nota fiscal 01  
100,00   100,00
02/02  Nota fiscal 02  
100,00   200,00
03/02  Pagamento NF 01  100,00  
 100,00
01/03  Nota fiscal 03  
100,00   200,00
02/03  Nota fiscal 04  
100,00   300,00
03/03  Pagamento NF 02  100,00  
 200,00
01/04  Nota fiscal 05  
100,00   300,00
02/04  Nota fiscal 06  
100,00   400,00
03/04  Pagamento NF 03  100,00  
 300,00



e preciso disso:

debito credito   saldo


01/02  Nota fiscal 01  
100,00  100,00
02/02  Nota fiscal 02  
100,00   200,00
03/02  Pagamento NF 01  100,00  
 100,00
fevereiro100,00 
200,00   

01/03  Nota fiscal 03  
100,00   200,00
02/03  Nota fiscal 04  
100,00   300,00
03/03  Pagamento NF 02  100,00  
 200,00
Março 100,00
 200,00   

01/04  Nota fiscal 05  
100,00   300,00
02/04  Nota fiscal 06  
100,00   400,00
03/04  Pagamento NF 03  100,00  
 300,00
Abril100,00 
200,00   
2007300,00  
   600,00

Estou utilizando o delphi 7/IB e quick report.
Alguém poderia me ajudar?


[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Quick Report - Urgente

2007-05-01 Por tôpico Régis Júlio Bender

Boa Noite pessoal, 
preciso que meu relatório apareça o total do mês e um total geral.

Por exemplo:
Hoje eu tenho isso:

debito credito   saldo
01/02  Nota fiscal 01  
100,00   100,00
02/02  Nota fiscal 02  
100,00   200,00
03/02  Pagamento NF 01  100,00  
 100,00
01/03  Nota fiscal 03  
100,00   200,00
02/03  Nota fiscal 04  
100,00   300,00
03/03  Pagamento NF 02  100,00  
 200,00
01/04  Nota fiscal 05  
100,00   300,00
02/04  Nota fiscal 06  
100,00   400,00
03/04  Pagamento NF 03  100,00  
 300,00



e preciso disso:

debito credito   saldo


01/02  Nota fiscal 01  
100,00  100,00
02/02  Nota fiscal 02  
100,00   200,00
03/02  Pagamento NF 01  100,00  
 100,00
fevereiro100,00 
200,00   

01/03  Nota fiscal 03  
100,00   200,00
02/03  Nota fiscal 04  
100,00   300,00
03/03  Pagamento NF 02  100,00  
 200,00
Março 100,00
 200,00   

01/04  Nota fiscal 05  
100,00   300,00
02/04  Nota fiscal 06  
100,00   400,00
03/04  Pagamento NF 03  100,00  
 300,00
Abril100,00 
200,00   
2007300,00  
   600,00

Estou utilizando o delphi 7/IB e quick report.
Alguém poderia me ajudar?


[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] [OFF] Procuro parceria para desenvolvimento - delphi/FB

2007-03-23 Por tôpico Régis Júlio Bender
Bom dia a todos. 

estou procurando parceria para desenvolvimento de sistemas na área de gestão 
empresarial.

Sou de Novo Hamburho/RS.

caso alguém tenha interesse, favor contatar pelo msn: [EMAIL PROTECTED]

abraços


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Teclando ESC ?

2007-03-09 Por tôpico Régis Júlio Bender
primeiramente, marque no formulário o evento keyPress como true.
depois no evento onKeyPress do pageControl digita isso:

if Key = (#27) then
pagecontrol.activeIndex := (numeroDesejado)

espero poder ter te ajudado



  - Original Message - 
  From: Leonardo Anselmo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, March 09, 2007 11:35 PM
  Subject: [delphi-br] Teclando ESC ?


  Pessoal,

  Tenho um cadastro de clientes e esta dividido em abas (PageControl - 
TablSheets), procurei um evento pra onde eu estiver e precisar teclar ESC ele 
chamar outro evento, sendo que não achei, eu sempre uso o onKeyDown dos edtis 
ou dbedits pra fazer certos eventos, mas nesse controle (pagecontrol) eu nao 
sei que evento usar, alguem poderia mim ajudar.

  Valeu

  Leonardo Anselmo

  [As partes desta mensagem que não continham texto foram removidas]



   


--
  E-mail classificado pelo Identificador de Spam Inteligente.
  Para alterar a categoria classificada, visite o Terra Mail 



--
  Esta mensagem foi verificada pelo E-mail Protegido Terra.
  Scan engine: McAfee VirusScan / Atualizado em 09/03/2007 / Versão: 5.1.00/4981
  Proteja o seu e-mail Terra: http://mail.terra.com.br/ 


[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Impressão de Nota Fiscal

2007-02-09 Por tôpico Régis Júlio Bender
Boa noite.
Pessoal, estou com um probleminha com a emissão da minha nota fiscal
Ao imprimir a primeira tela, que seria a nota fiscal, ela gera automaticamente 
uma nova página com todos os dados da primeira, exceto a parte dos produtos. 
 Alguém pode me ajudar??

Utilizo o Delphi 7 com firebird e quick Report




[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Hora

2007-01-15 Por tôpico Régis Júlio Bender
Boa noite, olha na propriedade editmask desse campo se ele está marcado para 
gravar literal caracteres, caso esteja, desmarque que gravara normal

sds

Bender Desenvolvimento de sistemas e contabilidade
51 98470699
NH/RS


  - Original Message - 
  From: Romario (Listas) 
  To: Delphi-br (Lista de Discussão) 
  Sent: Monday, January 15, 2007 7:55 PM
  Subject: [delphi-br] Hora


  Senhores,

  Estou gravando uma certa hora no banco de dados e quando vou 
  recuperá-la para mostrar ao usuário, os minutos são descartados.

  O campo está definido como TIME no Firebird 2.0 e como DateTime no Delphi.

  ==
  --- Para recuperar a data informada e gravá-la no banco ---
  ==

  No Formulário:
  Teste.Hora := StrToTime(edt_hora.Text)

  No DataModule:
  FieldByName('hora').AsDateTime := Teste.Hora;

  ==
  --- Para recuperar a data no banco e informá-la ao usuário ---
  ==

  No DataModule:
  Teste.Hora := FieldByName('hora').AsDateTime;

  No Formulário:
  edt_hora.Text := TimeToStr(Teste.Hora);

  ==

  Alguém saberia me explicar por que isso ocorre?

  Obrigado!

  Sds,

  Romario


  ___ 
  Yahoo! Mail - Sempre a melhor opção para você! 
  Experimente já e veja as novidades. 
  http://br.yahoo.com/mailbeta/tudonovo/




   


--
  E-mail classificado pelo Identificador de Spam Inteligente.
  Para alterar a categoria classificada, visite o Terra Mail 



--
  Esta mensagem foi verificada pelo E-mail Protegido Terra.
  Scan engine: McAfee VirusScan / Atualizado em 15/01/2007 / Versão: 5.1.00/4939
  Proteja o seu e-mail Terra: http://mail.terra.com.br/ 


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Emissão de nota fiscal

2007-01-07 Por tôpico Régis Júlio Bender
Boa noite, eu observei sim, mas eu estou usando o quick report.
voce tem como passar por email este componente? 


  - Original Message - 
  From: Alessandro DUARTE de Moraes 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, January 05, 2007 9:15 AM
  Subject: Re: [delphi-br] Emissão de nota fiscal


  Régis, não sei se não observasse, mas postei uma mensagem utilizando a função 
interna do FastReport [NEW PAGE].

  []'s

  - Original Message - 
  From: Régis Bender 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, January 05, 2007 6:56 AM
  Subject: Re: [delphi-br] Emissão de nota fiscal

  Bom dia.
  Primeiramente obrigado pela atenção de vocês.
  Exatamente isso Plínio.
  Para formulário contínuo, não importa o número do formulário e sim da nota 
fiscal. 
  A minha dificuldade está na hora de jogar a segunda nota fiscal.
  Já fiz um contador e está tudo certo, a única dúvida é para criar a segunda 
página. 
  Fiz uns testes com o contador e está tudo funcionando.
  Eu tentei habilitar a propriedade 'force new page', mas não funcionou, tem 
mais alguma propriedade do quick report que precisa ser mudada para este 
funcionamento???

  - Original Message - 
  From: Plinio Cesar Pavin 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, January 05, 2007 7:03 AM
  Subject: Re: [delphi-br] Emissão de nota fiscal

  Na verdade, a numeração que vem impressa em vermelho pela gráfica nas NF's 
série única, é a numeração do FORMULÁRIO e não da NF. 

  Hoje, uma NF pode ter N formulários. Então, qdo os itens não cabem na NF, eu 
coloco uma linha com a msg continua no próximo formulário, preencho com 
* os campos de totais e impostos e salto para o proximo formulário.

  Isso acontece com NF's em formulário continuo, cuja empresa obteve a AIDF 
(Autorização para impressão de documentos fiscais). Já vi casos de empresas que 
simplesmente mandam fazer a NF em folhas soltas e colocam na impressora. Acho 
que nesse caso o número da NF é impresso no formulário e 1 NF é 1 Formulário.

  Plinio Cesar Pavin

  - Original Message - 
  From: Eduardo Silva dos Santos 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, January 05, 2007 1:51 AM
  Subject: Re: [delphi-br] Emissão de nota fiscal

  Eu acho que essa questão da nota depende do tipo do formulario, o modulo 1
  se não engano ja vem com a numeração impressa em vermelho, dai nao daria pra
  imprimir duas notas com o mesmo número.

  alguém ja usa esse tipo de impressão?

  uma vez vi numa empresa e era assim, se tivesse muitos itens o sistema
  pulava para a outra folha, so nao lembro como ficava a numeração.

  2007/1/4, Andrei Luís [EMAIL PROTECTED]:
  
   Sim, Mário, esta é uma opção. Mas não seria mais fácil para o usuário
   digitar uma NF com qtos itens quiser e o sistema imprimir de acordo?
  
   Eu também estou envolvido com desenvolvimento de um sistema que vai
   imprimir NFs e estou caminhando na mesma direção o Régis.
  
   []
   Andrei
  
   Em 04/01/07, Mario Lucio[EMAIL PROTECTED]marioluciovs%40bol.com.br
   escreveu:
Eu tenho um sistema que imprimir Nota Fiscal, mas cada nota tem seu
   número.
o que eu faço coloquei na venda do produto uma função onde ele só pode
   fazer X itens(quantidade de itens que a nota pode emitir) se tiver mais
   itens ele tem que gerar outra nota fiscal.
   
   
Mario Lucio
   
- Original Message -
From: Alessandro DUARTE de Moraes
To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
Sent: Thursday, January 04, 2007 9:09 AM
Subject: Re: [delphi-br] Emissão de nota fiscal
   
   
Cara, vc pode criar uma variável para contar o número de produtos.
   Quando tiver o número máximo, chame a função [NEWPAGE] do próprio
   FastReport.
   
[]'s
   
- Original Message -
From: Régis Júlio Bender
To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
Sent: Wednesday, January 03, 2007 9:08 PM
Subject: [delphi-br] Emissão de nota fiscal
   
Boa noite,
   
estou com um problema na impressao de notas fiscais com umas quantidade
   de produtos superior a suportada.
Por exemplo, na nota fiscal cabem 12 itens, mas existem 20 para serem
   impressos. Ele deverá jogar em duas notas com o mesmo número.
Sei que existe uma propriedade chamada 'force new page' ou algo
   parecido, mas não sei aonde.
alguém pode me ajudar???
   
   
  

  -- 
  Eduardo Silva dos Santos
  DRD Sistemas.
  (27) 3218-4201
  MSN: [EMAIL PROTECTED]
  Site: http://www.drdsistemas..com/

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]

  --
  E-mail classificado pelo Identificador de Spam Inteligente.
  Para alterar a categoria classificada, visite o Terra Mail 

  --
  Esta mensagem foi verificada pelo E-mail Protegido

[delphi-br] Backup

2007-01-03 Por tôpico Régis Júlio Bender
Boa Noite, 

estou tentando implantar no meu sistema um backup, mãs não sei nem por onde 
começar.
Alguem pode me ajudar?

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Emissão de nota fiscal

2007-01-03 Por tôpico Régis Júlio Bender
Boa noite, 

estou com um problema na impressao de notas fiscais com umas quantidade de 
produtos superior a suportada.
Por exemplo, na nota fiscal cabem 12 itens, mas existem 20 para serem 
impressos. Ele deverá jogar em duas notas com o mesmo número. 
Sei que existe uma propriedade chamada 'force new page' ou algo parecido, mas 
não sei aonde.
alguém pode  me ajudar???

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] QReport

2006-12-19 Por tôpico Régis Júlio Bender
Bom dia,
Alguém pode me dizer como eu faço pra exportar um relatório para pdf???
Aparece apenas a opção de exportação para QReport.

sds

Bender Desenvolvimento de Sistemas 
   e  Serviços Contábeis (Régis)
   (51) 98470699

Novo Hamburgo/RS
MSN: [EMAIL PROTECTED]



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Busca por data

2006-12-09 Por tôpico Régis Júlio Bender
Faça um teste, passe a data 01/06/2006 and 12/12/2006, ai não dará este erro.
O formato que você de passar é mm/dd/

  - Original Message - 
  From: Marciot2 
  To: Mensagem Delphi 
  Sent: Friday, December 08, 2006 11:55 PM
  Subject: [delphi-br] Busca por data


  ola pessoal

  Estou tentando fazer uma bucar por data mais da o seguinte erro 

  conversion error from string 0 

  alguem saber como posso tratar deste erro, abaixo vai a procedure de busca

  DM.CDSAgendamento.Close;
  DM.QryAgendamento.SQL.Clear; //
  DM.QryAgendamento.SQL.Text:='SELECT * FROM AGENDAMENTO WHERE COD_ALUNO = 
'+pcod+
  ' and DATA Between '+DateToStr(pdtini)+
  ' and '+DateToStr(pdtfim)+'';

  DM.CDSAgendamento.Open; 

  --
  no delphi compilando passo a passo ele encontra-se desse jeito
  DM.QryAgendamento.SQL.Text:='SELECT * FROM AGENDAMENTO WHERE COD_ALUNO = 50 
and DATA between (12/06/2006) and (31/12/2006)'

  [As partes desta mensagem que não continham texto foram removidas]



   


--
  E-mail classificado pelo Identificador de Spam Inteligente.
  Para alterar a categoria classificada, visite o Terra Mail 



--
  Esta mensagem foi verificada pelo E-mail Protegido Terra.
  Scan engine: McAfee VirusScan / Atualizado em 08/12/2006 / Versão: 4.4.00/4914
  Proteja o seu e-mail Terra: http://mail.terra.com.br/ 


[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Fontes

2006-12-06 Por tôpico Régis Júlio Bender
Boa noite, 

alguém tem como passar para mim a fonte draft ou alguma que imprice em 
caracter???

sds

Régis Bender

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Código CHR

2006-12-04 Por tôpico Régis Júlio Bender
Boa tarde, 
necessito do código chr da tecla ESC.
Aguém pode me dizer?
Se alguém tiver a tabela com todas as teclas ou sabem onde encontrar, eu 
agradeço

Eu sei que o enter = chr(#13)

abraço 

sds

Bender Desenvolvimento de Sistemas 
   e  Serviços Contábeis (Régis)
   (51) 98470699

Novo Hamburgo/RS
MSN: [EMAIL PROTECTED]



[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] VERIFICADOR CNPJ

2006-12-01 Por tôpico Régis Júlio Bender
Boa tarde, 
alguém pode me dizer como eu faço o cálculo de verificação do CNPJ e CPF?


sds

Bender Desenvolvimento de Sistemas 
   e  Serviços Contábeis (Régis)
   (51) 98470699

Novo Hamburgo/RS
MSN: [EMAIL PROTECTED]



[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Exportação de Arquivos

2006-11-29 Por tôpico Régis Júlio Bender
Boa tarde, 

alguém pode me ajudar a construir um arquio de exportação do layout de 
importação do sintegra do RS?


sds

Bender Desenvolvimento de Sistemas 
   e  Serviços Contábeis (Régis)
   (51) 98470699

Novo Hamburgo/RS
MSN: [EMAIL PROTECTED]



[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Problemas no SQL

2006-11-28 Por tôpico Régis Júlio Bender
Bom dia, estou com um problema no SQL e gostaria que alguém me ajudasse:
se eu fizer essa pesquisa:
dmDados.ibqConsultaContasAPagar.SQL.add (' select * from contas_a_pagar where 
((contas_a_pagar.datalancamento = '+ chr(39) + eDataInicial.text + chr(39) + 
')' and '(contas_a_pagar.datalancamento = '+ chr(39) + eDataFinal.text + 
chr(39) + ')');

no delphi ele esta dando esse erro:
[Error] uRelatContasAPagar.pas(40): Operator not applicable to this operand type


Se eu colocar esse:
dmDados.ibqConsultaContasAPagar.SQL.add (' select * from contas_a_pagar where 
((contas_a_pagar.datalancamento = '+ chr(39) + eDataInicial.text + chr(39) + 
')' );
fica certo

não estou conseguindo implementar o AND para fazer a pesquisa entre duas 
datas.

outra coisa, eu informo no edit a data no formato dd/mm/ e ele pesquisa 
como mm/dd/
Como eu faço para converter?


Alguém pode me ajudar?
desde já, agradeço.

Abraço

sds

Bender Desenvolvimento de Sistemas 
   e  Serviços Contábeis (Régis)
   (51) 98470699

Novo Hamburgo/RS
MSN: [EMAIL PROTECTED]



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Problemas no SQL

2006-11-28 Por tôpico Régis Júlio Bender
Obrigado Andrei, vou ver o que eu consigo fazer.

abraço

sds

Bender Desenvolvimento de Sistemas 
   e  Serviços Contábeis (Régis)
   (51) 98470699

Novo Hamburgo/RS
MSN: [EMAIL PROTECTED]


  - Original Message - 
  From: Andrei Luís 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, November 28, 2006 4:56 PM
  Subject: Re: [delphi-br] Problemas no SQL


  Régis,

  Você está esquecendo de fechar um dos parenteses.

  Você não mencionou o banco que está usando, mas pelo comportamento da
  data que você falou deve ser Firebird. O Firebird trata as datas que
  forem passadas com o separador /, no formato mm/dd/. Se usar .
  como separador, aí sim será utilizado o formato dd.mm.

  Você tem duas alternativas para resolver isso:

  - formatar utilizando as funções do Delphi, vide funções da unit
  SysUtils (FormatDateTime, ...)

  - parametrizar sua consulta:

  dmDados.ibqConsultaContasAPagar.SQL.add (' select * from
  contas_a_pagar where ((contas_a_pagar.datalancamento = :wdataInicial)
  and (contas_a_pagar.datalancamento = :wdataFinal))');

  dmDados.ibqConsultaContasAPagar.ParamByName('wdataInicial').asDate := date 
-30;
  dmDados.ibqConsultaContasAPagar.ParamByName('wdataFinal').asDate := date;

  Assim seu SQL fica mais legível.

  []
  Andrei

  Em 28/11/06, Régis Júlio Bender[EMAIL PROTECTED] escreveu:
   Bom dia, estou com um problema no SQL e gostaria que alguém me ajudasse:
   se eu fizer essa pesquisa:
   dmDados.ibqConsultaContasAPagar.SQL.add (' select * from contas_a_pagar 
where ((contas_a_pagar.datalancamento = '+ chr(39) + eDataInicial.text + 
chr(39) + ')' and '(contas_a_pagar.datalancamento = '+ chr(39) + 
eDataFinal.text + chr(39) + ')');
  
   no delphi ele esta dando esse erro:
   [Error] uRelatContasAPagar.pas(40): Operator not applicable to this operand 
type
  
  
   Se eu colocar esse:
   dmDados.ibqConsultaContasAPagar.SQL.add (' select * from contas_a_pagar 
where ((contas_a_pagar.datalancamento = '+ chr(39) + eDataInicial.text + 
chr(39) + ')' );
   fica certo
  
   não estou conseguindo implementar o AND para fazer a pesquisa entre duas 
datas.
  
   outra coisa, eu informo no edit a data no formato dd/mm/ e ele pesquisa 
como mm/dd/
   Como eu faço para converter?
  
  
   Alguém pode me ajudar?
   desde já, agradeço.
  
   Abraço
  
   sds
  
   Bender Desenvolvimento de Sistemas
   e Serviços Contábeis (Régis)
   (51) 98470699
  
   Novo Hamburgo/RS
   MSN: [EMAIL PROTECTED]
  


   


--
  E-mail classificado pelo Identificador de Spam Inteligente.
  Para alterar a categoria classificada, visite o Terra Mail 



--
  Esta mensagem foi verificada pelo E-mail Protegido Terra.
  Scan engine: McAfee VirusScan / Atualizado em 27/11/2006 / Versão: 4.4.00/4905
  Proteja o seu e-mail Terra: http://mail.terra.com.br/ 


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Problemas no SQL

2006-11-28 Por tôpico Régis Júlio Bender
Boa tarde Ricardo, 
obrigado pela ajuda, mas eu tentei digitar a data 30/11/2006 e dá um erro no 
sql e se eu digitar 11/30/2006 ele funciona perfeitamente. 
Mas eu vou tentar essa dica que voc~e falou, qualquer coisa eu retorno. hehehe

abraço

sds

Bender Desenvolvimento de Sistemas 
   e  Serviços Contábeis (Régis)
   (51) 98470699

Novo Hamburgo/RS
MSN: [EMAIL PROTECTED]


  - Original Message - 
  From: Ricardo Cesar Cardoso 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, November 28, 2006 3:38 PM
  Subject: Res: [delphi-br] Problemas no SQL


  Boa tarde Régis!

  Acho que com esta pequena alteração tudo vai funcionar:

  dmDados.ibqConsulta ContasAPagar. SQL.add (' select * from contas_a_pagar 
where ((contas_a_pagar. datalancamento = '+ chr(39) + eDataInicial. text + 
chr(39) + ') and (contas_a_pagar. datalancamento = '+ chr(39) + 
eDataFinal.text + chr(39) + ')');

  Na verdade eu retirei as aspas simples do texto.

  Outra dica é a seguinte. Existe uma função no Delphi que coloca 
automaticamente aspas no texto pra vc então o comando acima poderia ficar até 
um pouco mais legível se inserido assim:

  dmDados.ibqConsultaContasAPagar.SQL.Add('Select * From Contas_A_Pagar 
Where((Contas_A_Pagar.DataCancelamento = ' + QuotedStr(eDataInicial.Text) + ' 
) And (Contas_A_Pagar.DataLancamento = ' + QuotedStr(eDataFinal.Text) + ')');

  Quanto às datas não testei, mas li em algum lugar que não faz diferença pois 
o banco consegue se orientar (como eu não sei...).

  Abraço,
  Ricardo.

  - Mensagem original 
  De: Régis Júlio Bender [EMAIL PROTECTED]
  Para: delphi-br@yahoogrupos.com.br
  Enviadas: Terça-feira, 28 de Novembro de 2006 9:21:17
  Assunto: [delphi-br] Problemas no SQL

  Bom dia, estou com um problema no SQL e gostaria que alguém me ajudasse:

  se eu fizer essa pesquisa:

  dmDados.ibqConsulta ContasAPagar. SQL.add (' select * from contas_a_pagar 
where ((contas_a_pagar. datalancamento = '+ chr(39) + eDataInicial. text + 
chr(39) + ')' and '(contas_a_pagar. datalancamento = '+ chr(39) + 
eDataFinal.text + chr(39) + ')');

  no delphi ele esta dando esse erro:

  [Error] uRelatContasAPagar. pas(40): Operator not applicable to this operand 
type

  Se eu colocar esse:

  dmDados.ibqConsulta ContasAPagar. SQL.add (' select * from contas_a_pagar 
where ((contas_a_pagar. datalancamento = '+ chr(39) + eDataInicial. text + 
chr(39) + ')' );

  fica certo

  não estou conseguindo implementar o AND para fazer a pesquisa entre duas 
datas.

  outra coisa, eu informo no edit a data no formato dd/mm/ e ele pesquisa 
como mm/dd/

  Como eu faço para converter?

  Alguém pode me ajudar?

  desde já, agradeço.

  Abraço

  sds

  Bender Desenvolvimento de Sistemas 

  e Serviços Contábeis (Régis)

  (51) 98470699

  Novo Hamburgo/RS

  MSN: [EMAIL PROTECTED] com.br

  [As partes desta mensagem que não continham texto foram removidas]

  !--

  #ygrp-mlmsg {font-size:13px;font-family:arial,helvetica,clean,sans-serif;}
  #ygrp-mlmsg table {font-size:inherit;font:100%;}
  #ygrp-mlmsg select, input, textarea {font:99% 
arial,helvetica,clean,sans-serif;}
  #ygrp-mlmsg pre, code {font:115% monospace;}
  #ygrp-mlmsg * {line-height:1.22em;}
  #ygrp-text{
  font-family:Georgia;
  }
  #ygrp-text p{
  margin:0 0 1em 0;
  }
  #ygrp-tpmsgs{
  font-family:Arial;
  clear:both;
  }
  #ygrp-vitnav{
  padding-top:10px;
  font-family:Verdana;
  font-size:77%;
  margin:0;
  }
  #ygrp-vitnav a{
  padding:0 1px;
  }
  #ygrp-actbar{
  clear:both;
  margin:25px 0;
  white-space:nowrap;
  color:#666;
  text-align:right;
  }
  #ygrp-actbar .left{
  float:left;
  white-space:nowrap;
  }
  .bld{font-weight:bold;}
  #ygrp-grft{
  font-family:Verdana;
  font-size:77%;
  padding:15px 0;
  }
  #ygrp-ft{
  font-family:verdana;
  font-size:77%;
  border-top:1px solid #666;
  padding:5px 0;
  }
  #ygrp-mlmsg #logo{
  padding-bottom:10px;
  }

  #ygrp-vital{
  background-color:#e0ecee;
  margin-bottom:20px;
  padding:2px 0 8px 8px;
  }
  #ygrp-vital #vithd{
  font-size:77%;
  font-family:Verdana;
  font-weight:bold;
  color:#333;
  text-transform:uppercase;
  }
  #ygrp-vital ul{
  padding:0;
  margin:2px 0;
  }
  #ygrp-vital ul li{
  list-style-type:none;
  clear:both;
  border:1px solid #e0ecee;
  }
  #ygrp-vital ul li .ct{
  font-weight:bold;
  color:#ff7900;
  float:right;
  width:2em;
  text-align:right;
  padding-right:.5em;
  }
  #ygrp-vital ul li .cat{
  font-weight:bold;
  }
  #ygrp-vital a {
  text-decoration:none;
  }

  #ygrp-vital a:hover{
  text-decoration:underline;
  }

  #ygrp-sponsor #hd{
  color:#999;
  font-size:77%;
  }
  #ygrp-sponsor #ov{
  padding:6px 13px;
  background-color:#e0ecee;
  margin-bottom:20px;
  }
  #ygrp-sponsor #ov ul{
  padding:0 0 0 8px;
  margin:0;
  }
  #ygrp-sponsor #ov li{
  list-style-type:square;
  padding:6px 0;
  font-size:77%;
  }
  #ygrp-sponsor #ov li a{
  text-decoration:none;
  font-size:130%;
  }
  #ygrp-sponsor #nc {
  background-color:#eee