Ver Mensaje Individual
  #4  
Antiguo 13-08-2007
Avatar de b3nshi
b3nshi b3nshi is offline
Miembro
 
Registrado: feb 2005
Ubicación: Tucuman - Argentina
Posts: 164
Reputación: 20
b3nshi Va por buen camino
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;//Este se supone q es el form2
1:begin 
   formabrir := form3.create(self);
   end;//Se supone q es el form3
2:begin 
   formabrir := form4.create(self);
   end;//Otro form..
end
else
begin
showmessage('Elija una opcion valida!')//En el caso de q no sea ninguno de estos
end;//Fin del case-else
 
try
formabrir.showmodal;
finally
formabrir.free;
end;
end;//Termina el procedimiento

No lo probé... simplemente lo escribi de memoria por lo q pueden haber errores pero creo q asi deberia funcionar bien

{Saludos}
Responder Con Cita