PDA

View Full Version : معادل یک API در ویندوز 2000



maryamjvd
یک شنبه 20 خرداد 1386, 09:48 صبح
با سلام به همه

من api ، GetDeviceCaps را در ویندوز xp برای ارتفاع و عرض محدوده پرینت استفاده کرده ام ولی وقتی برنامه را در ویندوز 2000 اجرا میکنم با پیغام خطای Out Of Range مواجه می شوم. آیا معادلی برای این api در ویندوز 2000 وجود دارد؟

dPageWidth = GetDeviceCaps(hdc, PHYSICALWIDTH) l
dPageHeight = GetDeviceCaps(hdc, PHYSICALHEIGHT

__H2__
یک شنبه 20 خرداد 1386, 13:52 عصر
سلام
من چیزی در مورد این API نمیدانم ولی پیغامی که شما میگویید ربطی به عدم وجود API ندارد! احتمالاً از اعدادی خارج از محدوده مجاز استفاده کرده اید.

maryamjvd
سه شنبه 22 خرداد 1386, 08:50 صبح
با سلام و تشکر از پاسختون
مقادیر قبلی برنامه به شکل زیر بوده است.


Private Const PHYSICALWIDTH = 110 ' 110 ' Physical Width in device units

Private Const PHYSICALHEIGHT = 111 '111 ' Physical Height in device units

Dim hdc As IntPtr = e.Graphics.GetHdc()


که موقع اجرا روی دستورات زیر OUT Of Range می دهد.


dPageWidth = GetDeviceCaps(hdc, PHYSICALWIDTH) 'in pixel

dPageHeight = GetDeviceCaps(hdc, PHYSICALHEIGHT