Xailer & OZ Software

Hola a Todos !
Tengo una Imagen (Archivo en Formato BMP), que se crea con este codigo
Preguntas :
1. Deseo convertir el archivo con la Imagen y grabarlo en un campo BLOB
(Image) de Advantage , estoy usando ADT y tengo definido un campo IMAGE que
se llama FOTO, en el cual deseo grabar la Imagen., cual es la manera
correcta de hacerlo, estoy haciendo esto, pero no me graba nada en el campo
IMAGE
METHOD TomarFoto( oSender ) CLASS TCamaraWeb
Local hBitmap,oClip,cImagen
If ::startcap
SendMessage(::hwdc, WM_CAP_GET_FRAME,0,0)
SendMessage(::hwdc, WM_CAP_COPY, 0, 0); // La copio al portapeles
WITH OBJECT oClip:=TClipboard():New(::oForm)
hBitmap := :GetData(CF_BITMAP )
END
IF ! Empty( hBitmap )
::oImage1:oPicture := TPicture():CreateIndirect( 1, hBitmap )
IF ::oImage1:oPicture:Ispicture()
* ::oImage1:oPicture:Save('.IMAGEN.BMP' )
::oImage1:oPicture:SaveToStream(cImagen ) <== USO ESTE METODO PARA
GRABAR LA IMAGEN A UN BUFFER (VARIABLE )
AppData:DSClientes:Foto:=cImagen <====== LA ASIGNO AL CAMPO DEL
DATASET ANTES DE HACER UPDATE()
ENDIF
oClip:Empty()
ENDIF
ENDIF
IF ::startcap
SendMessage(::hwdc, WM_CAP_DRIVER_DISCONNECT, 0&, 0&)
::startcap =.f.
End If
::Close()
RETURN Nil
Cuando abro la Tabla de Clientes y veo el campo Foto ques de tipo Image y no
hay nada grabado. (Claro previamente hize Update())
Que estoy haciendo mal ?

Martin:
Es que no lees mi blog... a ver si te pasas mas seguido por ahi, este es
el articulo que necesitas:
http://objetopersistente.blogspot.com/2 ... enes-y-cam pos-memo-guia-de.html
Saludos
Rene Flores
http://www.ciber-tec.com
del Angel escribió:
> Hola a Todos !
>
> Tengo una Imagen (Archivo en Formato BMP), que se crea con este codigo
> Preguntas :
>
> 1. Deseo convertir el archivo con la Imagen y grabarlo en un campo BLOB
> (Image) de Advantage , estoy usando ADT y tengo definido un campo IMAGE que
> se llama FOTO, en el cual deseo grabar la Imagen., cual es la manera
> correcta de hacerlo, estoy haciendo esto, pero no me graba nada en el campo
> IMAGE
>
>
>
>
> METHOD TomarFoto( oSender ) CLASS TCamaraWeb
> Local hBitmap,oClip,cImagen
>
> If ::startcap
> SendMessage(::hwdc, WM_CAP_GET_FRAME,0,0)
> SendMessage(::hwdc, WM_CAP_COPY, 0, 0); // La copio al portapeles
>
> WITH OBJECT oClip:=TClipboard():New(::oForm)
> hBitmap := :GetData(CF_BITMAP )
> END
> IF ! Empty( hBitmap )
> ::oImage1:oPicture := TPicture():CreateIndirect( 1, hBitmap )
> IF ::oImage1:oPicture:Ispicture()
> * ::oImage1:oPicture:Save('.IMAGEN.BMP' )
> ::oImage1:oPicture:SaveToStream(cImagen ) <== USO ESTE METODO PARA
> GRABAR LA IMAGEN A UN BUFFER (VARIABLE )
> AppData:DSClientes:Foto:=cImagen <====== LA ASIGNO AL CAMPO DEL
> DATASET ANTES DE HACER UPDATE()
> ENDIF
> oClip:Empty()
> ENDIF
>
> ENDIF
> IF ::startcap
> SendMessage(::hwdc, WM_CAP_DRIVER_DISCONNECT, 0&, 0&)
> ::startcap =.f.
> End If
> ::Close()
>
> RETURN Nil
>
> Cuando abro la Tabla de Clientes y veo el campo Foto ques de tipo Image y no
> hay nada grabado. (Claro previamente hize Update())
>
> Que estoy haciendo mal ?
>
>
>
>

