Pasar Tabla de Paradox a Firebird

[JoanKa]

Empezado por Elenita62

Si quieres hacerlo por programación, conecta tus 2 tablas a sus repectivos drivers y en un botón ejecuta un bucle:

If TablaSource.Active = false then
TablaSource.Active := true;
If TablaDestino.Active = false then
TablaDestino.Active := true;
TablaSource.First;
While not TablaSource.EOF do
begin
TablaDestino.Insert;
TablaDestino['Campo1'] := TablaSource['Campo1'];
//Aquí sigues igualando
TablaDestino.Post;
TablaSource.Next;
end;
Espero que te sirva...

Eso lo que estado haciendo
Pero la tabla que esta en paradox uso los componentes siguientes:
TTable
TDataSource
Para la tabla que esta en firebird uso los componentes siguientes:
- IBDatabase1
- IBTransaction1
- IBDataSet1

En el boton que me dijiste, hice esto :

procedure TForm1.Btn_ExportarClick(Sender: TObject);
begin
If T_Paradox.Active = false then
T_Paradox.Active := true;
If IBDS_Firebird.Active = false then
IBDS_Firebird.Active := true;
T_Paradox.First;
While not T_Paradox.EOF do
begin
IBDS_Firebird.Insert;
IBDS_Firebird['codi']:=T_Paradox['codi'];
IBDS_Firebird.Post;
T_Paradox.Next;
end;
end;

y obtengo este mensaje

Project Articulos.exe raised exception class EDatabaseError with message 'IBDS_Firebird:No es posible modificar un DataSet de solo lectura'. Proccess stopped. Use Step or Run to continue.

Y el puntero se pone en la linea verde.

Cual sera el error???

PD

Trabajo con Firebird 1.5 y el administrador IBExpert.

Gracias

[Paoti]

Empezado por JoanKa

:
- IBDatabase1
- IBTransaction1
- IBDataSet1

usa para esto, es mas rapido ya que no haces las sentecias sql tu mismo, las hace.

- IBDatabase1
- IBTransaction1
- IBQuery <--- en su propiedad sql... "Select * from mytabla"
- IBUpdateSQL1


en IBQuery1 en la propiedad UpdateSQL asocialo al IBUpdateSQL1
click boton derecho sobre IBUpdateSQL1, opcion "UpdateSQL Editor"
seleccion tu primary key, y tus campos (Todos) en el recuadro derecho de la ventanita... y dale click en "generate SQL"


ahora ya tienes tu consulta como una tabla editable



nota. al final no te olvides de poner el commit...