Sql-запрос. Как добавить значение DateTimePicker в ячейку таблицы типа Time?

procedure TForm8.Button1Click(Sender: TObject);
var Sql_str,str,str2,str3,str4,str5 :string ;
    LastID: integer;
    id2,id3,idtime:integer;
begin
  Sql_str := 'UPDATE  times SET ';
  str3:=timetostr(dateTimePicker1.Time);
        // Считывание номера последней записи
         Query3.SQL.Clear;
         Query3.SQL.Add('Select ID,timeotb,nom from times');
         Query3.Open;
         Query3.Last;
         LastID:=Query3.FieldByName('nom').AsInteger;
       // Добавление новой записи
        Query3.SQL.Clear;
        str4:=inttostr(LastID+1);
        str5:=Edit1.Text;
        str3:=timetostr(dateTimePicker1.Time);
        form3.Edit1.Text:=str4;
        form3.edit2.text:=str5;
        form3.Edit3.Text:=str3;
    //Думаю ошибка в строке ниже, но как записать по-другому???
        [B]str:='Insert INTO   times (nom) Values ('+str4+')'+' (timeotb) values ('+str3+')';[/B]
        Query3.SQL.Add(str);
        Query3.open;
        Sql_str:=Sql_str+'id='+str5+' Where nom='+str4;
        Query3.SQL.Clear;
        Query3.SQL.Add(Sql_str);
        Query3.ExecSQL;
        form3.Query1.close;
        form3.Query1.Open;
        form3.Show;
        Close;
  end;

str:='Insert INTO   times (nom, timeotb) Values ('+str4+','+#39+str3+#39+')';