Hola Rene !
Lo lei varias veces, mucho antes de que se me presentara esta situación.
y supuse que tu serias el primero en contestarme y asi fue (jejejeje)
Ya lo habia intentado pero me marco error, en el ejemplo que tienes en tu
BLOG , no usas DataSets, no se si eso sea la diferencia, ya lo habia
intentado como tu dices
AdsFile2Blob('.imagen.bmp',::oDSClientes:Foto,ADS_IMAGE)
y me marco este error:
Subsistema: DBCMD
Código de error: 1014
Estado: .F.
Descripción: Argument error
Operación: ADSFILE2BLOB
Argumentos:
Fichero:
Código error SO: 0
Tal vez sea el segundo parametro ::oDSClientes:Foto Donde Foto es el
Campo IMAGE de la Tabla ADT , no se si ese sea el problema, que requiera
el campo en forma directa y no un campo por medio del DataSet.
Por eso intente el metodo de TPicture:SaveToStream()
Me ayudas a resolverlo ?
"Rene Flores" <"rflores[nospam]"@ciber-tec.com> wrote in message
news:46bbdb83$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Martin:
>
> Es que no lees mi blog... a ver si te pasas mas seguido por ahi, este es
> el articulo que necesitas:
>
> http://objetopersistente.blogspot.com/2 ... enes-y-cam pos-memo-guia-de.html
>
> Saludos
>
> Rene Flores
> http://www.ciber-tec.com
>
> del Angel escribió:
>> Hola a Todos !
>>
>> Tengo una Imagen (Archivo en Formato BMP), que se crea con este codigo
>> Preguntas :
>>
>> 1. Deseo convertir el archivo con la Imagen y grabarlo en un campo BLOB
>> (Image) de Advantage , estoy usando ADT y tengo definido un campo IMAGE
>> que se llama FOTO, en el cual deseo grabar la Imagen., cual es la manera
>> correcta de hacerlo, estoy haciendo esto, pero no me graba nada en el
>> campo IMAGE
>>
>>
>>
>>
>> METHOD TomarFoto( oSender ) CLASS TCamaraWeb
>> Local hBitmap,oClip,cImagen
>>
>> If ::startcap
>> SendMessage(::hwdc, WM_CAP_GET_FRAME,0,0)
>> SendMessage(::hwdc, WM_CAP_COPY, 0, 0); // La copio al portapeles
>>
>> WITH OBJECT oClip:=TClipboard():New(::oForm)
>> hBitmap := :GetData(CF_BITMAP )
>> END
>> IF ! Empty( hBitmap )
>> ::oImage1:oPicture := TPicture():CreateIndirect( 1, hBitmap )
>> IF ::oImage1:oPicture:Ispicture()
>> * ::oImage1:oPicture:Save('.IMAGEN.BMP' )
>> ::oImage1:oPicture:SaveToStream(cImagen ) <== USO ESTE METODO
>> PARA GRABAR LA IMAGEN A UN BUFFER (VARIABLE )
>> AppData:DSClientes:Foto:=cImagen <====== LA ASIGNO AL CAMPO
>> DEL DATASET ANTES DE HACER UPDATE()
>> ENDIF
>> oClip:Empty()
>> ENDIF
>>
>> ENDIF
>> IF ::startcap
>> SendMessage(::hwdc, WM_CAP_DRIVER_DISCONNECT, 0&, 0&)
>> ::startcap =.f.
>> End If
>> ::Close()
>>
>> RETURN Nil
>>
>> Cuando abro la Tabla de Clientes y veo el campo Foto ques de tipo Image y
>> no hay nada grabado. (Claro previamente hize Update())
>>
>> Que estoy haciendo mal ?
>>
>>
>>

