Re: [MSEide-MSEgui-talk] MSE Canvas.

[fredvs]

> Attached a version

OK, your patch is committed 8848320.

Many thanks.

Fre;D



--
Sent from: http://mseide-msegui-talk.13964.n8.nabble.com/

--
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

Re: [MSEide-MSEgui-talk] MSE Canvas.

[fredvs]

> Great!
Thanks!

> Attached a version with maybe better performance because it uses
> tface.image 
Many thanks, I will study it tonight.

Huh, I did test of resource consommation and, when synchronizing, the design
that needs the most ressource is the view meters of the console form.

But sure it was not a good idea to use groupbox as view meters. (but easy
for first test).
It must recalculate things not needed.

What do you think, what would use the less ressource for view meters?
I was thinking a simple canvas and draw it at each synchro.
Or maybe it exist a low ressource mse widget (like box-rectangle-circle). 

By the way, I did test on RPi3.

Your last commits for threads did a big difference in synchro and quality of
sound.
And replacing Lock()/Unlock() by queueasynccall() solves all the "crack" in
sound.

Really, the result on the RPi3/Arm in quality of sound with built in
sound-card and graphic synchro is equivalent than a i386.

Fre;D





--
Sent from: http://mseide-msegui-talk.13964.n8.nabble.com/

--
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

Re: [MSEide-MSEgui-talk] MSE Canvas.

[Martin Schreiber]

> > PS: Demo asap.
>
> Hello.
>
> Here image (not simulated) of MSE Tslider with custom canvas:
>
> 
>
> To see and listen it:
>
> https://github.com/fredvs/strumpract
>
Great!
Attached a version with maybe better performance because it uses tface.image 
and paints the waveform only once.

Martin
diff --git a/src/songplayer.mfm b/src/songplayer.mfm
index cad1b2e..71874c4 100644
--- a/src/songplayer.mfm
+++ b/src/songplayer.mfm
@@ -139,7 +139,7 @@ object songplayerfo: tsongplayerfo
   bounds_x = 197
   bounds_y = 50
   bounds_cx = 50
-  bounds_cy = 28
+  bounds_cy = 27
   statfile = mainfo.tstatfile1
   textflags = [tf_xcentered, tf_right, tf_ycentered, tf_noselect]
   onchange = changevolume
@@ -153,7 +153,7 @@ object songplayerfo: tsongplayerfo
   stepctrlfact = 0
   stepshiftfact = 0
   wheelsensitivity = 1
-  reffontheight = 15
+  reffontheight = 14
 end
 object button1: tbutton
   Tag = 1
@@ -194,7 +194,7 @@ object songplayerfo: tsongplayerfo
   frame.localprops1 = [frl1_captiondist]
   frame.outerframe = (
 6
-16
+14
 7
 0
   )
@@ -203,9 +203,9 @@ object songplayerfo: tsongplayerfo
   taborder = 3
   hint = ' Enable looping the song. (Pause is not enabled with loop.) '
   bounds_x = 161
-  bounds_y = 50
+  bounds_y = 52
   bounds_cx = 26
-  bounds_cy = 28
+  bounds_cy = 26
   statfile = mainfo.tstatfile1
   onchange = changeloop
   colorglyph = 4539717
@@ -225,7 +225,7 @@ object songplayerfo: tsongplayerfo
   frame.localprops1 = [frl1_captiondist]
   frame.outerframe = (
 0
-18
+16
 25
 0
   )
@@ -234,9 +234,9 @@ object songplayerfo: tsongplayerfo
   taborder = 4
   hint = ' Enable stretching (changing tempo) '
   bounds_x = 343
-  bounds_y = 47
+  bounds_y = 49
   bounds_cx = 38
-  bounds_cy = 30
+  bounds_cy = 28
   onchange = ChangePlugSetSoundTouch
   colorglyph = 4539717
 end
@@ -324,7 +324,8 @@ object songplayerfo: tsongplayerfo
   scrollbar.face.fade_direction = gd_down
   scrollbar.face.localprops = [fal_fadirection]
   scrollbar.face.template = tfaceslider
