** گرفتن رنگ یک ویو **

[Salar82 901]

سلام خدمت همه ی دوستان

خیلی وقت ها شده که بخوایم از رنگ یک ویو استفاده کنیم یا مثلا اون رو یجایی ذخیره کنیم. اما متأسفانه گرفتن رنگ یک ویو بصورت View.Color امکان پذیر نیست. چون همونطور که همگی میدونید، این متد WriteOnly هست.

با استفاده از رویداد زیر، میتونید این کار رو به راحتی انجام بدین و رنگ ویوی دلخواهتون رو دریافت کنید:

Sub GetViewsColor(v As View) As Int
	Dim destRect As Rect
	Dim bmp As Bitmap
	Dim cvs As Canvas
	bmp.InitializeMutable(50dip, 50dip)
	cvs.Initialize2(bmp)
	destRect.Initialize(0, 0, cvs.Bitmap.Width, cvs.Bitmap.Height)
	cvs.DrawDrawable(v.Background, destRect)
	Return cvs.Bitmap.GetPixel(5dip, 5dip)
End Sub