[Alegun]

Замените 112 строку на

Код:

mem[i,j].OnClick:=MemClick;