A ver mi querido Martin:
Tomado de mi blog:
La sintaxis es:
AdsFile2Blob(nombre del archivo, *nombre del campo*, tipo de campo)
Donde:
nombre del archivo es el nombre del archivo que deseamos leer
*nombre del campo* es el nombre del campo blob donde se guardará el
archivo leido
tipo de campo es el tipo de campo (imagen o binario) que esta definido
en una constante predefinida dentro del archivo ACE.H y que es:
#define ADS_BINARY 6 /* BLOB - any data */
#define ADS_IMAGE 7 /* BLOB - bitmap */
y tu estas poniendo:
> AdsFile2Blob('.imagen.bmp',::oDSClientes:Foto,ADS_IMAGE)
¿ y que es ::oDSClientes:Foto ? es el *VALOR* del campo, NO el *nombre*
Solo tienes que hacer esto compañero:
AdsFile2Blob('.imagen.bmp','foto',ADS_IMAGE)
Asi de facil.....
Los objetos sirven para muchas cosas, pero no siempre sirven para todo.
Saludos
Rene Flores
http://www.ciber-tec.com

Muchas Gracias Rene!
Ya quedo, como siempre la voz de experiencia.
Muchas gracias nuevamente.
Sabes voy a necesitar un cursito de Advantage para hacerme Master. (jejeje)
dime cuando tengas uno..
Saludos...
"Rene Flores" <"rflores[nospam]"@ciber-tec.com> wrote in message
news:46be54e9$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>A ver mi querido Martin:
>
> Tomado de mi blog:
>
> La sintaxis es:
>
> AdsFile2Blob(nombre del archivo, *nombre del campo*, tipo de campo)
>
> Donde:
>
> nombre del archivo es el nombre del archivo que deseamos leer
> *nombre del campo* es el nombre del campo blob donde se guardará el
> archivo leido
> tipo de campo es el tipo de campo (imagen o binario) que esta definido en
> una constante predefinida dentro del archivo ACE.H y que es:
>
> #define ADS_BINARY 6 /* BLOB - any data */
> #define ADS_IMAGE 7 /* BLOB - bitmap */
>
> y tu estas poniendo:
>
>> AdsFile2Blob('.imagen.bmp',::oDSClientes:Foto,ADS_IMAGE)
>
> ¿ y que es ::oDSClientes:Foto ? es el *VALOR* del campo, NO el *nombre*
>
> Solo tienes que hacer esto compañero:
>
> AdsFile2Blob('.imagen.bmp','foto',ADS_IMAGE)
>
> Asi de facil.....
>
> Los objetos sirven para muchas cosas, pero no siempre sirven para todo.
>
> Saludos
>
> Rene Flores
> http://www.ciber-tec.com
>
>

Martin:
El curso de ADS, que incluye instalación, puesta a punto, balanceo del
servidor y programación para tu herramienta en particular, va incluido
sin costo en la compra del producto, si tu licencia es de 10 o mas
usuarios, nosotros vamos a cualquier parte de Mexico a dar todo el servicio.
Saludos
Rene Flores
http://www.ciber-tec.com
del Angel escribió:
> Muchas Gracias Rene!
>
> Ya quedo, como siempre la voz de experiencia.
>
> Muchas gracias nuevamente.
>
> Sabes voy a necesitar un cursito de Advantage para hacerme Master. (jejeje)
>
>
> dime cuando tengas uno..
>
> Saludos...
>
>
>
>
>
>
>
>
> "Rene Flores" <"rflores[nospam]"@ciber-tec.com> wrote in message
> news:46be54e9$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>> A ver mi querido Martin:
>>
>> Tomado de mi blog:
>>
>> La sintaxis es:
>>
>> AdsFile2Blob(nombre del archivo, *nombre del campo*, tipo de campo)
>>
>> Donde:
>>
>> nombre del archivo es el nombre del archivo que deseamos leer
>> *nombre del campo* es el nombre del campo blob donde se guardará el
>> archivo leido
>> tipo de campo es el tipo de campo (imagen o binario) que esta definido en
>> una constante predefinida dentro del archivo ACE.H y que es:
>>
>> #define ADS_BINARY 6 /* BLOB - any data */
>> #define ADS_IMAGE 7 /* BLOB - bitmap */
>>
>> y tu estas poniendo:
>>
>>> AdsFile2Blob('.imagen.bmp',::oDSClientes:Foto,ADS_IMAGE)
>> ¿ y que es ::oDSClientes:Foto ? es el *VALOR* del campo, NO el *nombre*
>>
>> Solo tienes que hacer esto compañero:
>>
>> AdsFile2Blob('.imagen.bmp','foto',ADS_IMAGE)
>>
>> Asi de facil.....
>>
>> Los objetos sirven para muchas cosas, pero no siempre sirven para todo.
>>
>> Saludos
>>
>> Rene Flores
>> http://www.ciber-tec.com
>>
>>
>
>

