Alkeita

aloita sisäistämällä tämä
1 2=3

var summa,l1,l2:integer;
p1,p2:^integer;
begin
l1:=1;l2:=2;
p1:=@l1;
p2:=@l2;
summa:=p1^ p2^;
end;

Alla oleva koodi varmaan kertoo tuon periaatteen, lisää tuo Button:n OnClick tapahtumaan ja lukaise ohjeita F1- napilla.
Jos et tiedä niin "//" merkeillä varustetut lauseet/ohjeet ovat kommentteja, jotka ovat ainuastaan ihmisille, ei koneelle, eli kääntäjä ei niitä huomioi kääntäessään koodin konekielelle.


procedure TForm1.Button1Click(Sender: TObject);
var
// Varataan metodin ajaksi vähän muistia..
Summa : Integer;
begin
// Lasketaan 1 1 ja sijoitetaan vastaus 32 bitin kokoiseen muistialueeseen,
// Ts. Integer Tyyppiseksi määritettyyn muuttujaan "Summa"
Summa := 1 1;

// Muunna ensin kirjain muotoon ja tulosta tämä ikkunan otsikkoon
Self.Caption := IntToStr(Summa);
end;