Topic: sqldatetime
please correct script... i want to insert todatetime like sqldateime format..
procedure Shift_Button4_OnClick (Sender: TObject; var Cancel: boolean);
var
Date : Now ;
Time :TimeVar;
DateTime : TDateTime;
begin
SQLExecute('insert into (Incharge,FromDateTime,ToDateTime) values("'+Shift.Edit1.Text+'","'+Shift.FromTimePicker.sqlDateTime+'","'+(datetimetosqldatetime(Now))+'"');
end;