رفتن به مطلب
  • 0

سوال درباره زوم


hosseinji

سوال

	Dim bmp As Bitmap
	Dim vWidth,vHeight As Float
	Dim c As Int
	'------------------------------
	Activity.AddMenuItem("Zoom at 100%","mnuZoom100")
	Activity.AddMenuItem("Translation True/False","mnuTranslation")
	Activity.AddMenuItem("Zoom True/False","mnuZoom")
	'------------------------------
	bmp = LoadBitmap(File.DirAssets,"lefth.jpeg")
	vWidth = bmp.Width*10
	vHeight = vWidth*(bmp.Height/bmp.Width)
	image1.Initialize("")
	image1.Bitmap = bmp
	image1.Gravity = Gravity.FILL
	Activity.AddView(image1,50%x-(vWidth/2),50%y-(vHeight/2),vWidth,vHeight)
	'------------------------------
	PZ.Initialize(image1,"PZ",c,1,1.5,10,True,Me)
'	PZ.LimitArea = True
'	PZ.Zoom = 200
	PZ.LimitBorder = True

سلام میشه یکی از اساتید کاربرد هر خط رو بگه ممنون

لینک ارسال
به اشتراک گذاری در سایت های دیگر

1 پاسخ به این سوال تاکنون داده شده است

ارسال‌های توصیه شده

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...