Declarar funciones generales
Hola,
Quiero hacer un Modulo de Datos en donde declarar funciones para poderlas usar en todos los formularios. Con los "procedure" todo bien, los pongo en el interface y ya esta... , pero con las "function" no puedo ponerlas en el interface (por lo menos a mi me da error), entonces ¿como hago para que una "function" sea visible por los demas formularios? Gracias de antemano :) |
Debe funcionar sin problemas. Muéstranos cómo lo haces.
// Saludos |
Cita:
|
Lo explico con un ejemplo: Tengo este código declarado en la parte de implementación:
Ahora bien si quiero que sea visible a los demas formularios deberia poner la cabezera ( function EsNif(NIF: String): Boolean; ) en el interface. Esto es lo que pongo:
Ahí no me deja poner la cabezera de la función, este es el error que da: [Error] ClienteNuevo.pas(51): Unsatisfied forward or external declaration: 'TFormClienteNuevo.Letra' ¿hago algo mal? y si no ¿entonces donde pongo la cabezera de la funcion o la funcion entera para que sea visible por los demas formularios? Gracias! |
Eso, con un procedure te va a dar el mismo error. ¿Por qué no revisas los procedure que sí te funcionan y así ves la diferencia?
// Saludos |
Debes colocarlo dentro del interface, pero tu ademas lo colocas dentro de la declaracion del formulario. Esto puedes solucionarlo de dos maneras:
Sacandolo fuera:
O por el contrario si va a formar parte del formulario, la implementacion de la funcion seria asi:
|
Conseguido
Gracias Seoane, la segunda opción es justo lo que quería saber, ya lo he probado y perfecto. Nunca había usado las funciones con un formulario asignado, no sabia que se podía hacer "function formulario.nombre", vaya paquete estoy hecho jeje.
Gracias a todos |
La franja horaria es GMT +2. Ahora son las 17:43:13. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi