Ver Mensaje Individual
  #6  
Antiguo 28-07-2007
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Reputación: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
En la unidad donde defines tu formulario pon algo así:

Código Delphi [-]
unit Unit1;

interface

type
  TForm1 = class(TForm)
     ...
  end;

implementation

var
  Clicks: Integer;

initialization
  Clicks := 1;

end.

La variable Clicks se inicializará al principio de la aplicación y preservará su valor aun destruyendo el formulario, y segurá siendo invisible para otras unidades.

// Saludos
Responder Con Cita