Scannear fotos desde VFP

Mira, te paso un código que funciona con VFP y Windows 2000 y ya lo puse
anteriormente en el grupo:

Puedes probar el control de Kodak que viene con el Imaging (solo en Win2K,
no en WinXP) el archivo OCX se llama ImgScan.ocx y el control
"Imaging.ScanCtrl".

Te agrego unas líneas de un ejemplo en VFP:

loForm = CREATEOBJECT("Form")
loForm.AddObject("oleScan", "OleControl","Imaging.ScanCtrl.1")
loForm.oleScan.ScanTo = 1
loForm.oleScan.DestImageControl = "c:\"
loForm.oleScan.FileType = 6
loForm.oleScan.Image = "c:\Imagen.jpg"
loForm.oleScan.Scroll = .F.
loForm.oleScan.ShowSetupBeforeScan = .F.
loForm.oleScan.StopScanBox = .F.
loForm.oleScan.StartScan()


Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos




"Cristian Torres" escribió en el mensaje
news:ukKZw5$

Hola amigos, alguno de Ustedes ha desarrollado alguna aplicación con vfp,
que pueda obtener una foto desde un scanner y/ó una webcam¿?, si alguien

lo

ha hecho y me pueda ayudar estare muy agradecido.

Atte
Cristian Torres

Ejemplo de scannear ...
www.davphantom.net/index.asp?modulo=3&id"1

David Amador T.
WebMaster de "La Web de Davphantom"
www.davphantom.net
Cartagena. Colombia
Tel.(5) 6621502 - 6581523 - Cel. 310 - 6581865


"Cristian Torres" escribió en el mensaje
news:ukKZw5$

Hola amigos, alguno de Ustedes ha desarrollado alguna aplicación con vfp,
que pueda obtener una foto desde un scanner y/ó una webcam¿?, si alguien

lo

ha hecho y me pueda ayudar estare muy agradecido.

Atte
Cristian Torres

Gracias Luis y David por la ayuda.

"Luis María Guayán" escribió en el mensaje
news:

Mira, te paso un código que funciona con VFP y Windows 2000 y ya lo puse
anteriormente en el grupo:

Puedes probar el control de Kodak que viene con el Imaging (solo en Win2K,
no en WinXP) el archivo OCX se llama ImgScan.ocx y el control
"Imaging.ScanCtrl".

Te agrego unas líneas de un ejemplo en VFP:

loForm = CREATEOBJECT("Form")
loForm.AddObject("oleScan", "OleControl","Imaging.ScanCtrl.1")
loForm.oleScan.ScanTo = 1
loForm.oleScan.DestImageControl = "c:\"
loForm.oleScan.FileType = 6
loForm.oleScan.Image = "c:\Imagen.jpg"
loForm.oleScan.Scroll = .F.
loForm.oleScan.ShowSetupBeforeScan = .F.
loForm.oleScan.StopScanBox = .F.
loForm.oleScan.StartScan()


Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos




"Cristian Torres" escribió en el mensaje
news:ukKZw5$
> Hola amigos, alguno de Ustedes ha desarrollado alguna aplicación con

vfp,

> que pueda obtener una foto desde un scanner y/ó una webcam¿?, si alguien
lo
> ha hecho y me pueda ayudar estare muy agradecido.
>
> Atte
> Cristian Torres
>
>