[delphi-br] Onde está o erro?

2006-05-22 Por tôpico effgen9



Olá, pessoal.
Tenho uma tabela em paradox e uso D7.
Nesta tabela Contratos_Dados tenho um campo data que é Data_final,A, 
10.
Estou começando a trabalhar com SQL. Passo dois parâmetros 
Data_Inicial e data_final e gostaria de saber os contratos que estão 
entre estas datas. Já fiz a pesquisa usando as datas como Alfa e me 
retornou um resultado maluco.
Como converto a data que está na tabela como string para data?

Segue a procedure:
procedure TForm21.BitBtn2Click(Sender: TObject);
VAR
 INICIO, FINAL: Tdate;
begin
 Table1.Open;
 Query1.Open;
 {}
 INICIO:=strtodate(MaskEdit1.Text);
 FINAL:=strtodate(MaskEdit2.Text);
 {}
 QUERY1.CLOSE;
 QUERY1.SQL.CLEAR;
 QUERY1.SQL.ADD('SELECT *');
 QUERY1.SQL.ADD(' FROM Contratos_dados');
 QUERY1.SQL.ADD(' WHERE data_final >= '''+INICIO+''' AND');
 QUERY1.SQL.ADD('DATA_FINAL <= '''+FINAL+''' ');
 QUERY1.SQL.ADD(' ORDER BY CONTRATO');
 QUERY1.OPEN;
 {}
end;













-- 
< 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]






  




  
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!.












[delphi-br] Inverter a data!

2006-05-19 Por tôpico effgen9



Olá, pessoal.
Procurei algo na lista mas não encontrei.

Gostaria de saber como faço para inverter uma data.

Ex.: 
19/05/2006 para 2006/05/19.













-- 
< 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]






  




  
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!.