Club Builder

[Diego F]

Por que este codigo no me funciona cuando quiero sacar los datos de un campo TBlobField de mi base de datos (paradox)


Table3->Active = true;
Table3->Open();

TMemoryStream* pStream = new TMemoryStream();

pStream->Position = 0;

//Table3Umbral_neurona_proc es una variable de tipo TPersistent
//TBlobField *Table3Umbral_neurona_proc;

Table3Umbral_neurona_proc->SaveToStream(pStream);
pStream->Position = 0;

double prb1[5];

//estos mensajes son para ver los valores iniciales de prb1

ShowMessage("posicion 1 -> " + AnsiString(prb1[0]));
ShowMessage("posicion 2 -> " + AnsiString(prb1[1]));
ShowMessage("posicion 3 -> " + AnsiString(prb1[2]));
ShowMessage("posicion 4 -> " + AnsiString(prb1[3]));
ShowMessage("posicion 5 -> " + AnsiString(prb1[4]));

pStream->Read((void *)&prb1, sizeof(prb1));

//estos mensajes son para ver los nuevos valores que saca de la base

ShowMessage("nueva posicion 1 -> " + AnsiString(prb1[0]));
ShowMessage("nueva posicion 2 -> " + AnsiString(prb1[1]));
ShowMessage("nueva posicion 3 -> " + AnsiString(prb1[2]));
ShowMessage("nueva posicion 4 -> " + AnsiString(prb1[3]));
ShowMessage("nueva posicion 5 -> " + AnsiString(prb1[4]));

delete pStream;

Este codigo no funciona cuando ejecuto mi programa y de una vez llamo esta funcion


Como puedo solucionar esto.

Gracias

[XyVy]

Diego F, perdona sino te puedo ayudar mucho, pues no he usado ni los TPersistent ni TMemoryStream. Lo unico que aprovecho para decirte que cuando haces TTable->Open() builder hace lo siguiente (Segun Builder):

Descripción
LLama a Open para inicializar la propiedad Activa para el Dataset a true, blah blah ....

Es decir que con el Open te sobra.

Por cierto como no he usado esos tipos no se como funcionan pero en que momento te has posiciado en algun registro de la tabla ? y con que metodo has extraido datos de la Tabla ? (perdona si son preguntas un poco fuera de lugar pero no se si se te ha olvidado algo de esto). Por ejemplo cuando yo uso TTable y por ejemplo quiero hacer un recorrido,
pues despues de hacer el TTable->Open(), suelo hacer un TTable->First() o bien me posicion en algun registro concreto, entonces ya puedo leer datos de ese registro.

Ciao y suerte.