Einzelnen Beitrag anzeigen

Benutzerbild von Union
Union

Registriert seit: 18. Mär 2004
Ort: Luxembourg
3.487 Beiträge
 
Delphi 7 Enterprise
 
#5

Re: Deutsche Datum nach Englisches Datum konvertieren?

  Alt 20. Jun 2006, 13:38
Wie Joachim schon sagte:
Select * from Test where Datumsfeld = :datum und dann
Query.ParamByName('datum').AsDateTime := now; Wenn Du aber unbedingt das Datum konvertieren willst:
Delphi-Quellcode:
procedure TForm1.TestButtonClick(Sender: TObject);
const
   LCID_ENUS : integer = 1033;
var
   dtDatum : TDate;
   FormatSettings : TFormatSettings;
begin
   dtDatum := date;
   Sysutils.GetLocaleFormatSettings(LCID_ENUS, FormatSettings);
   ShowMessage(DateToStr(dtDatum, FormatSettings));
end;
Eine Liste aller gültigen LCIDs: List of Locale ID (LCID) Values as Assigned by Microsoft
Ibi fas ubi proxima merces
sudo /Developer/Library/uninstall-devtools --mode=all
  Mit Zitat antworten Zitat