IV.Initialize("IV")
IV.Gravity=Gravity.FILL
Dim WW As Int = 100%X
Dim HH As Int = 100%Y
Activity.AddView(IV,50%X-WW/2,50%Y-HH/2,WW,HH)
Dim c As Canvas
c.Initialize(IV)
Dim cp As Path
cp.Initialize(0,0)
cp.LineTo(100%X,0)
cp.LineTo(100%X,40%Y)
cp.LineTo(0%X,60%Y)
cp.LineTo(0,0)
c.ClipPath(cp)
Dim dstRect As Rect
dstRect.Initialize(0,0,100%X,60%Y)
c.DrawBitmap(LoadBitmap(File.DirAssets,"a.jpg"),Null,dstRect)
c.RemoveClip
cp.Initialize(0,60%Y)
cp.LineTo(100%X,40%Y)
cp.LineTo(100%X,100%Y)
cp.LineTo(0%X,100%Y)
cp.LineTo(0,60%Y)
c.ClipPath(cp)
Dim dstRect As Rect
dstRect.Initialize(0,40%Y,100%X,100%Y)
c.DrawBitmap(LoadBitmap(File.DirAssets,"b.jpg"),Null,dstRect)