Proyecto MDI, error al crear form hija

[[Lepe]]

Aqui hay un error:

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
xxx.NodeDataSize := SizeOf(ptgabinete);
end;

El parámetro a SizeOf no debe ser de tipo puntero, sino el propio tipo registro.

Sustituye Ptgabinete por ttgabinete. Al darle información errónea al crear el nodo, es normal que muestre basura. Haciéndolo bien, no da problemas y es rapidísimo.

Tu mensaje anterior (el tocho) no lo he leído, edita el mensaje y añade las etiquetas delphi:
[ delphi ]

tu codigo fuente aqui

[ / delphi ]

(sin los espacios dentro de los corchetes)

Es normal empezar un proyecto y tomar una decisión (porque se desconoce otra forma), algunas veces se queda como está y otras se cambia (depende del tiempo y beneficio que obtengas, en $$ jeje).

Los recursos que toma los editores no lo he mirado mucho, pero es UN solo TEdit el usado. Por otra parte lo que en realidad se crea y destruye al entrar y salir del modo edición, es un objeto que enlaza el VT con el Edit en cuestión).

[nfrfabian]

Hola Lepe, tenias razón. Ahora funciona bien. Voy a probar el componente. Cualquier otra duda que tenga les voy a volver a consultar. Gracias a todos.

[gabrielkc]

mmmmm te metiste en un buen problema.

Recuerdo cuando programaba asi , no te preocupes son problemas comunes que comete uno cuando está aprendiendo a programar.


Generalmente ese tipo de proyectos te dejan muchos conocimientos. En cuanto al tema de los edits, cada edit es una ventana y consume recursos, recuerda que aún puedes utilizar labels para mostrar información que el usuario no va a modificar, los label practicamente no consumen recursos.

Y para una de las preguntas de tus primeros post. Como cambiar el formato de un Grid (yo siempre uso StringGrid) En el evento OnDrawCell, puedes cambiar a tu antojo el formato de como se dibujará cada celda, tipo de letra, tamaño, color de fondo, etc.

Cambiando el StringGrid.Canvas.Brush.Color cambias el color de relleno, StringGrid.Canvas.Font.Color el color de la letra, con StringGrid.Canvas.FillRect(Rect) rellenas la celda y con DrawText dibujas el texto.

[[sitrico]]

Con razón me identificaba con el problema, también estoy haciendo una aplicación para una estetica pero sólo 5 cabinas .

Yo, manejé la lista de espera con Grids (uno por cabina) y las citas con un TimePlanner muy simple hecho por mí.

PD. Usa las etiquetas.

Lepe, si pudiste leer todo lo anterior te daras cuenta que si bien todos los archivos agendadetalladasxxxx.dpr son iguales, lo unico que cambia son los archivos agendadetalladasxxx.pas, mas precisamente todos los eventos. (oncreate del form; onclick, ondblclick, onmouseenter, onmouseleave de los tedits, en la mayoria solo cambia el valor de la variable "engab", que guarda el gabinete.

Para esto puedes usar la propiedad Tag de los componentes. y un procedimiento publico para asignar el Numero

Me parece que de esta forma todos los eventos de todos los forms seran los mismos y si es asi yo no tengo forma de saber en que gabinete se esta realizando alguna operacion

Mira este hilo (ya pase por ahí)

[nfrfabian]

Hola gabrielkc, gracias por el consejo, en estos momentos estoy utilizando el componente virtualstringtree en lugar de los tedits porque fue la unica solucion que encontre (todavia estoy en proceso de creación de los gabinetes porque este componente es un poco complicado de manejar (nodo, punteros, etc.). Quizas pueda utilizar el stringgrid en otra parte del programa que todavia no pase de tedits a virtualstringtree. Gracias.