Proyecto MDI, error al crear form hija

[nfrfabian]

Gracias Lepe, acabo de instalar el VirtualTreeView y por lo que dice la pagina del creador del VirtualTreeView, es lo que necesito, ahora estoy viendo los tres componente que incluye el VirtualTreeView y aparentemente, el componente que necesito es el virtualstringtree, pero hasta ahora no he podido hacer que se muestren las filas y columnas (supongo que este componente podria funcionar como un stringgrid mejorado), si sabes cual es la propiedad que tengo que modificar, te lo voy a agradecer, sino no importa seguro con un poco de paciencia lo voy a descubrir.
En este momento tengo esperanza que este componente solucione mis problemas. El camino que me queda es muy largo para poder utilizar este componente en vez de mis cientos de tedits (cambiar toda la parte grafica, y las funciones y procedimientos que utilizo para mostrar, borrar, la informacion con los tedits, eventos, etc.).
Lo mas importante es que tengo un punto de partida para resolver mi problema. Te agradesco mucho la ayuda que me diste, al igual que todos los demas, que me dieron algunos consejos. Gracias a todos.

[[Lepe]]

En este hilo tienes un ejemplo con código y enlace a manuales.

Lo primero será acceder a la propiedad Header, dentro de ella tienes ColumnsHeader y definir cuantas columnas quieres, el ancho, etc.

Saludos

[[sitrico]]

Otro detalle: en OOP cuando creas los form de la manera en que lo haces,

Application.CreateForm(Tagendadetallada1, agendadetallada1);
Application.CreateForm(Tagendadetallada2, agendadetallada2);
Application.CreateForm(Tagendadetallada3, agendadetallada3);
Application.CreateForm(Tagendadetallada5, agendadetallada5);
Application.CreateForm(Tagendadetallada6, agendadetallada6);
Application.CreateForm(Tagendadetallada7, agendadetallada7);
Application.CreateForm(Tagendadetallada8, agendadetallada8);
Application.CreateForm(Tagendadetallada9, agendadetallada9);
Application.CreateForm(Tagendadetallada11, agendadetallada11);
Application.CreateForm(Tagendadetallada12, agendadetallada12);
Application.CreateForm(Tagendadetallada13, agendadetallada13);
Application.CreateForm(Tagendadetallada14, agendadetallada14);

Asignas para cada una los metodos y procedimientos asignas memoria tanto al codigo, como a los datos

Si usaras algo como:

Application.CreateForm(Tagendadetallada1, CustomAgendaDetallada);
Application.CreateForm(Tagendadetallada2, CustomAgendaDetallada);
Application.CreateForm(Tagendadetallada3, CustomAgendaDetallada);
Application.CreateForm(Tagendadetallada5, CustomAgendaDetallada);
Application.CreateForm(Tagendadetallada6, CustomAgendaDetallada);
Application.CreateForm(Tagendadetallada7, CustomAgendaDetallada);
Application.CreateForm(Tagendadetallada8, CustomAgendaDetallada);
Application.CreateForm(Tagendadetallada9, CustomAgendaDetallada);
Application.CreateForm(Tagendadetallada11, CustomAgendaDetallada);
Application.CreateForm(Tagendadetallada12, CustomAgendaDetallada);
Application.CreateForm(Tagendadetallada13, CustomAgendaDetallada);
Application.CreateForm(Tagendadetallada14, CustomAgendaDetallada);

Necesitarías 1 sóla vez la memoria para los métodos y un juego de propiedades unico para cada instancia del objeto.

es más no necesitas creear al inicio todos los formularios puedes hacerlo en el oncreate del main form

Código Delphi [-]
For i = 0 to CantidadAgendas do
   Begin
   f[i] := tAgendaDetallada.Create(self);
   f[i].SetIdAgendaDetallada(i); 
    // aqui escribes un case qure diferencia los parametros de las agendas
   End;

End;

[nfrfabian]

