FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
Fomrs Dinamicos
Que tal foro...
Pues mi problemilla es el siguiente: Estoy creando una aplicación donde el usuario puede crear dinamicamente la cantidad de formularios o ventanas que quiera; cuando las creo no hay problema, tengo un formulario 'Plantilla' que utilizo como base de los formularios que el usuario puede crear: procedure TMainform.nuevaform; var nuevo: TPlantilla; begin nuevo:= TPlantilla.Create(Self); nuevo.name:='nombre' + numero // variable tipo integer nuevo.show; end; De esta forma creo los formularios el LIO esta cuando los cierro, pues cierran perfecto pero si intento crearlos nuevamente obviamente genera un error que me indica que ya existe un objeto llamado : 'nombre' + numero.... y pues hasta ahi llevo mi aplicación. Agradezco de antemano toda su colaboración. Salu2
__________________
Diego. Colombia es pasión. |
#2
|
||||
|
||||
Si no utilizas para nada el dato del nombre, no le pongas nombre a los forms... Y Listo!
Sinó puedes verificar que no exista ningún formulario con el mismo nombre consultando Screen.Forms. Saludos!
__________________
delphi.com.ar Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla. |
#3
|
||||
|
||||
Gracias, la verdad es que si necesito los nombres de los forms, voy a probar lo que me dices, no se si exista la forma de obtener el puntero del form para así liberarlo si ya existe... bueno, gracias de nuevo.
Salu2
__________________
Diego. Colombia es pasión. |
#4
|
||||
|
||||
Cita:
Action := caFree; en el evento OnClose del formulario que creas para que se libere automáticamente al momento de cerrarlo. Esto también "libera" el nombre de manera que no te generará error al volverlo a crear. // Saludos |
|
|
|