UniQDateFunc is a TUniQuery.
Code: Select all
UnicodeString s;
UniQDateFunc->Active=false;
UniQDateFunc->SQL->Text=L"select {fn DATEADD(hour,:1,:2) } from dual";
UniQDateFunc->Prepare();
UniQDateFunc->Params->Items[0]->AsInteger=1;
UniQDateFunc->Params->Items[1]->AsDateTime=Now();
UniQDateFunc->Active=true;