Fórum duvida simples sobre boolean #203129

27/12/2003

0

oi
eu tenho uma duvida bem idiota
eu sabia como fazer mais já esqueci
é tipo assim
tem um procedure é tipo assim
Botâodomouse(true);
ai o mouse funciona
false ele naum funciona
so que eu não quero fazer dois botões no meu form
um só entende
tipo quando vc clicqa nele ele muda o valor da boolean para o valor contrario
tipo
eu clico no botão e o mouse tava funcionando
e para
eu clico no mesmo botão e ele volta
deu pra entender????


Robotizar

Robotizar

Responder

Posts

27/12/2003

Koplin

Tente adequar o disposto abaixo para o que vc precisa:

(a é uma var global boolean)

begin
If a then begin
Button1.caption:=´VERDADEIRO´;
//FAÇA ALGO;
EXIT;
END;

If not a then begin
Button1.Caption:=´FALSO´;
//FAÇA OUTRA COISA;
end;
end;

Se a = true executa o 1º bloco e sai (função exit). Se a = false, executa a segunda parte.


Responder

Gostei + 0

27/12/2003

Robotizar

mais existe um comando do delphi q já inverte uma função


Responder

Gostei + 0

27/12/2003

Beppe

Para inverter:
SwapMouseButton(True);

Para restaurar:
SwapMouseButton(False);



Responder

Gostei + 0

27/12/2003

Koplin

Aprendi mais uma!


Responder

Gostei + 0

28/12/2003

Cebikyn

var
  VarBool: Boolean;
begin
  ...
  VarBool := not VarBool;
  ...
end;


...ele muda o valor da boolean para o valor contrario...



Responder

Gostei + 0

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

Aceitar