Rene
Leyendo tu Blog he visto que no especifica como hacerle para que no me de
error al grabar.
He estado leyendo esto:
Antes de ponernos a pegarle la "C" para hacer wrappers para llamar a las
funciones que nos faltaban, se nos ocurrió revisar el código fuente del
RDDADS, mismo que se puede encontrar dentro de las contribuciones de
xHarbour, y en el archivo ADSFUNC.C encontramos 2 funciones que nos salvaron
de estar perdiendo el tiempo con código en "C": AdsBlob2File() y
AdsFile2Blob(), estas funciones son wrappers muy elaborados para las
funciones AdsFileToBinary() y AdsBinaryToFile(), solo que sus parámetros son
mas simples de manejar.
La sintaxis es:
AdsFile2Blob(nombre del archivo, nombre del campo, tipo de campo)
Donde:
nombre del archivo es el nombre del archivo que deseamos leer
nombre del campo es el nombre del campo blob donde se guardará el archivo
leido
tipo de campo es el tipo de campo (imagen o binario) que esta definido en
una constante predefinida dentro del archivo ACE.H y que es:
#define ADS_BINARY 6 /* BLOB - any data */
#define ADS_IMAGE 7 /* BLOB - bitmap */
BUENO, EL CASO ES QUE TENGO EL SIGUIENTE ERRROR:
Variable ADS_IMAGE no existe, y he incluido el ACE.h dentro de mi
aplicacion, que podria hacer, si declaro:
#define ADS_BINARY 6 /* BLOB - any data */
#define ADS_IMAGE 7 /* BLOB - bitmap */
Tambien me da error, que me aconsejas?
Saluidos
/********************************************

Hola René:
He empezado a hacer pruebas basandome en tu blog, solo tengo unas dudas:
- Cuando usas AdsBlob2File("imagen.jpg",campoblob), creas la imagen en el disco, pero..., para cargarla al sistema y presentarla usas TPicture():LoadFromStream() ?
- Si el usuario pasa mas de una vez por el campo, usas algun buffer para no volver a cargar la imagen desde el servidor?
Gracias de antemano.
--
Ramón Zea
01.993.194.14.27
http://www.paginasprodigy.com/zeasoftware/
zeasoftware@prodigy.net.mx
zeasoftware@hotmail.com
ramonzea@yahoo.com
zeasoft.movil@hotmail.com
"Rene Flores" <"rflores[nospam]"@ciber-tec.com> escribió en el mensaje news:46be54e9$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>A ver mi querido Martin:
>
> Tomado de mi blog:
>
> La sintaxis es:
>
> AdsFile2Blob(nombre del archivo, *nombre del campo*, tipo de campo)
>
> Donde:
>
> nombre del archivo es el nombre del archivo que deseamos leer
> *nombre del campo* es el nombre del campo blob donde se guardará el
> archivo leido
> tipo de campo es el tipo de campo (imagen o binario) que esta definido
> en una constante predefinida dentro del archivo ACE.H y que es:
>
> #define ADS_BINARY 6 /* BLOB - any data */
> #define ADS_IMAGE 7 /* BLOB - bitmap */
>
> y tu estas poniendo:
>
>> AdsFile2Blob('.imagen.bmp',::oDSClientes:Foto,ADS_IMAGE)
>
> ¿ y que es ::oDSClientes:Foto ? es el *VALOR* del campo, NO el *nombre*
>
> Solo tienes que hacer esto compañero:
>
> AdsFile2Blob('.imagen.bmp','foto',ADS_IMAGE)
>
> Asi de facil.....
>
> Los objetos sirven para muchas cosas, pero no siempre sirven para todo.
>
> Saludos
>
> Rene Flores
> http://www.ciber-tec.com
>
>
--