Hola Sitrico, me parece que la solucion que me das es muy parecida a la variante que hice cuando el form agendadetallada lo puse en el repositor de objetos y despues cree un proyecto nuevo y adicione los forms necesario. Si bien el tamaño del ejecutable bajo de mas de 5mb a 1mb, lo que indicaba que realmente estaba reutilizando el form agendadetallada, pero a la hora de ejecutarse el error volvia a aparecer.
De todas formas voy a probar la variante me me decis, total el implementar lo que me decis es mucho mas simple que cambiar todos los tedits por algunos virtualstringtree.

Lepe, me fije el link que pusiste y me sirvio bastante, aunque al copiar los codigo que pusiste para mostrar los datos en el virtualstringtree, no me esta funcionando, lo que estoy haciendo es modificar el ejemplo que viene con el virtualtreeview, pero tengo una duda: En el evento doble click del virtualstringtree que uso, utilizo la sentencia Node:=VST5.FocusedNode; para determinar el nodo en el que hice el doble click, pero nose como puedo saber a que columna pertenece.
Mañana voy a tratar de hacer lo que me dice Sitrico, si no funciona volvere a
seguir estudiando al virtualstringtree. Gracias.

[[sitrico]]

Del {$M} (hoy si tengo delphi a mano)

Buscando en la ayuda de delphi:

Type Parameter
Syntax {$M minstacksize,maxstacksize}
{$MINSTACKSIZE number}
{$MAXSTACKSIZE number}
Default {$M 16384,1048576}
Scope Global
Remarks

The $MINSTACKSIZE and $MAXSTACKSIZE directives are used in Windows programming only. For information about the $M ($RESOURCERESERVE) directive in Linux, see Reserved address space for resources.
The $M directive specifies an application's stack allocation parameters. minstacksize must be an integer number between 1024 and 2147483647 that specifies the minimum size of an application's stack, and maxstacksize must be an integer number between minstacksize and 2147483647 that specifies the maximum size of an application's stack.

If there is not enough memory available to satisfy an application's minimum stack requirement, Windows will report an error upon attempting to start the application.
An application's stack is never allowed to grow larger than the maximum stack size. Any attempt to grow the stack beyond the maximum stack size causes an EStackOverflow exception to be raised.
The $MINSTACKSIZE and $MAXSTACKSIZE directives allow the minimum and maximum stack sizes to be specified separately.

The memory allocation directives are meaningful only in a program. They should not be used in a library or a unit.
For portability considerations between Windows and Linux, you should use the long forms of these directives instead of $M.

Note The $M directive is used for a different purpose on platforms other than Windows. See Reserved address space for resources.

Prueba agregar esta directiva:

Código Delphi [-]
{$M 16384,10485760}

// el MAXSTACKSIZE *10

y ejecuta tu aplicación si funciona DEBES BAJAR el MAXSTACKSIZE hasta el mínimo necesario.

Hola Sitrico, me parece que la solucion que me das es muy parecida a la variante que hice cuando el form agendadetallada lo puse en el repositor de objetos y despues cree un proyecto nuevo y adicione los forms necesario

Ciertamente, pero la diferencia es que te recomiendo crear el mismo Formulario con distintos parametros y no distintos formularios como mencionaste.

[nfrfabian]

Hola Sitrico, lamentablemente, el uso de la directiva no funciona, lo probe tal cual lo pusiste:
Primero agregando la directiva solamente.
Despues creando un form con distintos parametros.
Finalmente con las dos formas a la vez, es decir creando un form con distintos tamaños y la directiva.
En todas me aparecio el mismo error.
Por ahora sigo probando si el componente virtualstringtree, a ver si me sirve. Hasta ahora pude verificar que existe eventos que reemplazan a los eventos del tedis onclick y ondblclick, pero no existe el evento onmouseenter y onmouseleave que yo utilizo cuando el mouse se posiciona en el tedit y verifico que se puede agendar en esa posicion. Lo mas parecido que encontre fue el evento onmousemove.
Sitrico, gracias igualmente.

[[sitrico]]

Acabo de encontrar este hilo, (se me acabaron las ideas)

http://www.clubdelphi.com/foros/show...ghlight=FastMM

Se habla (al final) del gestor de memoria FastMM (no lo conocia) te dejo el enlace:

http://sourceforge.net/projects/fastmm/

Yo lo instale y gané (algo) en velocidad (proyecto e IDE)