Data do sistema

Question

como posso fazer isto?em minha base de dados access tem alguns campos do tipo data e eu quero que so salve dessa forma EX: 01/09/2005 so que tem alguns sistema operacional que a data do sistema esta E...

R�mulo Barros · Answer

Cara, n�o importa o formato que est� definido no windows. Use o m�todo FormatDateTime para retornar a Data/Hora no formato desejado por ti.

Ex:

procedure TForm1.Button1Click(Sender: TObject);
Var
   MinhaData : TDateTime;
begin
   MinhaData := Now;
   ShowMessage(FormatDateTime(�DD/MM/YYYY�,MinhaData));
end;

end.

:arrow: Sacou?

Delphi32 · Answer

Os campos do tipo Data nada mais s�o do que campos inteiros. A partir desse n�mero inteiro ele gera a �string� de data que visualizamos. Ou melhor, n�o importa o idioma do sistema operacional, o campo ser� gravado sempre da mesma forma. O que acontece � que sistemas operacionais configurados diferente podem mostrar as datas diferentes. J� aconteceu comigo porque alguns computadores usavam Windows em portugu�s (e mostravam a data no formato dd/mm/yyyy) e outros computadores usavam Windows em ingl�s (e mostravam a data no formato mm/dd/yyyy). Sendo assim, para que n�o fosse necess�rio configurar o Windows dos usu�rios eu sempre coloco no DisplayFormat do TField o formato da data (no caso dd/mm/yyyy). Assim o meu programa vai sempre mostrar a data nesse formato independente da configura��o do windows. Se voc� n�o est� usando TFields voc� tamb�m pode usar a fun��o FormatDateTime.

FormatDateTime(�dd/mm/yyyy�,Now);

O primeiro par�metro � o formato no qual ele mostra a data e o segundo � uma vari�vel do tipo TDateTime. Essa fun��o retorna uma string com a data no formato selecionado.

t+!

F�rum Data do sistema #300961