Ver Mensaje Individual
  #4  
Antiguo 21-02-2008
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.141
Reputación: 36
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Cita:
Empezado por anubis
(...) se como pasar variables en procedimientos o funciones pero dentro de la misma unit no pasar variables de una unit a otra tal y como se haria con un procedimiento o funcion, de ahi que almacene algunas en la unit principal.
En realidad el "conceto" es el mismo que con funciones y procedimientos, y cualquier otra cosa. Se trata de utilizar la cláusula "interface" y declarar ahí las variables que queramos que sean "globales", es decir, cualquier otra unidad que añada en alguno de sus "uses" la siguiente unidad podría utilizar las variables que se declaran en ella como globales:

Código Delphi [-]
Unit Globals;

interface

var
  IamGlobalVar: integer;
  IamAnotherGlobalVar: string;

implementation

end.

Si añades en otra unidad a "Globals" podrás usar las variables que ves arriba: de la misma forma que harías con una función, procedimiento, clase, tipo, constante o lo que fuera declarado en la cláusula "interface" de "Globals".
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita