Cita:
Empezado por Pollo2004
TMemoria.first;
while not TMemoria.eof do
begin
TTable.append;
TTableCampo1.asstring:= TMemoriaCampo1.asstring;
TTableCampo2.asstring:= TMemoriaCampo2.asinteger;
" "
TMemoria.next;
end;
Gracias otra vez, y espero su correcion!
|
Si, la idea sería esa, recorrer e insertar, de esa forma o con "insert into ....."
Saluditos