window size

  • Thread starter Thread starter Nelson
  • Start date Start date
N

Nelson

Hello,

I would like to know what do I need to do to be able to
create a window for my the presentation that is 800X474
pixels. In other words, when I run my ppshow, I need to
see it in a window that is 800*474 pixels.

Also, what is 800*474 in cms?

Thank you in advance.

Nelson
 
Nelson,

If you set up your presentation (slideshow - set up show - tick browsed by an individual) to be viewed in a window...you
can re-size it to any size.
Also, what is 800*474 in cms?
Click to expand...
Care to elaborate?

Cheers
TAJ Simmons
microsoft powerpoint mvp

awesome - powerpoint backgrounds,
free powerpoint templates, tutorials, hints and tips etc
http://www.powerpointbackgrounds.com
 
Hello TAJ,

Thanks for the reply...I wanted to know what would and
area of 800*474 pixels be equivalent to in centimeters.

Nelson
-----Original Message-----
Nelson,

If you set up your presentation (slideshow - set up
Click to expand...
show - tick browsed by an individual) to be viewed in a
window...you
 
Nelson,
You will need to compute the value on your system, Pixel to
Inches/Centimeter is depend on the system metrics. 1440 twips = 1 inch.
Hence determine the number of twips in 1 pixel. A pixel may not be square
hence compute the for X as well as Y.

Note that while converting to centimeter the version of PowerPoint is
essential. Older versions used it's own concept of centimeter which was
smaller than the actual centimeter for convinience.
' ------------------------------------------------------------------------------
Option Explicit

Private Declare Function GetDC Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function ReleaseDC Lib "user32" ( _
ByVal hwnd As Long, _
ByVal hdc As Long) As Long
Private Declare Function GetDeviceCaps Lib "gdi32" (ByVal hdc As Long, _
ByVal nIndex As Long) As
Long

Const TWIPSPERINCH As Long = 1440
Const LOGPIXELSX As Long = 88
Const LOGPIXELSY As Long = 90

Function TwipsPerPixelX() As Single
Dim lngDC As Long
lngDC = GetDC(0)
TwipsPerPixelX = TWIPSPERINCH / GetDeviceCaps(lngDC, LOGPIXELSX)
ReleaseDC 0, lngDC
End Function

Function TwipsPerPixelY() As Single
Dim lngDC As Long
lngDC = GetDC(0)
TwipsPerPixelY = TWIPSPERINCH / GetDeviceCaps(lngDC, LOGPIXELSY)
ReleaseDC 0, lngDC
End Function

Sub PixelsToInches()
Dim PixelX As Single
Dim PixelY As Single

PixelX = 800
PixelY = 474
MsgBox CStr(PixelX) & " X pixels are equivalent to : " & CStr(TwipsPerPixelX
* PixelX / TWIPSPERINCH) & " inches."
MsgBox CStr(PixelY) & " Y pixels are equivalent to : " & CStr(TwipsPerPixelY
* PixelY / TWIPSPERINCH) & " inches."
End Sub
' ------------------------------------------------------------------------------
 
Hello TAJ,

Thanks for the reply...I wanted to know what would and
area of 800*474 pixels be equivalent to in centimeters.
Click to expand...

There's no answer to that question w/o more information.

In effect, you've asked "How big is twelve?" ;-)

Are you talking about an image that's that size or something that happens to be
that many pixels when displayed on your monitor, or ... what, exactly? And
where do you want to measure the cms? On screen, on a printout ...?

Surely you have some reason for asking; there's something you need to be able
to do. Tell us specifically what that is and we can probably help.
Nelson

show - tick browsed by an individual) to be viewed in a
window...you
Click to expand...

--
Steve Rindsberg, PPT MVP
PPT FAQ: www.pptfaq.com
PPTools: www.pptools.com
================================================
Featured Presenter, PowerPoint Live 2004
October 10-13, San Diego, CA www.PowerPointLive.com
================================================
 
Back
Top