Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Use scanner
Message
De
20/12/2004 15:55:17
 
 
À
20/12/2004 15:44:16
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Versions des environnements
Visual FoxPro:
VFP 8
Divers
Thread ID:
00970779
Message ID:
00970809
Vues:
19
hi,
thanks .
ok. where i can put this code under at myform.
cwpicfile,cwemployee? what's that mean.
>>procedure thisform.refresh
>>cwemployee  = allt(thisform.text1.value)  && place for employee code
>>
>>cwpicfile   = forcepath(cwemployee + ".jpg", "d:\tal\images\")
>>
>>thisform.imgemployee.picture = iif(file(cwpicfile), cwpicfile, "")
>>thisform.imgemployee.visible = file(cwpicfile)
>>endproc
>>
m.qasem
>Mohammed,
>
>Claudio told you how to SHOW the picture. To get the picture from your scanner into your PC is a totally different issue, to get this job done, you need to buy a scanning program which can be controlled by VFP. One of those program is ImageMan which you can read more about here: http://www.hallogram.com/imageman/index.html. But be prepared for a lot of reading and testing. :-)
>
>>hi,
>>sory but i don't understand,
>>if i insert at myform via thisform.text1.value =8 (employee number.)
>>and i complate all employee data as name ,age ,salary ...etc
>>i put his picture at the scanner to save it as the same employee number,
>>how,pls. if you can step by step.
>>thanks alot.
>>m.qasem
>>
>>
>>procedure thisform.refresh
>>cwemployee  = allt(thisform.text1.value)  && place for employee code
>>
>>cwpicfile   = forcepath(cwemployee + ".jpg", "d:\tal\images\")
>>
>>thisform.imgemployee.picture = iif(file(cwpicfile), cwpicfile, "")
>>thisform.imgemployee.visible = file(cwpicfile)
>>endproc
>>
>>
>>
>>>>thank you for reply,
>>>>i get error message file d:\tal\images\55.jpj dose not exist
>>>>
>>>>but how i can link between employee number and his picture ,mean employee number is 8 ,at the same time with command button link with scanner to giv this picture the same number 8 ..
>>>>thanks
>>>>m.qasem
>>>
>>>
>>>procedure thisform.refresh
>>>cwemployee  = allt(thisform.text1.value)  && place for employee code
>>>
>>>cwpicfile   = forcepath(cwemployee + ".jpg", "d:\tal\images\")
>>>
>>>thisform.imgemployee.picture = iif(file(cwpicfile), cwpicfile, "")
>>>thisform.imgemployee.visible = file(cwpicfile)
>>>endproc
>>>
>>>
>>>Claudio
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform