Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
VFP to Excel: Picture size changes
Message
 
 
À
16/04/2007 21:12:11
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Versions des environnements
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP SP2
Network:
Windows XP
Database:
Visual FoxPro
Divers
Thread ID:
01216558
Message ID:
01216568
Vues:
16
See http://office.microsoft.com/en-us/excel/HP011517241033.aspx?pid=CH062527721033

and http://www.classical-webdesigns.co.uk/resources/pixelinchconvert.html for conversion.

>Dear Experts
>
>From VFP To EXCEL: To insert a picture I use folloiwng procedure.
>The picture insert correctly but my given size is changesd.
>I enterd
>.shaperange.height =3.48 && inches
>.shaperange.width = 6.50 && inches
>but in excel, it displays
>.shaperange.height =0.05
>.shaperange.width = 0.09
>
>How to show picture with given size in inches?
>
>Please help
>
>#define xlmove 2
>public oexcel as excel.application
>oexcel = createobject([Excel.Application])
>oexcel.workbooks.add()
>
>ppicture=addbs(sys(5)) + addbs(sys(2003)) + [Cheque\] + allt('acbl.bmp')
>oexcel.activesheet.pictures.insert(ppicture).select
>with oexcel.selection
>	.shaperange.height =3.48 && inches
>	.shaperange.width = 6.50 && inches
>	.placement = xlmove
>	.shaperange.lockaspectratio = .f.
>endwith
>
>oexcel.activewindow.displaygridlines=.f.
>oexcel.Visible=.t.
>RELEASE oexcel
>
If it's not broken, fix it until it is.


My Blog
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform