variable de systema para "fecha actual".

[juanlaplata]

Código Delphi [-]
Table1.Append;
Table1Fecha.Value:=Date;
Table1.Post;
//o

Table1.Edit;
Table1Fecha.Value:=Date;
Table1.Post;

Vale aclarar que si no defines los campos puedes acceder asi

Código Delphi [-]
Table1.Append;
Table1.FieldByName('Fecha').asDateTime:=Date;
Table1.Post;
//o

Table1.Edit;
Table1.FieldByName('Fecha').asDateTime:=Date;
Table1.Post;