Einzelnen Beitrag anzeigen

Benutzerbild von SilverMoonGirl
SilverMoonGirl

Registriert seit: 21. Aug 2003
Ort: Berlin
160 Beiträge
 
Delphi 6 Professional
 
#39

Re: Zeit/Datumswert mit einer Tabelle vergleichen

  Alt 15. Dez 2006, 09:47
Also so langsam geb ich es auf, wenn ich in einem neuenProjekt folgendes ausprobiere, funktioniert alles
Delphi-Quellcode:
var
datumzeit: tdatetime;
begin
  datumzeit:= StrToDate('13.12.2006') + StrToTime('10:28:45');
  with Query1 do
  begin
    Close;
    SQL.Text := 'SELECT * FROM testdatum WHERE dat = :datum';
    ParamByName('datum').AsDateTime:= datumzeit;
    Open;
  end;
end;
in dem Projekt, wo ich es eigentlich brauche funktioniert es nicht. Könnt ihr vielleicht mal gucken, ob ich irgendetwas übersehen habe?

Delphi-Quellcode:
const
  SELECT_STMT
    = 'SELECT * FROM "[...]\Aufdate" WHERE AuftragNr = :auftrag AND "Aufdate"."_BackupTime" = :datzei';

Var
datumzeit: TDateTime;
begin
  datumzeit:= StrToDate(DBGdatum.SelectedField.AsString) + StrToTime(DBGZeit.SelectedField.AsString);

  with DBmodul.QcopyTable do
  begin
    Close;
    SQL.Text:= SELECT_STMT;
    ParamByName('auftrag').AsInteger := DBGrid1.SelectedField.AsInteger;
    ParamByName('datzei').AsDateTime:= datumzeit;
    Open;
  end;
end;
Ich versteh das nicht
Simone
There is no dark side of the moon really.
Matter of fact it's all dark.
.::mein Blog::.
  Mit Zitat antworten Zitat