Algo asi puede ser:
Código Delphi
[-]
procedure TForm1.ComboBox1Change(Sender: TObject);
var
formabrir : tform;
begin
case combobox1.itemindex of
0:begin
formabrir := form2.create(self);
end;1:begin
formabrir := form3.create(self);
end;2:begin
formabrir := form4.create(self);
end;end
else
begin
showmessage('Elija una opcion valida!')end;
try
formabrir.showmodal;
finally
formabrir.free;
end;
end;
No lo probé... simplemente lo escribi de memoria por lo q pueden haber errores pero creo q asi deberia funcionar bien
{Saludos}