Fórum saber quando um valor muda de 1 para 2 #209250

25/01/2004

0

Sou novato...

como faço para detctar quando uma var muda de 1 para 2.
ela é uma Integer e seu valor será sempre 1 ou 2.
Ele tem que me dar quando ela mudar de 1 para 2, e nao quando quando tiver em 2, em 1 ou de 2 para 1.

Farias


Jdaniel0309

Jdaniel0309

Responder

Posts

25/01/2004

Beppe

Você pode usar propriedades:

TForm1 = ...
private
  FChave: Integer;
  procedure SetChave(Value: Integer);
public
  property Chave: Integer read FChave write SetChave;
end;
...
procedure TForm1.SetChave(Value: Integer);
begin
  if (FChave = 1) and (Value = 2) then
  begin
  // coloca código que executa quando mudou de 1 para 2
  end;
  FChave := Value;
end;



Responder

Gostei + 0

26/01/2004

Jdaniel0309

deu certo cara. Obrigado...


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar