soma no campo edit no delphi

Delphi

17/12/2015

preciso que cada vez que clicar em um botão especifico somar +1 no campo edit por exemplo: tenho 1 de dinheiro clico trabalhar e ganho +1 (=2) e com o mesmo valor posso comprar pão como exemplo e fazendo que o mesmo campo fique com 0

obs= e existe só 1 campo edit, sou novato no delphi mecho no programa há 1 semana então de preferência coloque só com o codigo para mim entender
Alex

Alex

Curtidas 0

Melhor post

Gabriel Baltazar

Gabriel Baltazar

17/12/2015

Coloca no click do botão

procedure TfrmPrincipal.Button1Click(Sender: TObject);
var
  valor: Integer;
begin
  valor := StrToInt(Edit.Text) + 1;

  edit.Text := IntToStr(valor);
end;
GOSTEI 1

Mais Respostas

Alex

Alex

17/12/2015

Obrigado está funcionando =)
GOSTEI 0
POSTAR