New TprogressWheel

New TprogressWheel

Postby Silvio.Falconi » Mon Sep 09, 2019 7:41 pm

Image
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 6772
Joined: Thu Oct 18, 2012 7:17 pm

Re: New TprogressWheel

Postby MGA » Mon Sep 09, 2019 8:17 pm

Fantástic :D
ubiratanmga@gmail.com

FWH18.02
FWPPC
Harbour/xHarbour
xMate
Pelles´C
TDolphin
MGA
 
Posts: 1234
Joined: Mon Feb 25, 2008 2:54 pm
Location: Brasil/PR/Maringá

Re: New TprogressWheel

Postby Armando » Tue Sep 10, 2019 12:45 am

Silvio:

Wow.

Regards
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3061
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México

Re: New TprogressWheel

Postby Antonio Linares » Tue Sep 10, 2019 9:22 am

very nice

great work Silvio!

You are a FWH master already ;-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41314
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: New TprogressWheel

Postby Silvio.Falconi » Tue Sep 10, 2019 11:27 am

I didn't do everything I was helped, someone corrected the errors and then I started from an example of NagesWarao that I found on the Forum, so I'm not a Maestro of Fwh...and then I copied the Tprogress :)

No hice todo lo que me ayudaron, alguien corrigió los errores y luego comencé con un ejemplo de NagesWarao que encontré en el Foro, así que no soy un maestro de..... y luego copié el Tprogress :)
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 6772
Joined: Thu Oct 18, 2012 7:17 pm

Re: New TprogressWheel

Postby ukoenig » Tue Sep 10, 2019 11:36 am

Silvio,

I'm working on a solution complete different to the circles :
Fading in a image ( resized / rounded ) with a centered percent-display.
The image transparent-level can change with the percent-value.

maybe a interesting solution as well.

Image

Image

regards
Uwe :?:
Last edited by ukoenig on Tue Jul 13, 2021 1:47 pm, edited 8 times in total.
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Re: New TprogressWheel

Postby AntoninoP » Tue Sep 10, 2019 1:06 pm

How about this way?
Image
AntoninoP
 
Posts: 375
Joined: Tue Feb 10, 2015 9:48 am
Location: Albenga, Italy

Re: New TprogressWheel

Postby Compuin » Tue Sep 10, 2019 1:14 pm

AntoninoP wrote:How about this way?
Image


It look great!
FWH 20.12
Hbmk2 32/64 Bits (Build 19.29.30133)
Microsoft Visual C 32 Bits
MySql 8.0.24 32/64 Bits
VS Code
Compuin
 
Posts: 1213
Joined: Tue Dec 28, 2010 1:29 pm
Location: Quebec, Canada

Re: New TprogressWheel

Postby Silvio.Falconi » Tue Sep 10, 2019 3:54 pm

thanks Antonino for your apportation
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 6772
Joined: Thu Oct 18, 2012 7:17 pm

Re: New TprogressWheel

Postby TimStone » Tue Sep 10, 2019 4:49 pm

Silvio,

I have a few questions:

1). "When you buy the new release" suggests you will be offering this control for sale. Is that correct ? If so, what is the pricing and availability ?

2). Could you provide an example of implementing the progress wheel in an application ?

3). Does this have any performance issues ( speed degradation for the process it is measuring ) ? Though slight, the progress bar, if not set to sample at a proper interval, can reduce the speed of operation.

Massimo, you also presented a control, but it would not be usable by those of us who use Visual Studio / Harbour since it is clearly for Borland development tools. Thank you, however, for sharing there is an option.

Antonio: Will you be including any progress wheel with the FWH libraries ? It might not be as grand as these, but Windows does tend to use the wheels now rather than bars.

Thanks to all for your continuing contributions.
Tim Stone
http://www.MasterLinkSoftware.com
http://www.autoshopwriter.com
timstone@masterlinksoftware.com
Using: FWH 23.10 with Harbour 3.2.0 / Microsoft Visual Studio Community 2022-24 32/64 bit
User avatar
TimStone
 
Posts: 2904
Joined: Fri Oct 07, 2005 1:45 pm
Location: Trabuco Canyon, CA USA

Re: New TprogressWheel

Postby Silvio.Falconi » Tue Sep 10, 2019 5:38 pm

TimStone wrote:Silvio,

I have a few questions:

1). "When you buy the new release" suggests you will be offering this control for sale. Is that correct ? If so, what is the pricing and availability ?

2). Could you provide an example of implementing the progress wheel in an application ?

