[Alan]

Здраво,

Edit1->Text = Edit1->Text + UPC[cifra];
Edit1->Text = Edit1->Text + UPC[cifra|0];

//UPC je niz tipa String.
//Promjenljiva cifra je tipa integer i, predstavlja indeks člana niza.

1) Раде ли ове двије линије исту ствар?

2) Чему служи ова усправна црта?

3) Какав би био резултат да умјесто 0, стоји 1, или неки други цио број?