[Gambas-user] Having a bit of trouble with ImageView ZoomfFit

[Cedron Dawg]

I added this line to the end of the Resize event:

        Me.Caption = Str(w) & " x " & Str(h)

And I added this routine:

'=============================================================================
Public Sub DisplayPictureBox_MouseDown()

        myDisplayImage.Save("Squirrel" & Str(myDisplayImage.W) & ".jpg")

End
'=============================================================================

Just so I could attach a pic that wasn't too big.  (Now 18K, was 353K)

Oh, squirrel!  Gotta run....

Ced

-------------- next part --------------
A non-text attachment was scrubbed...
Name: Squirrel320.jpg
Type: image/jpeg
Size: 17670 bytes
Desc: not available
URL: <https://lists.gambas-basic.org/pipermail/user/attachments/20190511/9a8a69c1/attachment-0001.jpg>