Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Zooming into scanned docs
Message
 
 
À
17/12/2001 20:39:42
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00595422
Message ID:
00595470
Vues:
22
Randy,

If you are using the Koday/Wang image controls they support zooming of the image. There are a couple of samples in the files here. I don't know if the sample shows zooming or not, but here is acode fragment I use in a production app that might help:
lparameter roCombo

local lnScale

lnScale = val( alltrim( roCombo.DisplayValue ) )
if ( lnScale > 0 )
   this.oleEdit.Object.Zoom = max( min( 600, lnScale ), 3 )
   return alltrim( str( lnScale ) )
else
   do case
      case ( roCombo.DisplayValue == "Best" )
         this.oleEdit.FitTo( 0 )
      case ( roCombo.DisplayValue == "Width" )
         this.oleEdit.FitTo( 1 )
      case ( roCombo.DisplayValue == "Height" )
         this.oleEdit.FitTo( 2 )
   endcase
   return roCombo.DisplayValue
endif
>How would you add the ZOOM feature to a scanned document called from a VFP7 app?
df (was a 10 time MVP)

df FoxPro website
FoxPro Wiki site online, editable knowledgebase
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform