Ver Mensaje Individual
  #19  
Antiguo 20-03-2009
Avatar de Kipow
Kipow Kipow is offline
Miembro
 
Registrado: abr 2006
Ubicación: Guatemala
Posts: 329
Reputación: 19
Kipow Va por buen camino
Interesante el tema, me tomo la libertad de contestarte tus ultimas preguntas noob.

1. Singl2 es la version 2 del ejemplo que roman coloco.
2 y 3. La forma de acceder al singleton seria en todo caso asi


Código Delphi [-]
uses 
   Singl2;

begin
     ShowMessage(GetInstance.Author);   
end
.

ya que GetInstance es una funcion que te retorna la clase. talvez un nombre mas practico podria ser

Código Delphi [-]
function Singleton : TSingleton

Que fue como Al Gonzalez lo recomendo en su propia version.

Saludos.
Responder Con Cita