Ver Mensaje Individual
  #4  
Antiguo 27-06-2004
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Reputación: 28
jachguate Va por buen camino
Si estas trabajando con métodos de clase, podes declarar Valor como un atributo de la misma (que se inicializa automáticamente a cero).

De manera que en la primera llamada al método, valdra 0, y en las siguientes, conservará el último valor asignado:

Probá este pequeño ejemplo:

Código Delphi [-]
Type
  TForm1 = class(TForm)
  ...
  private
    FValor : Integer;  //atributo de clase
  end;

  Procedure Button1Click(Sender : TObject);
  begin
    inc(FValor);
    label1.caption := IntToStr(FValor);  
    //la primera vez valdra 1, y se va incrementando en cada clic del boton.
  end;

Hasta luego.

__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita