[Delphi] odejmowanie

Mam ja problem. Chcę zrobić takie coś:
User klika na przycisk "KLIKNIJ" a od podanej liczby odemowana jest ustalona przeze mnie wartość...
No i jak to zrobić?

[code]var
podana_liczba, wartosc,wynik: integer;
begin
wynik:=podana_liczba - wartosc;
ShowMessage(IntToStr(wynik));[/code]

a jeśli podaną liczbę i wartość odejmowaną chcesz wczytać z np. edita to:
[code]wartosc:=StrToInt(edit1.text);
podana_liczba:=StrToInt(edit2.text);[/code]

Chyba o to chodzi :p

Q*** ***C SCIAGAJ MÓJ PROGRAM KALKULATOR !!!!!!!! [diabel] [diabel] [diabel] [diabel] [diabel] [diabel] [diabel] [diabel] tam jest wiecej !!!!

ale jak cos :) ehheeh masz to odejmowanie :
na formie daj 2 edity i label name = 'wynik_'
const
l_wynik:integer=0;
Liczba_x:integer=0;
Liczba_y:integer=0;
begin
l_wynik:=StrToInt(wynik_.Caption);
liczba_x:=StrToInt(l1.text);
liczba_y:=StrToInt(l2.text);
l_wynik:=liczba_x-liczba_y;
wynik_.Caption:=IntToStr(l_wynik);
end;