Mislim stvarno, daj o cemu se radi...
Pises kod a ne znas zasto ne radi i nemas vremena za help...
Nije lepo prema ljudima koji ti postuju odgovore...
Strtoint :string to integer
Rightstr : oduzmi deo od stringa pocevsi s desne strane za broj koji je naveden kao argument (1)
Ovde konkretno Cellindex dobija integer vrednost od labele, jer se one sve genericki oznacavaju Label1,Label2... pa ona koja je Sender, od njenog imena uzima poslednju cifru...primer za Label1 uzima 1, za Label2 - uzima 2 itd..
To lepo radi ako imas do 9 labela a sta posle?
Btw, kako to pises kod... bolje koristi tab order ili componentIndex , zavisno kako si organizovao program...ili bar proveri da li je (RightStr(TLabel(Sender).Name,2) ceo broj, imas funkciju trystrtoint...ovako si vezan za max. 9 labela, bezveze...
Still going strong...