problema con borrado de datos de una tabla

[rogercito]

hola el problema que tengo es el siguiente:

Yo tengo un dbgrid que me muestra datos proveniente de una tabla.
Yo quisiera:

1) Una vez que los datos son mostrados.Guardarlos en otra tabla auxiliar y eliminar la tabla que esta enlazada al dbgrid

[[oscarac]]

eliminar la tabla o eliminar los datos de la tabla

me imagino que es eliminar los datos de la tabla porque este post tiene que ver con el que pusiste anteriormente

a grandes rasgos

Código Delphi [-]
 
Insert into TablaAuxiliar Select * from TabladelGrid
delete from TabladelGrid

[rogercito]

eso lo tendria que poner donde estoy poniendo el boton de guardar supuestamente. Pero pongo el codigo y me sale un error. Ya abri la otra tabla

gracias

[ecfisa]

Hola.

¿ Con que componentes estás trabajando ?

Saludos.

[rogercito]

estoy trabajando con tablas dbase III+ el codigo que tengo es el siguiente

procedure TForm23.Button3Click(Sender: TObject);
begin

table6.open;
dbgrid1.show;
table7.open;
Insert (into table7 Select * from table6)
delete from Table6

end;

[ecfisa]

Hola.

Agrega un TQuery al form y luego este código:

Código Delphi [-]
  // Pasar y borrar
  with Query1 do
  begin
    SQL.Text:='INSERT INTO TABLE7 * FROM TABLE6';
    ExecSQL;
    Close;
    SQL.Text:= 'DELETE FROM TABLE6';
    ExecSQL;
  end;

Saludos.

[[oscarac]]

Empezado por rogercito

estoy trabajando con tablas dbase III+ el codigo que tengo es el siguiente

procedure TForm23.Button3Click(Sender: TObject);
begin

table6.open;
dbgrid1.show;
table7.open;
Insert (into table7 Select * from table6)
delete from Table6

end;

Dbase III dbf ???

[[oscarac]]

eso mismo... con que componentes estas trabajando?

podrias colocar un adoquery y en la propiedad Sql podrias colocar las instrucciones que te mencione anteriormente.. algo asi

Código Delphi [-]
 
Adoquery1.Clear;
adoquery1.Sql.Add('Insert into TablaAuxiliar Select * from TabladelGrid')
adoquery1.ExecSQL;
 
Adoquery1.Clear;
adoquery1.Sql.Add('delete from TabladelGrid')
adoquery1.ExecSQL;

ahora es una forma... no quiere decir que no existan otras mejores