habe folgendes Problem: Die Firebird-Datenbank (Version 2,5) die ich abfrage hat auch Datensätze wo das Datum leer sein kann. Wenn ich im Code
Code: Alles auswählen
if (SQLQuery2.FieldByName('DATUM').AsDateTime<>null) then ...
Code: Alles auswählen
if (SQLQuery2.FieldByName('DATUM').AsDateTime<>null) then ...
Code: Alles auswählen
tmpDate:=SQLQuery2.FieldByName('DATUM').AsDateTime;
DecodeDate(tmpDate,tmpjj,tmpmm,tmptt);
FrmMain.EdLabDatTT.Text:=IntToStr(tmptt);
FrmMain.EdLabDatMM.Text:=IntToStr(tmpmm);
FrmMain.EdLabDatJJJJ.Text:=IntToStr(tmpjj);
Code: Alles auswählen
if (SQLQuery2.FieldByName('DATUM').IsNull then ...