3). Does this have any performance issues ( speed degradation for the process it is measuring ) ? Though slight, the progress bar, if not set to sample at a proper interval, can reduce the speed of operation.

Massimo, you also presented a control, but it would not be usable by those of us who use Visual Studio / Harbour since it is clearly for Borland development tools. Thank you, however, for sharing there is an option.

Antonio: Will you be including any progress wheel with the FWH libraries ? It might not be as grand as these, but Windows does tend to use the wheels now rather than bars.

Thanks to all for your continuing contributions.




1. The price is what Antonio does for the new version of the new fwh package, I don't think he'll decide to sell the class separately

2.I have created 3 examples I think are enough to make people understand how it works

sample :

Code: Select all  Expand view
@ 5,10 WHEELMETER oProgress OF oDlg   ;
       INNERCOLOR  CLR_WHITE ;
       ANIMACOLOR  CLR_HRED  ;
       BACKCOLOR   CLR_BLUE  ;
       PIXEL   ;
       TEXT   NORMAL_TEXT  ;
       TEXTCOLOR  CLR_GREEN


does it work like the TProgress class, do you have never used this class to index archives?

Code: Select all  Expand view
oProgress:setrange(0,500)
oProgress:npos
....
INDEX ON FIRST TAG FIRST EVAL (oProgress:SetPos(nProgress++), Sysrefresh()) EVERY 1     FOR ! deleted()



3.There are no performance problems I tried on a dialog with 13 meters

4.Massimo published a class in delphi he tried to put me in a bad light. He usually does that against me. I'll never understand why. and I haven't seen his work yet, but only criticisms against me. Antonio is patient and has stopped him several times

I copied the dialog of that Delphi class

I tried to do it again in harbor and with our class TProgressWheel to see precisely if there were any performance problems by entering as many as 13 controls that operated continuously. However the Demo.prg will not be released for the moment.

5. Antonio is working on mod_harbour. He told me he will put the control in the new release of fwh
The idea of making this class came from Mr. Loren in the Spanish forum, Cristobal accepted the idea even though he said there were compilations, a long time ago I created a class for circular bar codes together with a friend S.P. so I had already worked with the Pie and elipse, but the idea came from an example created many years ago by Nagewarao to make statistical graphs.
Antonino Perrcone has modified the class by inserting the gradient and the image type texture



maybe I copied some scripts from the Delphi class, but the implementation came before I saw that class in delphi, there is nothing Delphi or third parties, it was created entirely in the source code of Harbor and fivewin, I I used for an archive of 6500 records and 57 fields and it works great
Last edited by Silvio.Falconi on Tue Sep 10, 2019 5:48 pm, edited 1 time in total.
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 6772
Joined: Thu Oct 18, 2012 7:17 pm

Re: New TprogressWheel

Postby TimStone » Tue Sep 10, 2019 6:20 pm

Silvio,

Thank you.

I understand it is to be included in the FWH libraries. I have a subscription with Antonio so I look forward to check it out when it is released.

Yes, I do use Progress Bar with all indexing, and with other processing tasks ( like constructing data for complicated reports, etc ). I have for many years. However, progress bars are generally not being used in newer Microsoft applications. They have all moved to the wheel so this is a nice addition to our options.
Tim Stone
http://www.MasterLinkSoftware.com
http://www.autoshopwriter.com
timstone@masterlinksoftware.com
Using: FWH 23.10 with Harbour 3.2.0 / Microsoft Visual Studio Community 2022-24 32/64 bit
User avatar
TimStone
 
Posts: 2904
Joined: Fri Oct 07, 2005 1:45 pm
Location: Trabuco Canyon, CA USA

Re: New TprogressWheel

Postby Silvio.Falconi » Tue Sep 10, 2019 7:54 pm

New release - with texture Image

Image

Tim as you can see here I use 13 Progress wheel and I not seeing problem of Performance or problem of velocity
I tried it with a dbf with 6500 records and 57 field for 4/5 index and never it stop
we are using GDIPLUS function
Last edited by Silvio.Falconi on Tue Sep 10, 2019 8:25 pm, edited 2 times in total.
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 6772
Joined: Thu Oct 18, 2012 7:17 pm

Re: New TprogressWheel

Postby Antonio Linares » Tue Sep 10, 2019 7:57 pm

Massimo and Compuin banned for one week

Sorry guys. Time to relax...
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41314
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: New TprogressWheel

Postby Silvio.Falconi » Wed Sep 11, 2019 9:36 am

New Relase With gradient ( on betatest)

Image
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 6772
Joined: Thu Oct 18, 2012 7:17 pm

Next

Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 98 guests