Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Problem mit 2 Datumsfelder in einer Tabelle (https://www.delphipraxis.net/61205-problem-mit-2-datumsfelder-einer-tabelle.html)

mlspider 18. Jan 2006 11:33

Datenbank: Paradox • Version: 7 • Zugriff über: BDE

Problem mit 2 Datumsfelder in einer Tabelle
 
Hallo,

Ich habe mir eine Rechnungsmaske gebastelt, worin auch das Tagesdatum in einer Tabelle gespeichert wird. Nun möchte ich vielmehr ein weiteres Feld namens SollDatum vom Typ Datum in der Tabelle anlegen. Dieses Feld soll das Datum 30 Tage später nach Rechnungslegung tragen. Soweit so gut.

Delphi-Quellcode:
Rechnung.DBText3.Caption:=FormatDateTime('dd.mm.yyyy',date+StrToInt(Rechnung.Edit1.Text));
//Edit1.Text:=30

gibt mir das Solldatum aus.

Beim Aufruf von

Delphi-Quellcode:
Table1.Append;
und

Delphi-Quellcode:
Table1.Edit;
 Table1.Post;
 Table1.Refresh;
wird das SollDatum nicht mitgespeichert.

Versuche ich zusätzlich

Delphi-Quellcode:
procedure TRechnung.Table1AfterInsert(DataSet: TDataSet);
begin
 Table1['Datum']:=Date;
 Table1['SollDatum']:=Date;
end;
gibt er diee Meldung: "0.0 ist kein gültiger Zeitstempel" aus.

Was läuft hier falsch?

Danke.

Ferber 18. Jan 2006 13:08

Re: Problem mit 2 Datumsfelder in einer Tabelle
 
Entweder mit
Delphi-Quellcode:
Table1.AppendRecord....
Datenstz anhängen oder
Delphi-Quellcode:
Table1.Append;
Table1.FieldByName('Datum').AsDate:=Date;
...
Table1.Post;
Beim MS-Office ist die MSDE dabei. Mit Paradox fällst Du sicher auf die Schnautze. :hi:

mlspider 18. Jan 2006 13:30

Re: Problem mit 2 Datumsfelder in einer Tabelle
 
Wir wollen mal nicht all zu schwarz malen. :lol: Sooo schlecht ist Paradox nun auch wieder nicht, wenn man mal von den ganzen Nachteilen absieht. :mrgreen:
Danke aber trotzdem. Erste und zweite Variante funktioniert.


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:03 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz