Re: Image Madness

2018-05-01 Thread jdcryer--- via 4D_Tech
Cannon,

Really useful.  Thank you again...

> On 1 May 2018, at 20:00, 4d_tech-requ...@lists.4d.com wrote:
> 
> I’m not sure why that would be the case as it has worked for me. Perhaps a 
> clue it that my code only handles the 4 common cases. Could your picture be 
> one of the other four cases? Not sure. I can give you the site I found that 
> helped me understand this (to the small degree that I understand it!):
> 
>    >

**
4D Internet Users Group (4D iNUG)
FAQ:  http://lists.4d.com/faqnug.html
Archive:  http://lists.4d.com/archives.html
Options: https://lists.4d.com/mailman/options/4d_tech
Unsub:  mailto:4d_tech-unsubscr...@lists.4d.com
**

Re: Image Madness

2018-05-01 Thread Cannon Smith via 4D_Tech
Hi Douglas,

I’m not sure why that would be the case as it has worked for me. Perhaps a clue 
it that my code only handles the 4 common cases. Could your picture be one of 
the other four cases? Not sure. I can give you the site I found that helped me 
understand this (to the small degree that I understand it!):



Good luck.

--
Cannon.Smith
Synergy Farm Solutions Inc.
Hill Spring, AB Canada
403-626-3236




> On May 1, 2018, at 1:25 AM, Douglas Cryer via 4D_Tech <4d_tech@lists.4d.com> 
> wrote:
> 
> I tried your code on the supplied image and had to swap the values for 6 & 8 
> as, after rotation, the image was upside down.

**
4D Internet Users Group (4D iNUG)
FAQ:  http://lists.4d.com/faqnug.html
Archive:  http://lists.4d.com/archives.html
Options: https://lists.4d.com/mailman/options/4d_tech
Unsub:  mailto:4d_tech-unsubscr...@lists.4d.com
**

Re: Image Madness

2018-05-01 Thread Douglas Cryer via 4D_Tech
Cannon,

I tried your code on the supplied image and had to swap the values for 6 & 8 
as, after rotation, the image was upside down.

So
 : ($lOrientation=8)  //Left 90˚, so need to rotate right 90˚
  $gPicture:=Photo_Rotate ($gPicture;90)

   : ($lOrientation=6)  //Right 90˚, so need to rotate 270˚
  $gPicture:=Photo_Rotate ($gPicture;270)

Became
 : ($lOrientation=6)  //Left 90˚, so need to rotate right 90˚
  $gPicture:=Photo_Rotate ($gPicture;90)

   : ($lOrientation=8)  //Right 90˚, so need to rotate 270˚
  $gPicture:=Photo_Rotate ($gPicture;270)

I expect your code is right so does that mean the camera was inverted 
originally to create my odd results?

Regards,  Dougie


telekinetix Limited- J. Douglas Cryer
Phone : 01234 761759  Mobile : 07973 675 218
2nd Floor Broadway House, 4-6 The Broadway, Bedford MK40 2TE
Email : jdcr...@telekinetix.com  Web : http://www.telekinetix.com 


 



**
4D Internet Users Group (4D iNUG)
FAQ:  http://lists.4d.com/faqnug.html
Archive:  http://lists.4d.com/archives.html
Options: https://lists.4d.com/mailman/options/4d_tech
Unsub:  mailto:4d_tech-unsubscr...@lists.4d.com
**