BCB5なんだけど、

for(i=0;i<cnt;i++){
TTrackBar &bar =* new TTrackBar(this) ;
bar.Parent = this;
bar.Name = "BAR"+IntToStr(i+CRAMAdr);
bar.Top = i*bar.Height+45;
 ・・・略・・・

みたいに TTrackBarを動的に作成しようとしたら cntが1以上の場合
そのクラスは既にありますというエラーが出ます。

で、.PASで
procedure test(AOwner:TWinControl);
var i:Integer;
begin
for i:=0 to 3 do begin
with TTrackBar.Create(AOwner) do
begin
Parent := AOwner;
Top:=Height*i+32;
end;
end;
end;
と試験コードを書いて試した所、やはり同じエラーが出ます (このコードでもDelphi5なら成功する)

いったいどうやればいいんでしょう?