Information générale
Catégorie:
Photos et traitement d'images
You should be ablt to figure this one out....
SELECT pictures
* Make sure the created file contains this picture only!
COPY TO &lcdbf FIELDS &pcfield &pnfor && for upper(&pcField)=upper(pcPict)
lnhandle=FOPEN(lcfile + '.fpt')
lnhandleout=FCREATE(lcfile + '.bmp')
=FSEEK(lnhandle, 599)
DO WHILE !FEOF(lnhandle)
=FWRITE(lnhandleout, FREAD(lnhandle, 512), 512)
ENDDO
=FCLOSE(lnhandle)
=FCLOSE(lnhandleout)
>Hi All,
>I have BMP's in a general field in an app, and I would like to extract them to BMP's. I'm running VFP 7. How can I go about doing this?
>
>Thanks.
>
>Daniel
Précédent
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement