Hi
On below line i am getting error "Invalid Property Value"
SavePicture croppedPic.Picture, App.Path & "\C_" & tno & ".jpg"
BitBlt croppedPic.hDC, 0, 0, 3000, 3000, originalPic.hDC, cropX, cropY, SRCCOPY
croppedPic.PaintPicture originalPic.Picture, 0, 0, 3000, 3000, cropX, cropY
SavePicture croppedPic.Picture, App.Path & "\C_" & tno & ".jpg"
Thanks