TProgressBar does not come up

[endik]

some can help how to create ProgresBar dynamically?

this does not work:

Code: [Select]

progres:=TProgressBar.Create(nil);
 progres.Orientation:=pbHorizontal;
 progres.Left:=570;
 progres.Top:=40;
 progres.Height:=30;
 progres.Width:=450;
 progres.Position:=0;
 progres.Max:=imax;
 progres.BarShowText:=True;
 progres.Smooth:=True;
 progres.Step:=1;
 progres.Visible:=True;

...

 progres.Free;


[antonio]

When you set Parent (progress.Parent) this will work.

[endik]

thanks Antonio for so quick answer, unfortunately I could not find anything about this option so I was not able to fix it. Could you be more detailed by adding a correct value for .Parent?

[endik]

ok, I have found it, it should be address to component which progres is expected to be created on

thanks anyway

[antonio]

The parent can be a control or a form. Normally, it's the control where you put your control (progressbar) at design time.