Converter data dd/mm/yyyy para mm/dd/yyyy

Delphi

03/03/2004

pessoal como faço para poder formatar uma data no formato dd/mm/yyyy para o formato mm/dd/yyyy, preciso disso para poder efetuar uma pesquisa com sql utilizando o between


Saggitharius

Saggitharius

Curtidas 0

Respostas

Fabio.hc

Fabio.hc

03/03/2004

Se vc passar data como parâmetro nâo precisa formatar a data.

Ex:
procedure TForm5.Button3Click(Sender: TObject);
begin
   IBQuery2.Close;
   IBQuery2.SQL.Text:=´select * from compra where com_docdata between :data1 and :data2´;
   IBQuery2.Params[0].Value:=StrToDate(Edit1.Text);
   IBQuery2.Params[1].Value:=StrToDate(Edit2.Text);
   IBQuery2.Open;
end;



GOSTEI 0
Cefernan

Cefernan

03/03/2004

Utilize a função FormatDateTime da seguinte forma:

FormatDateTime(´mm/dd/yyyy´, <Variável do tipo datetime>)


[]´s

--
Cefernan


GOSTEI 0
POSTAR