Rene
Leyendo tu Blog he visto que no especifica como hacerle para que no me de
error al grabar. GPF
He estado leyendo esto:
Antes de ponernos a pegarle la "C" para hacer wrappers para llamar a las
funciones que nos faltaban, se nos ocurrió revisar el código fuente del
RDDADS, mismo que se puede encontrar dentro de las contribuciones de
xHarbour, y en el archivo ADSFUNC.C encontramos 2 funciones que nos salvaron
de estar perdiendo el tiempo con código en "C": AdsBlob2File() y
AdsFile2Blob(), estas funciones son wrappers muy elaborados para las
funciones AdsFileToBinary() y AdsBinaryToFile(), solo que sus parámetros
son
mas simples de manejar.
La sintaxis es:
AdsFile2Blob(nombre del archivo, nombre del campo, tipo de campo)
Donde:
nombre del archivo es el nombre del archivo que deseamos leer
nombre del campo es el nombre del campo blob donde se guardará el archivo
leido
tipo de campo es el tipo de campo (imagen o binario) que esta definido en
una constante predefinida dentro del archivo ACE.H y que es:
#define ADS_BINARY 6 /* BLOB - any data */
#define ADS_IMAGE 7 /* BLOB - bitmap */
BUENO, EL CASO ES QUE TENGO EL SIGUIENTE ERRROR:
Variable ADS_IMAGE no existe, y he incluido el ACE.h dentro de mi
aplicacion, que podria hacer, si declaro dentro de mi formulario:
#define ADS_BINARY 6 /* BLOB - any data */
#define ADS_IMAGE 7 /* BLOB - bitmap */
Me salta el error de GPF, que me aconsejas?, me puedes ayudar?
Saludos
Saluidos

