oder
Delphi-Quellcode:
[..]
var zeigeform: TForm;
begin
zeigeform:=FindComponent(form+inttostr(random(10)) as Tform;
zeigeform.show;
end;
Habs nicht getestet, müsste aber meines Erachtens funktionieren..
(sry dass ich das so spät schreib, aber 310 RSS-Feeds durchzusehen dauert eine weile.. 
)