Image控件上如何动态添加进度条？

[GeoPhoenix]

有个小程序需要，以前都是静态添加，现在需要动态添加，有点懵门，请大虾赐教

[ccrun.com]

Image不是容器, 何来在其上添加进度条呢. 你要的是动态生成一个进度条覆盖在Image上吧?

[GeoPhoenix]

先给老妖拜个晚年，是一个数据处理，显示一下当前的处理进度，免得让人以为死机了，是要动态生成一个进度条覆盖在Image上，估计是我没说清楚，部分代码如下
TProgressBar *ProgressBar1;
ProgressBar1 = new TProgressBar(this);
ProgressBar1->Parent =(TWinControl *)Image1; //编译通过，运行出错，不知道怎么修改，老妖帮下忙，先行谢过！

[ccrun.com]

楼主你好, 我刚才说了,Image不是容器, 是不能作为Parent的. 可以改成这样:

TProgressBar *ProgressBar1 = new TProgressBar(this);
ProgressBar1->Parent = Image1->Parent;
ProgressBar1->Left = Image1->Left + 10;
ProgressBar1->Top = Image1->Top + 10;
ProgressBar1->Show();

[GeoPhoenix]

谢谢了，老妖！