Hola de nuevo danielmj
Yo prefiero utilizar sentencias SQL para cualquier operacion
CRUD. En tu caso tambien me crearia otro FDQuery que utilizaria para este fin, sino perderias el SELECT
Código Delphi
[-]
with TFDQuery.Create(NIL) do
begin
Connection := TuConnectionAca;
SQL.Text := ' INSERT INTO LaTabla (CampoTime) VALUES (:Hora) ';
ParamByName('Hora').DataType := ftTime;
ParamByName('Hora').AsTime := Hora; Execute;
Free:
end;
Probalo de esa manera a ver si te resulta
Saludos