Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Use scanner
Message
From
20/12/2004 16:10:12
 
 
To
20/12/2004 16:02:59
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Environment versions
Visual FoxPro:
VFP 8
Miscellaneous
Thread ID:
00970779
Message ID:
00970813
Views:
11
yes it's clear now,
thank you very much.
m.qasem

>If you read the message carefully, you will notice procedure thisform.refresh. cwpicfile and cwemployee are local variables.
>
>>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
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform