ecfisa, si bien no entiendo mucho, creo que estoy mas cerca, pero mira lo que pasa.
Código Delphi
[-] procedure TForm20.BitBtn4Click(Sender: TObject);
var
cbHoras, cbMinutos: TComboBox;
begin
cbHoras := ComboBox3;
cbMinutos := ComboBox2;
DBEdit4.SetFocus;
table1.FieldByName('Cod_turnovet').AsInteger:=c;
if table2.FieldByName('Cod_prop').AsInteger=Table3.FieldByName('Cod_prop').AsInteger
then
Table1.Append;
Table1.FieldByName('Hora').Value := hmToDateTime(cbHoras, cbMinutos);
table1.FieldByName('Cod_propi').AsInteger:=Table3.FieldByName('Cod_prop').AsInteger;
table1.Post;
end;
No deberia funcionar bien?
(obvio que no)