This is a new version ... i have forget to reinit the initial position when
the first image reach the view top.
Le mar. 4 déc. 2018 à 22:38, Fabien Bodard <gambas.fr at gmail.com> a écrit :
> Sorry for the late :-)
>> I think this is what you are looking for :-)... and there is not picture
> box any more.
>> Le sam. 1 déc. 2018 à 22:19, Fabien Bodard <gambas.fr at gmail.com> a écrit :
>>> no
>> I will try to show you an example tomorow
>>>> Le sam. 1 déc. 2018 à 19:43, Gianluigi <bagonergi at gmail.com> a écrit :
>>>>> do you mean: Using two pictureboxes, moving and loading them to make a
>>> smooth movement appear?
>>> Ok, I'll try but not today
>>>>>> Regards
>>>>>> Il giorno sab 1 dic 2018 alle ore 18:57 Fabien Bodard <
>>>gambas.fr at gmail.com> ha scritto:
>>>>>>> you must not load images in one image... in fact you must load each
>>>> image in a image variable.
>>>>>>>> then you manage the layout during the drawing event.
>>>>>>>> a timer trigger call the drawing area event when needed ... during the
>>>> move.
>>>>>>>>>>>>>>>> Le sam. 1 déc. 2018 à 18:28, Gianluigi <bagonergi at gmail.com> a écrit :
>>>>>>>>> Hi Fabien,
>>>>> the idea of loading images into one image was silly and I should have
>>>>> understood it right away.
>>>>> Too heavy.
>>>>> Aborted project.
>>>>>>>>>> Regards
>>>>> Gianluigi
>>>>>>>>>> Il giorno sab 1 dic 2018 alle ore 15:21 Fabien Bodard <
>>>>>gambas.fr at gmail.com> ha scritto:
>>>>>>>>>>> Ok I seen the idea ...
>>>>>>>>>>>> For the movement you can take a look in the FAbout of the ide code
>>>>>>>>>>>> Le sam. 1 déc. 2018 à 14:05, Gianluigi <bagonergi at gmail.com> a
>>>>>> écrit :
>>>>>>>>>>>>> Hi Fabien,
>>>>>>> very interesting, excellent result and little work :-D
>>>>>>>>>>>>>> My problem is to adapt a sequence of images of different format and
>>>>>>> type in a single film-like image (to be clear).
>>>>>>> I thought about doing so, this is just the first part of the code
>>>>>>> (now I use the mouse wheel just to try), I do not think I can adapt your
>>>>>>> code here.
>>>>>>>>>>>>>> The idea (idiot) came to me from a question on our forum and so I
>>>>>>> would like to build an image viewer that shows a random image like a slot
>>>>>>> machine, now I start to study how to give it the movement (I do not know if
>>>>>>> two images series are enough).
>>>>>>> You can lose a lot of money by betting us over ;-D
>>>>>>>>>>>>>> Regards
>>>>>>> Gianluigi
>>>>>>>>>>>>>> Il giorno sab 1 dic 2018 alle ore 08:44 Fabien Bodard <
>>>>>>>gambas.fr at gmail.com> ha scritto:
>>>>>>>>>>>>>>> Hi dear friend
>>>>>>>>>>>>>>>> This is the same with less work ;-)
>>>>>>>>>>>>>>>> Regards
>>>>>>>>>>>>>>>> Fabien Bodard
>>>>>>>>>>>>>>>> Le ven. 30 nov. 2018 à 16:30, Gianluigi <bagonergi at gmail.com> a
>>>>>>>> écrit :
>>>>>>>>>>>>>>>>> Finally it works
>>>>>>>>> See attached file
>>>>>>>>>>>>>>>>>> Reagards
>>>>>>>>> Gianluigi
>>>>>>>>>>>>>>>>>> Il giorno ven 30 nov 2018 alle ore 15:39 Gianluigi <
>>>>>>>>>bagonergi at gmail.com> ha scritto:
>>>>>>>>>>>>>>>>>>> This is the correct code (?):
>>>>>>>>>>>>>>>>>>>> [code]Private Sub Scale(img As Image)
>>>>>>>>>>>>>>>>>>>> Dim w, h As Integer
>>>>>>>>>>>>>>>>>>>> w = img.W
>>>>>>>>>> h = img.H
>>>>>>>>>> If h > w Then
>>>>>>>>>> $H = PictureBox1.H
>>>>>>>>>> $W = (PictureBox1.H * w) \ h
>>>>>>>>>> If $W > PictureBox1.W Then
>>>>>>>>>> $W = PictureBox1.W
>>>>>>>>>> $H = (PictureBox1.W * $H) \ $W
>>>>>>>>>> $X = PictureBox1.X
>>>>>>>>>> $Y = PictureBox1.Y + ((PictureBox1.H - $H) \ 2)
>>>>>>>>>> Return
>>>>>>>>>> Endif
>>>>>>>>>> $Y = PictureBox1.Y
>>>>>>>>>> $X = PictureBox1.X + ((PictureBox1.W - $W) \ 2)
>>>>>>>>>> Else
>>>>>>>>>> $W = PictureBox1.W
>>>>>>>>>> $H = (PictureBox1.W * h) \ w
>>>>>>>>>> If $H > PictureBox1.H Then
>>>>>>>>>> $H = PictureBox1.H
>>>>>>>>>> $W = (PictureBox1.H * $W) \ $H
>>>>>>>>>> $Y = PictureBox1.Y
>>>>>>>>>> $X = PictureBox1.X + ((PictureBox1.W - $W) \ 2)
>>>>>>>>>> Return
>>>>>>>>>> Endif
>>>>>>>>>> $X = PictureBox1.X
>>>>>>>>>> $Y = PictureBox1.Y + ((PictureBox1.H - $H) \ 2)
>>>>>>>>>> Endif
>>>>>>>>>>>>>>>>>>>> End [/code]
>>>>>>>>>>>>>>>>>>>> Although I would love to be able to create a code capable of
>>>>>>>>>> scaling images on the Form_Resize event
>>>>>>>>>> A task too burdensome for my tired brain.
>>>>>>>>>>>>>>>>>>>> Regards
>>>>>>>>>> Gianluigi
>>>>>>>>>>>>>>>>>>>> Il giorno ven 30 nov 2018 alle ore 13:10 Gianluigi <
>>>>>>>>>>bagonergi at gmail.com> ha scritto:
>>>>>>>>>>>>>>>>>>>>> I need to paint an image in a new image and then show it in a
>>>>>>>>>>>picturebox.
>>>>>>>>>>> The thing seems to work correctly only if the picturebox is the
>>>>>>>>>>> only component on the window.
>>>>>>>>>>> If the hbox is present, the image is deformed (stretching) and
>>>>>>>>>>> the lower part of the image is positioned under the hbox.
>>>>>>>>>>> Am I wrong?
>>>>>>>>>>> I attach a project and two explanatory images (with magnifying
>>>>>>>>>>> glass).
>>>>>>>>>>>>>>>>>>>>>> Regards
>>>>>>>>>>> Gianluigi
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ----[ Gambas mailing-list is hosted by https://www.hostsharing.net>>>>>>>>> ]----
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> --
>>>>>>>> Fabien Bodard
>>>>>>>>>>>>>>>> ----[ Gambas mailing-list is hosted by https://www.hostsharing.net>>>>>>>> ]----
>>>>>>>>>>>>>>>>>>>>>> ----[ Gambas mailing-list is hosted by https://www.hostsharing.net>>>>>>> ]----
>>>>>>>>>>>>>>>>>>>>>>>>> --
>>>>>> Fabien Bodard
>>>>>>>>>>>> ----[ Gambas mailing-list is hosted by https://www.hostsharing.net>>>>>> ]----
>>>>>>>>>>>>>>>> ----[ Gambas mailing-list is hosted by https://www.hostsharing.net>>>>> ]----
>>>>>>>>>>>>>>>>> --
>>>> Fabien Bodard
>>>>>>>> ----[ Gambas mailing-list is hosted by https://www.hostsharing.net>>>> ]----
>>>>>>>>>> ----[ Gambas mailing-list is hosted by https://www.hostsharing.net ]----
>>>>>>>>> --
>> Fabien Bodard
>>>>> --
> Fabien Bodard
>
--
Fabien Bodard
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.gambas-basic.org/pipermail/user/attachments/20181204/a406083b/attachment-0001.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: rotapic-0.0.1.tar.gz
Type: application/gzip
Size: 152960 bytes
Desc: not available
URL: <https://lists.gambas-basic.org/pipermail/user/attachments/20181204/a406083b/attachment-0001.gz>