|
Hola Marcoszorrilla,
Ya solucione el problema, puse este codigo:
begin
append;
fieldbyname('NC').AsString := edit6.text;
fieldbyname('NInv').AsString := edit1.text;
fieldbyname('Descrip').asstring := edit2.text;
fieldbyname('CC').asstring := DBLookupComboBox2.Text;
fieldbyname('Origen').asstring := DBLookupComboBox1.Text;
fieldbyname('FAdq').Asstring := maskedit1.text;
fieldbyname('Mixta').AsBoolean := checkbox1.Checked;
fieldbyname('Valor').asstring := edit3.Text;
fieldbyname('Dep').asstring := combobox1.Text;
Post;
end;
Gracias por todo, y disculpa la molestia....
__________________
La finalidad del arte es dar cuerpo a la esencia secreta de las cosas, no el copiar su apariencia.
|