Datum/Uhrzeit speichen und sortieren..

[erich.wanker]

Hallo und VIELEN DANK

Funktioniert jetzt..

habe folgende Felder:

Code:

          ASQL := 'ALTER TABLE "MAILDATENBANK" add "S_DATUM" CHAR(10)';ZConnection1.ExecuteDirect( ASQL );
          ASQL := 'ALTER TABLE "MAILDATENBANK" add "S_UHRZEIT" CHAR(10)';ZConnection1.ExecuteDirect( ASQL );
          ASQL := 'ALTER TABLE "MAILDATENBANK" add "DATUM_ZAHL" FLOAT';ZConnection1.ExecuteDirect( ASQL );
          ASQL := 'ALTER TABLE "MAILDATENBANK" add "ZEITSTEMPEL" TIMESTAMP';ZConnection1.ExecuteDirect( ASQL );

Befüllt via:

Code:

            MAILDATENBANK.FieldByName('DATUM').AsDateTime:=Msg.Date;
            MAILDATENBANK.FieldByName('S_DATUM').AsString:= DateToStr(msg.Date);
            MAILDATENBANK.FieldByName('S_UHRZEIT').AsString:=TimeToStr(msg.Date);
            MAILDATENBANK.FieldByName('ZEITSTEMPEL').AsExtended:=Msg.Date;

Danke und LiGrü
Erich