Ramón:
> - Cuando usas *AdsBlob2File("imagen.jpg",campoblob)*, creas la imagen en
> el disco, pero..., para cargarla al sistema y presentarla usas
> *TPicture():LoadFromStream() *?
> - Si el usuario pasa mas de una vez por el campo, usas algun buffer para
> no volver a cargar la imagen desde el servidor?
Cuando se nos planteo esta necesidad de meter las imagenes a los campos
blob, fue para presentar listas de personas las cuales deberí­an ir con
sus respectivas fotos.
Como el acceso a los datos se hace de manera remota por internet y como
solo se puede consultar una lista por vez, que no tiene mas de 60
personas, lo que hacemos es generar 60 archivos JPG en la carpeta de
temporales de windows del equipo cliente.
Digamos que la cosa funciona asi: hay un listado de grupos de personas
metido en un browse, tu seleccionas que grupo quieres revisar, y en ese
momento se hace un scope en la tabla donde estan los datos de las
personas y se hace do while ! eof(), generando archivos de imagen
temporales en la carpeta temp del cliente, luego cuando aparece el
browse con la lista de personas, se va mostrando la foto cargandola
directamente desde el archivo, por mas rapido que te muevas sobre el
browse, la imagen se carga bastante rapido tambien, porque esta en el
equipo local.
Lo que si ignoro es si se puede hacer un
TPicture:LoadFromStream(campoblob) y cargar todo en la memoria como
indica xailer, de entrada no he podido ver el contenido del campo blob
poqrue si intentas hacer un MsgInfo(campoblob) te dice que no es un tipo
de variable valido (obvio, no es un numero, ni logico, ni fecha, ni
cadena, es un blob), tal vez Jose Gimenez nos pueda arrojar una luz
sobre esto.
No lo he probado, pero se podria intentar.
Saludos
Rene Flores
http://www.ciber-tec.com
>
> Gracias de antemano.
> --
> Ramón Zea
> 01.993.194.14.27
> http://www.paginasprodigy.com/zeasoftware/
> zeasoftware@prodigy.net.mx <mailto:zeasoftware@prodigy.net.mx>
> zeasoftware@hotmail.com <mailto:zeasoftware@hotmail.com>
> ramonzea@yahoo.com <mailto:ramonzea@yahoo.com>
> zeasoft.movil@hotmail.com <mailto:zeasoft.movil@hotmail.com>
> "Rene Flores" <"rflores[nospam]"@ciber-tec.com
> <mailto:"rflores[nospam]"@ciber-tec.com>> escribió en el mensaje
> news:46be54e9$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> >A ver mi querido Martin:
> >
> > Tomado de mi blog:
> >
> > La sintaxis es:
> >
> > AdsFile2Blob(nombre del archivo, *nombre del campo*, tipo de campo)
> >
> > Donde:
> >
> > nombre del archivo es el nombre del archivo que deseamos leer
> > *nombre del campo* es el nombre del campo blob donde se guardará el
> > archivo leido
> > tipo de campo es el tipo de campo (imagen o binario) que esta definido
> > en una constante predefinida dentro del archivo ACE.H y que es:
> >
> > #define ADS_BINARY 6 /* BLOB - any data */
> > #define ADS_IMAGE 7 /* BLOB - bitmap */
> >
> > y tu estas poniendo:
> >
> >> AdsFile2Blob('.imagen.bmp',::oDSClientes:Foto,ADS_IMAGE)
> >
> > ¿ y que es ::oDSClientes:Foto ? es el *VALOR* del campo, NO el *nombre*
> >
> > Solo tienes que hacer esto compañero:
> >
> > AdsFile2Blob('.imagen.bmp','foto',ADS_IMAGE)
> >
> > Asi de facil.....
> >
> > Los objetos sirven para muchas cosas, pero no siempre sirven para todo.
> >
> > Saludos
> >
> > Rene Flores
> > http://www.ciber-tec.com
> >
> >

Carlos:
> Leyendo tu Blog he visto que no especifica como hacerle para que no me de
> error al grabar.
Tu programa te va a generar un GPF si tu campo no es especificamente
tipo IMAGE, no vale ponerlo como blob, tienes que especificar si es tipo
Image o tipo Binary, eso lo puedes checar con el ARC.
Si en tu archivo ADT tu lo indicas como blob a secas seguro te va a
generar un gpf al momento de intentar guardar los datos.
Saludos
Rene Flores
http://www.ciber-tec.com

René,
> Lo que si ignoro es si se puede hacer un
> TPicture:LoadFromStream(campoblob) y cargar todo en la memoria como indica
> xailer,
Debería funcionar.
Un saludo,
--
Ignacio Ortiz de Zúñiga
[Soporte Xailer]

Rene.
Resulta que al revizar, con el ARC, me he dado cuenta que tengo el campo
foto como imagen, claro, los archivos son "dbf", tendra que ver eso que me
siga dando el GPF?
Saludos
Rene Flores <"rflores[nospam]"@ciber-tec.com> wrote:
>Carlos:
>
>> Leyendo tu Blog he visto que no especifica como hacerle para que no me
de
>> error al grabar.
>
>Tu programa te va a generar un GPF si tu campo no es especificamente
>tipo IMAGE, no vale ponerlo como blob, tienes que especificar si es tipo
>Image o tipo Binary, eso lo puedes checar con el ARC.
>
>Si en tu archivo ADT tu lo indicas como blob a secas seguro te va a
>generar un gpf al momento de intentar guardar los datos.
>
>Saludos
>
>Rene Flores
>http://www.ciber-tec.com

