Hola
Otra es formatear la fecha antes:
Código Delphi
[-]
qryExec:= TZQuery.Create(nil);
ShortDateFormat := 'yyyyMMdd';
qryEXEC.SQL.Add(' INSERT INTO turno ( ID_PACIENTE, FECHA_HORA ) '+
' values ( :ID_PACIENTE, :FECHA_HORA)');
qryExec.ParamByName( 'ID_PACIENTE' ).Value:= Data.qryPAC.FieldByName ( 'ID_PACIENTE' ).value;
qryExec.ParamByName ( 'FECHA_HORA').Value:= sHora;
qryExec.Connection:=Data.Conx;
qryExec.ExecSQL;
FreeAndNil (qryExec);
Data.qryTurno.Refresh;
Saludos