Delphi Pages Forums  

Go Back   Delphi Pages Forums > Delphi Forum > General

Lost Password?

Reply
 
Thread Tools Display Modes
  #1  
Old 03-24-2009, 06:37 PM
grace grace is offline
Senior Member
 
Join Date: Mar 2004
Posts: 212
Default ProgressBar with Percent Display

Hi,
I am looking for a good and reliable progressbar with percentage display when it is progressing. If you want me to quote an example, the one used in Total Commander(formerly Windows Commander), is the type I need.

I have tried many from this website, but could not really find a good one to conclude. I would appreciate your expert guidance to comment on which one to use or just to build a new component from the Delphi Progressbar.

Thank you.
Reply With Quote
  #2  
Old 03-24-2009, 07:16 PM
nester261 nester261 is offline
Moderator
 
Join Date: Jan 2004
Location: UK
Posts: 618
Default RE: ProgressBar with Percent Display

This one is a good one and very customizable:

http://www.tmssoftware.com/site/advprogr.asp

"Where there's a will, there's always a way."

-- The Hon Robert Nester Marley O.M. - aka Bob Marley!
Reply With Quote
  #3  
Old 03-24-2009, 08:40 PM
BaraoZemo BaraoZemo is offline
Senior Member
 
Join Date: Nov 2001
Posts: 3,598
Default RE: ProgressBar with Percent Display

this is open source...(full sources..)
I can't find another (free) component that beat this..

[link]http://sourceforge.net/project/showfiles.php?group_id=226223[/link]

Regards
BaraoZemo

ps, don't forget to click in the button and Accept as Answer if this helped you!
Reply With Quote
  #4  
Old 03-25-2009, 09:39 AM
geetha_eie geetha_eie is offline
Junior Member
 
Join Date: Sep 2008
Posts: 2
Default RE: ProgressBar with Percent Display

Tgauge under Sample Palette also display progess in percentage.

Hope this help you out...

Regards,
Geetha
Reply With Quote
  #5  
Old 03-26-2009, 08:20 AM
golden_eyes golden_eyes is offline
Senior Member
 
Join Date: Dec 2005
Posts: 375
Default RE: ProgressBar with Percent Display

You can use this with TProgressBar:

[DELPHI]
procedure TForm1.Button1Click(Sender: TObject);
var
i: Integer;
begin
ProgressBar1.Max:= 1000000;
ProgressBar1.Position:= 0;

for i:= 0 to ProgressBar1.Max do
begin
ProgressBar1.StepBy(1);
Label1.Caption:= IntToStr(ProgressBar1.Position * 100 div ProgressBar1.Max) + '% done.';
Application.ProcessMessages;
end;
end;
[/DELPHI]

Cheers,
Reply With Quote
Reply

Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is On

Forum Jump


All times are GMT. The time now is 02:21 AM.


Powered by vBulletin® Version 3.8.8
Copyright ©2000 - 2017, vBulletin Solutions, Inc.