Thema: Delphi Datum in DB setzen

Einzelnen Beitrag anzeigen

barnti

Registriert seit: 15. Aug 2003
Ort: Mal hier mal da...
689 Beiträge
 
Delphi 7 Enterprise
 
#1

Datum in DB setzen

  Alt 21. Apr 2004, 10:42
Hallo,

ich habe ein kleines Problem mit der Verwendung des Datentyps 'TDateTime'.

Delphi-Quellcode:
procedure ExecInvalidate(Datasource: TDatasource; Field, Value: String; InvalidationTime: String);
var Query: TmySQLQuery;
begin
  Query:= CreateQuery;

  Query.Close;
  Query.SQL.Clear;
  Query.SQL.Add('UPDATE '+DataSource.Name);

  // Hier versuche ich den String 'invalidationTime' in die DB zu schreiben
  // Erzeugt wird dieser beim Aufruf von ExecInvalidate(Datasource,Field,Value,DateTimeToStr(now))

  Query.SQL.Add('SET valid= '+QuotedStr(invalidationTime));
  Query.SQL.Add('WHERE '+Field+'='+QuotedStr(Value));
  showmessage(Query.SQL.Text);
  Query.ExecSQL;
  Query.free;
end;
Leider kommt in der DB immer nur '0000-00-00 00:00:00' an. Muss ich den String anders formatieren? Ich krieg das nicht auf die Reihe...

Danke.
Gruß,

Barnti
  Mit Zitat antworten Zitat