copiar una tabla a otra

[[Caral]]

Hola
Primero tienes que guardar y luego limpiar.
Lo que no entiendo es para que usar una tabla temporal ?, no entiendo el concepto del uso. ?
Para mi seria mas logico guardar los datos en las tablas correspondientes de una vez no veo la necesidad de doble trabajo.
Tal vez me explicas la razon ?
saludos

[DOS]

La tabla temporal la agregue, porque no se si puedo limpiar el Grid en donde se muestra el detalle de la carga, entonces, al borrar la tabla temporal el grid quedaba limpio para una nueva carga de factura, seguramente esto esta mal, pero es lo que se me ocurrio, tal vez pueda limpiar el grid sin limpiar la tabla y la temporal este de mas, ¿no?

[[Caral]]

Hola
Mira que sencillo.
Si la tabla temporal es para borrar el contenido del dbgrid esta de mas.
Para que no se vea el contenido ya que usas Tables haces un filtro, al numero de factura, por ejemplo la factura 0 que no tenga nada, el dbgrid quedara vacio ya que no tendra datos.
Creo que por el nivel al que llevas el programa te estas complicando la vida con el uso de sql, de momento.
De todos modos, si sigues empeñado en el uso de la tabla temporal haz un filtro y ya.

Código Delphi [-]
var
   Filtro : String;
begin
   If (DBEdit5.Text <> '') then
   begin
      Table2.Filtered := False;
      Filtro := 'ID_Factura = '+DBEdit5.Text;
     Table2.Filter := Filtro;
      Table2.Filtered := True
   end
   else Table2.Filtered := False;
end;

Es lo mismo que haras sin la tabla temporal, directamente.
Este codigo lo puedes poner en el boton Nueva Factura.
Saludos
NOTA: Si no funciona con el dbedit5 que es el que tiene el numero de factura entonces crea una variable.
Si quieres que no muestre nada, osea, limpio el dbgrid3, en vez del dbedit5 pon el numero cero (0) si esa factura no tiene nada o incluso no existe.

[[Caral]]

Hola
No ver contenido del dbgrid sin borrar nada en ninguna tabla.
Boton Nueva factura.

Código Delphi [-]
var
   Filtro : String;
   fact: Integer;
begin
     fact:= 0:
     Table2.Filtered := False;
     Filtro := 'ID_Factura = '+fact;
     Table2.Filter := Filtro;
     Table2.Filtered := True
   end
   else Table2.Filtered := False;
end;

saludos

[DOS]

Prove el codigo, limpia el Grid pero deja un registro, pero esto significa que deberia un DBEedit para la carga del numero de factura en la primer solapa, no? para que sea mas visual y no confundir al usuario, que opinas?.
en la primera pone todos los datos y carga inclusive el numero de factura.
en la segunda lo ve mas limpio para poder guardar e imprimir la factura
en la tercera el historico de todas la facturas realizadas.
Saludos.

[[Caral]]

Hola
Yo quitaría la solapa de detalle esta de mas y pondria los dos botones que quedan en la primera solapa.
En la solapa de historial tambien haria un filtro, pero esta vez por cliente ya que se supone que es el historial de alguien.
Otra cosa que haria seria eliminar el boton de sub total y de total, estan de mas.
Saludos

[DOS]

el ultimo codigo me tira un error Incompatible types: 'String' and 'Integer' aunque a filtro lo cambie por integer
en estas lineas

Código Delphi [-]
Filtro := 'ID_Factura '= + fact;
     Table2.Filter := Filtro;

Voy a tener muy en cuenta tus consejos, saludos.

[[Caral]]

Hola
Tienes que cambiar a fact por string;
El problema no esta en filtro, esta en fact:

Código Delphi [-]
var
   Filtro : String;
   fact: String;
begin
     fact:= '0':
     Table2.Filtered := False;
     Filtro := 'ID_Factura = '+fact;
     Table2.Filter := Filtro;
     Table2.Filtered := True
   end
   else Table2.Filtered := False;
end;

Eso quiere decir que el numero de factura en el campo factura es string y no integer.
Para eliminar los botones creas un procedimiento con el codigo del boton 2 y el boton 3 lo llamas cuando necesites.
Asi simplemente cuando le des doble click al dbgrdi2 saldra el subtotal y el total, en cuanto al descuento e incremento se hace lo mismo, se llama al procedimiento y listo.
Saludos
No estoy muy seguro en paradox, recuerda que de esto no se amigo.