Information générale
Catégorie:
Fonctions Windows API
How about something like this:
*
handlein=FOPEN("temp.fpt")
gnEnd=FSEEK(handlein,0,2)
gnTop=FSEEK(handlein,0)
str1=FREAD(handlein, gnEnd)
BitmapHeaderOffset = AT("BM",str1)
IF BitmapHeaderOffset > 0
*Calculate the beginning of the bitmap
BitmapOffset = BitmapHeaderOffset - 1
*Return the bitmap
str2= RIGHT(str1,LEN(str1)- BitmapOffset)
ENDIF
I think there's a VB example in the MS knowledgebase that's about 10x longer...
>Anyone know how to extract a bitmap that was stored in a general field of a table and get it into the
>clipboard? I have looked at the gentofil.prg from the files section and guess that I can copy it to a
>.BMP file, if necessary.
>
>TIA,
>Mike Timpe
Précédent
Suivant
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