Einzelnen Beitrag anzeigen

Albi

Registriert seit: 4. Mai 2003
Ort: Berlin
458 Beiträge
 
Delphi 7 Professional
 
#1

DateTime in DB Speichern, wird nur jeder 2 gespeichert WISO?

  Alt 1. Jul 2003, 14:14
Hallo alle zusammen, ich habe folgendes Problem:

Ich speichere mehrer Werte in einer *.txt und erstelle daraus einen Serienbrief, nun möchte ich, das wenn er den Serienbrief erstellt, mir Datum/Uhrzeit in der DB hinterlegt. Das klappt auch. Aber nehmen wir mal an, es sind 5 DS da, dann schreibt er jeweils den 1ten, 3ten u. 5ten Datum/Zeit in die DB und in die *.Txt aber in den 2ten u. 4ten jedoch in keines der beiden. Nehme ich das SetPrintTime raus, schreibt er mir wieder alle in die *.txt.

Kann es sein, das das Query dazu zu langsam ist und daher immer einer übersprungen wird?

Ich verwende folgenden Code

Code:
 Form1.Query1.First;
      For i:= 0 To Form1.Query1.FieldCount-1 DO
      Write(f, Form3.DBGrid1.Fields[i].FieldName+';');
      Writeln(f,'');
        while not Form1.Query1.EOF do
         begin
            for i:=0 to Form1.Query1.FieldCount-1 do
             begin
              Write(F, Form1.Query1.Fields[i].asstring+';');
              SetPrintTime;
               if Form1.Query1.FieldCount-1 = Form1.Query1.FieldCount-1 Then
              end;
              Writeln(F, '');
          Form1.Query1.Next;
         end;
    CloseFile(f);
SetPrintTime lautet: Form1.Query1.Edit;
Form1.Query.FieldByName('Gedruckt').AsDateTime:= now;
  Mit Zitat antworten Zitat