FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Procedimientos y funciones en formularios MDI
Estoy realizando una aplicación MDI y he localizado el siguiente problema. Cuando intento realizar una accion a un objeto del formulario, por ejemplo:
EditText:='Hola'; si lo realizo en el evento "on show", funciona de manera correcta, pero si en vez de hacerlo "directamente" en el evento, intento derivarlo a un procedimiento, ejemplo: procedure di_hola; begin Form1.Edit1.Text:='hola'; end; procedure TForm1.FormShow(Sender: TObject); begin inherited; di_hola; end; Me da un error. Necesito ayuda, ya que me encuentro atascado y no encuentro la solucion Gracias |
#2
|
|||
|
|||
Tal y como lo tienes no te puede funcionar porque el di_hola no esta dentro del Form1
|
#3
|
|||
|
|||
¿Como lo incluyo dentro del Form1
|
#4
|
||||
|
||||
Donde tienes declarado el procedimiento di_hola?
__________________
"Sé de tal manera y vive una vida tal, que si todos los hombres fueran como tú y vivieran como tú, nuestro mundo sería un paraíso terrenal" Siempre hazlo con la ayuda de Dios
|
#5
|
|||
|
|||
Esta puesto en el formulario Form1, pero no lo tengo declarado en ningun sitio. Tengo que ponerlo en la parte private, en public,
|
#6
|
||||
|
||||
De esta manera funciona... Mira donde esta declarado el procedimiento.
__________________
"Sé de tal manera y vive una vida tal, que si todos los hombres fueran como tú y vivieran como tú, nuestro mundo sería un paraíso terrenal" Siempre hazlo con la ayuda de Dios
|
#7
|
|||
|
|||
lo he probado y me da un error de acceso a memoria en direccion xxxxxx
¿Que mas estoy haciendo mal? Ya he comentado que es una aplicacion MDI Los porcedimiento aparecen de la siguiente manera procedure TForm1.FormShow(Sender: TObject); begin inherited; Tiene la palabra inherited algo que ver con todo esto? |
#8
|
||||
|
||||
El hecho de que la aplicación sea MDI no influye para nada en este caso.
Tal y cual como te lo explico Albano funciona pero debes hacer un cambio para adaptarlo a tu aplicación me explico: Donde diga Form2 (Y siguiendo con el ejemplo que mostraste) debes colocar Form1, de manera pues que todo quedaria asi:
Si no fue eso pues podriamos revisar luego lo del inherited;
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!" http://www.purodelphi.com/ http://www.nosolodelphi.com/ Última edición por jhonny fecha: 05-03-2007 a las 20:26:51. |
#9
|
|||
|
|||
Muchas gracias, ya me funciona, de todas formas y puestos a aprender, me podriais explicar el tema del inherit
Gracias de nuevo |
#10
|
||||
|
||||
Te recomendaría leer "La cara oculta de delphi4" que esta gratis en la pagina www.marteens.com allí te dan una breve explicación de esa y muchas cosas mas acerca de Delphi.
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!" http://www.purodelphi.com/ http://www.nosolodelphi.com/ |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Sobre procedimientos y funciones | Perrero80 | OOP | 3 | 17-05-2006 11:55:42 |
donde almacenar los procedimientos y funciones | olbeup | MS SQL Server | 2 | 16-04-2006 20:56:07 |
Definir funciones y procedimientos en FastReport???? | burasu | Impresión | 1 | 16-05-2005 21:47:37 |
Procedimientos y funciones en paquetes | MARIOR | Varios | 2 | 08-01-2004 23:50:51 |
Procedimientos | Waldo | Varios | 4 | 01-11-2003 07:43:04 |
|