variabeln problem

[UniPerson]

ich versuche etwas im code einzubinden die zahl die im texbox ist +1 beid knopfdruck soll sich die zahl + nehmen.
var
A : Integer

edit5.text := edit5.text + 1 ?
a:= edit5.text
und dann

asm
mov [$22222222], $3333333 & a
end;


kriege das nicht hin wer nen simplen code dafür?