Insertar fecha a la base de datos

[borlandpablo]

Buenas a todos, como hago para insertar la fecha actual en la base de datos? yo lo que hago es esto y me da error.

    XDatos->QCatalogos->Open();
    XDatos->QCatalogos->Append();
    while(!XDatos->QCatalogos->Eof)
    {
       XDatos->QCatalogos->SQL->Text = "insert into catalogos(Fecha_Actual) values (sysdate)";
       XDatos->QCatalogos->Next();
    }
    XDatos->QCatalogos->Post();
    XDatos->QCatalogos->Close();