-  scrollbar.face1.localprops = []
+  scrollbar.face1.framei_right = -6
+  scrollbar.face1.localprops = [fal_framei_right]
   scrollbar.face1.template = tfacegreen
   scrollbar.facebutton.localprops = []
   scrollbar.facebutton.template = tfacebuttonslider
@@ -361,7 +362,7 @@ object songplayerfo: tsongplayerfo
   bounds_x = 73
   bounds_y = 5
   bounds_cx = 371
-  bounds_cy = 22
+  bounds_cy = 21
   statfile = mainfo.tstatfile1
   optionsedit1 = [oe1_autopopupmenu, oe1_keyexecute, oe1_savevalue, oe1_savestate]
   optionsedit = [oe_undoonesc, oe_closequery, oe_checkmrcancel, oe_resetselectonexit, oe_exitoncursor, oe_autoselect, oe_autoselectonfirstclick]
@@ -373,7 +374,7 @@ object songplayerfo: tsongplayerfo
   textflags = [tf_ycentered, tf_noselect, tf_ellipseleft]
 end>
   dropdown.historymaxcount = 50
-  reffontheight = 15
+  reffontheight = 14
 end
 object songdir: tfilenameedit
   frame.localprops = []
@@ -400,7 +401,7 @@ object songplayerfo: tsongplayerfo
   bounds_x = 52
   bounds_y = 5
   bounds_cx = 22
-  bounds_cy = 22
+  bounds_cy = 21
   statfile = mainfo.tstatfile1
   controller.filter = '"*.mp3" "*.wav" "*.ogg" "*.flac"'
   controller.filterlist.data = (
@@ -426,7 +427,7 @@ object songplayerfo: tsongplayerfo
 )
   )
   controller.onbeforeexecute = whosent
-  reffontheight = 15
+  reffontheight = 14
 end
 object llength: tstringdisp
   color = -2147483645
@@ -440,10 +441,10 @@ object songplayerfo: tsongplayerfo
   bounds_x = 357
   bounds_y = 111
   bounds_cx = 90
-  bounds_cy = 16
+  bounds_cy = 15
   textflags = [tf_xcentered, tf_ycentered]
   value = '00:00:00.000'
-  reffontheight = 15
+  reffontheight = 14
 end
 object lposition: tstringdisp
   color = -2147483645
@@ -457,10 +458,10 @@ object songplayerfo: tsongplayerfo
   bounds_x = 357
   bounds_y = 95
   bounds_cx = 90
-  bounds_cy = 16
+  bounds_cy = 15
   textflags = [tf_xcentered, tf_ycentered]
   value = '00:00:00.000'
-  reffontheight = 15
+  reffontheight = 14
 end
 object tstringdisp1: tstringdisp
   color = -2147483645
@@ -474,8 +475,9 @@ object songplayerfo: tsongplayerfo
   bounds_x = 0
   bounds_y = 27
   bounds_cx = 454
+  bounds_cy = 19
   textflags = [tf_xcentered, tf_ycentered]
-  reffontheight = 15
+  reffontheight = 14
 end
 object edvolright: trealspinedit
   Tag = 1
@@ -500,7 +502,7 @@ object songplayerfo: tsongplayerfo
   

Re: [MSEide-MSEgui-talk] MSE Canvas.

[fredvs]

> PS: Demo asap. 

Hello.

Here image (not simulated) of MSE Tslider with custom canvas:

 

To see and listen it:

https://github.com/fredvs/strumpract

Fre;D



--
Sent from: http://mseide-msegui-talk.13964.n8.nabble.com/

--
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

Re: [MSEide-MSEgui-talk] Mailing list problems

[Martin Schreiber]

On Thursday 28 September 2017 16:16:21 fredvs wrote:
> Hello Martin.
>
> I sent 3 mails yesterday.
>
> There are still not here. ;-(
>
This one reached the list. Please try again.

Martin

--
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk