How to create Menu Progressbar in Borland Delphi

MAKING THE MENU PROGRESSBAR

 BORLAND DELPHI 7

post: 11/12/16AnggaAmboro

Existing startup menu in Borland Delphi named ProgressBar, which is a form in which the program performs a process that normally would go into the main menu, or can also be called a time-out program. Progressbar usually set once we get into the login menu and will go to the main menu of the program.

At progressbar there is a lag time program, the time can be set according to what we want, we stayed just set in our existing object inspector in Borland Delphi. Okay buddy in this occasion we will discuss how the heck do I create a menu progressbar in Borland Delphi, said people still difficult to make, but mas Angga here will help my friend in the resolution of problems in making menu progressbar manner and tips are easily understood and certainly succeed, God willing. Hehehe

Here I will share two tutorials at once in one of this discussion (wwaaauuuu, generous once mas angga), what is not for you, yes you ...... why I dared to make two topics in one place, because once the process is complete there progressbar then the program are asked to go where, what's just sitting there waiting for you busy distu make Alis, course not. So in addition to my membagiakan how to make progressbar I will also teach how the heck to make the program moved form or to the main menu. OK we just headed tutorial.

Tunggu sebentar ya sayang. wkwkwkwk

• First create a form design for progressbar menu and do not forget to make it interesting like you, yes you hehehe. Do not forget to enter timer progressbar and also by means of the tools menu and then select Win32 >> progressbar insert image click on the form, and then to load the timer on the tools menu select System >> click the picture clock or timer.

• After that we are setting the progressbar timer for how long it lasted or how long does the loading, by clicking the icon Timer >> and on the box object inspector >> click interval stayed we set how long the interval or pause time, here I setiing interval 50.

• Then the next step we create the coding or script code, double-click on the image timer and then type the script code as below.

unit StartUp;

interface

uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, ExtCtrls, ComCtrls, StdCtrls;

type

  TForm6 = class(TForm)

    Label1: TLabel;

    ProgressBar1: TProgressBar;

    Label2: TLabel;

    Timer1: TTimer;

    procedure Timer1Timer(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;

var

  Form6: TForm6;

implementation

{$R *.dfm}

procedure TForm6.Timer1Timer(Sender: TObject);

begin

ProgressBar1.StepBy(1);

ProgressBar1.Step:=ProgressBar1.Step+1 ;

If ProgressBar1.Step =100 then

begin

form5.Show;

form6.Hide;

end;

end;

end.

• Or more details, see the script code drawn below...!!!

• Why typing in my code ( form5.show; form6.hide; ) because here to form the startup menu on the form6 and to the main menu using form5, staying just adjust my friend made on the form how.

The next step we will create the main menu so that after performing startup form it will move main window, here I created the main menu on the form5.

• The first step you first create a new form by selecting File >> New >> select and click a form, the new form will appear on the program.
• Selanjutnya kita akan membuat menu utama dengan memilih standar klik menu tools dan double-klik menu utama (menu)
• Then double click the icon of the main menu on the form design
• then a new window will appear on the main menu designyou just fill out only caption menu that you will make on the main menu, I love the example as shown above.

• you just fill out only caption menu that you will make on the main menu, I love the example as shown above.
• okay let all the process is complete and you run with the click RUN.
• Done and good luck

OK enough of the tutorial that I share today, do not forget to like, Subcribe and leave comments and criticisms and suggestions for an article I wrote and still many shortcomings I may be increased further.

GOOD NIGHT AND NICE DREAM