croprec.Initialize("CropRec")
Crop.Initialize("Crop")
Dim cfgimg As CropIwaImageViewConfig = Crop.configureImage
cfgimg.setImageInitialPosition(Crop.CENTER_INSIDE).setImageScaleEnabled(True).setScale(2)
Dim overlay As CropIwaOverlayConfig = Crop.configureOverlay
overlay.setAspectRatio(Crop.IMG_SRC).setCornerColor(Colors.Red).setBorderColor(Colors.Blue).setGridColor(Colors.Yellow).setShouldDrawGrid(True).setCropShape("Rect").apply
Dim cfg As CropIwaSaveConfig
cfg.Initialize("file://" & File.Combine(File.DirDefaultExternal, Filename)).setQuality(100).setSize(640,480)
Crop.crop(cfg.build)