Ver Mensaje Individual
  #1  
Antiguo 08-07-2013
Avatar de Bicho
[Bicho] Bicho is offline
Miembro Premium
 
Registrado: jul 2003
Ubicación: Inca - Mallorca
Posts: 1.776
Reputación: 22
Bicho Va por buen camino
Guardar codigo fuente de formulario ejecutandose

Hola chicos cuanto tiempo,

pues ahora ya necesito ayuda de vuestra sabiduría ya que mi cabecita no da más de sí.
Veréis me han enfrascado en un proyecto un tanto extraño para la empresa y se trata de lo siguiente.
- Una aplicación delphi que genere formulario (delphis) para realizar mantenimientos básicos sobre tablas planas. Es decir:
- La aplicación tendrá un asistente donde configurar como se desea que sea el formulario (los formularios son todos iguales, tengo incluido en el proyecto una plantilla del formulario base)
- Una vez escogidas las características: base de datos y tabla, escoger el nombre de los ficheros, las opciones que tendrá: insertar, modificar y borrar, etc, y los filtros (que campos deseamos que pertenezcan al filtro), cuales queremos que aparezcan en un grid, etc
- Pues la aplicación cogerá la "plantilla" modificará sus propiedades según lo escogido y cogerá el .pas y .dfm y los guardará con el nombre escogido. Luego pues ya se mete en el proyecto Delphi que corresponda y con las modificaciones que necesite de su proyecto lo modificará según le convenga.
- A la vez también generará el PL/sql necesario con las funciones de básicas del mantenimiento.

Más o menos lo tengo todo controlado, excepto lo de guardar el formulario.
Mi primera opción fue crear el formulario a mano, voy añadiendo los objetos a un listbox con el mismo formato del pas y el dfm y luego los guardo, pero es un trabajo de chinos y andaré parche sobre parche continuamente y no me convenció la idea.
Así que me dije porque no coger un formulario básico, metido dentro del proyecto, puedo acceder a los objetos y propiedades, las modifico y cojo ése código y lo guardo en los ficheros pas y dfm. Y ese es mi problema, ¿cómo acceder al código fuente de un formulario que tengo abierto (al pas y al dfm) y de ésta manera meterlo en un richedit y guardarlo como fichero de texto?
Es que me suena haberlo visto alguna vez, pero llevo toda la mañana buscando por el foro y no doy con ello.

Perdón por el tocho y gracias por adelantado

pd: por si puede servir de ayuda, uso Delphi XE

Última edición por Bicho fecha: 08-07-2013 a las 16:41:37.
Responder Con Cita