@nunopicado consegui
Nas propriedades do componente Query meti a propriedade RequestLive para True, e o código é como estavas a dizer "query1.insert".
Para gravar fiz desta forma:
with query1 do
begin
Query1.FieldByName('Artigo').AsString := DBLookupComboBox3.Text;
Post;
end;
Obrigado pela ajuda!
↧