[Gambas-user] PictureBox and Containers strange behaviour

Gianluigi bagonergi at gmail.com
Tue Dec 11 16:50:26 CET 2018


Hi Fabien,
some small variation and google translations :-)

Regards
Gianluigi

Il giorno dom 9 dic 2018 alle ore 18:24 Gianluigi <bagonergi at gmail.com> ha
scritto:

> Hi Fabien,
> I attach the RandomRotaPic little project based on your algorithm.
> What do you think about it?
>
> Regards
> Gianluigi
>
> Il giorno mer 5 dic 2018 alle ore 11:07 Gianluigi <bagonergi at gmail.com>
> ha scritto:
>
>> Hi Fabien,
>> excellent :-D
>> That's exactly what I was looking for.
>> Thank you very much.
>> (Google had inserted your email into spam, Google is really smart GRRR!)
>>
>> Regards
>> Gianluigi
>>
>> Il giorno mar 4 dic 2018 alle ore 23:08 Fabien Bodard <
>> gambas.fr at gmail.com> ha scritto:
>>
>>> ouch not Draw.Image ... but Paint.DrawImage... Draw is Obsolete
>>>
>>> Le mar. 4 déc. 2018 à 22:59, Fabien Bodard <gambas.fr at gmail.com> a
>>> écrit :
>>>
>>>> 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
>>>>
>>>
>>>
>>> --
>>> Fabien Bodard
>>>
>>> ----[ Gambas mailing-list is hosted by https://www.hostsharing.net ]----
>>>
>>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.gambas-basic.org/pipermail/user/attachments/20181211/0c7fa043/attachment-0001.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: RandomRotaPic-0.0.2.tar.gz
Type: application/gzip
Size: 14530 bytes
Desc: not available
URL: <https://lists.gambas-basic.org/pipermail/user/attachments/20181211/0c7fa043/attachment-0001.gz>


More information about the User mailing list