Rene.
Resulta que al revizar, con el ARC, me he dado cuenta que tengo el campo
foto como imagen, claro, los archivos son "dbf", tendra que ver eso que me
siga dando el GPF?
Saludos
Rene Flores <"rflores[nospam]"@ciber-tec.com> wrote:
>Carlos:
>
>> Leyendo tu Blog he visto que no especifica como hacerle para que no me
de
>> error al grabar.
>
>Tu programa te va a generar un GPF si tu campo no es especificamente
>tipo IMAGE, no vale ponerlo como blob, tienes que especificar si es tipo
>Image o tipo Binary, eso lo puedes checar con el ARC.
>
>Si en tu archivo ADT tu lo indicas como blob a secas seguro te va a
>generar un gpf al momento de intentar guardar los datos.
>
>Saludos
>
>Rene Flores
>http://www.ciber-tec.com

Rene Flores
Explicame por favor Rene eso del curso, a lo mejor me interesa participar.
Te recuerdo que soy un cubano que esta viviendo en Mexicali, mi nombre es
Carlos Cedeño Vera.

Rene Flores
Explicame por favor Rene eso del curso, a lo mejor me interesa participar.
Te recuerdo que soy un cubano que esta viviendo en Mexicali, mi nombre es
Carlos Cedeño Vera.

Carlos:
> Resulta que al revizar, con el ARC, me he dado cuenta que tengo el campo
> foto como imagen, claro, los archivos son "dbf", tendra que ver eso que me
> siga dando el GPF?
El invento no funciona sobre tablas DBFs solo sobre tablas ADT porque
solo las tablas ADT soportan el tipo de campo BLOB/IMAGE/BINARY, ese
tipo de campo no existe en el formato DBF (teoricamente el campo memo
del CDX, el FPT podrí­a funcionar, pero no lo he probado)
Tienes que cambiar de formato de archivo.
Saludos
Rene Flores
http://www.ciber-tec.com

Ok, muchas gracias Rene.
Ahora, tengo que me da problema al abril la tabla.
Creen un AdsDataSource!!!!
WITH OBJECT oAds
:cConnect := ".Datos"
:nFileType := AfAdt
:nServerType := AsDEFAULT
:lConnected := .T.
END
Creo un TdbfDataSet
WITH OBJECT oAdtAlu
:cName := "Alumnos.Adt"
:oPen := .T.
END
Me da el siguiente error:
DBUSEAREA(0)
Error ADSADT/6420 Open error: J:CtrlClases.Alumnos1.adt
Argumentos: ()
Ojala me pueda ayudar amigo es lo unico que necesito para terminar una pequeña
aplicacion de control de alumnos de una escuela de baile.
Rene Flores <"rflores[nospam]"@ciber-tec.com> wrote:
>Carlos:
>
>> Resulta que al revizar, con el ARC, me he dado cuenta que tengo el campo
>> foto como imagen, claro, los archivos son "dbf", tendra que ver eso que
me
>> siga dando el GPF?
>
>El invento no funciona sobre tablas DBFs solo sobre tablas ADT porque
>solo las tablas ADT soportan el tipo de campo BLOB/IMAGE/BINARY, ese
>tipo de campo no existe en el formato DBF (teoricamente el campo memo
>del CDX, el FPT podría funcionar, pero no lo he probado)
>
>Tienes que cambiar de formato de archivo.
>
>Saludos
>
>Rene Flores
>http://www.ciber-tec.com

> El invento no funciona sobre tablas DBFs solo sobre tablas ADT porque
> solo las tablas ADT soportan el tipo de campo BLOB/IMAGE/BINARY, ese
> tipo de campo no existe en el formato DBF (teoricamente el campo memo
> del CDX, el FPT podrí­a funcionar, pero no lo he probado)
>
Yo lo probé en los tiempos de FW y si funcionaba meter una imagen en un
campo Memo de un FPT pero con el lí­mite de 64Kb con lo cual no me sirvió
de mucho, pero funciona.
Salu2.