как описать событие?

[maxeebon]

Спасибо все получилось. И еще вопросик.

TWebbox = class(TPaintBox)
 ...
 FCells: array of array of TCell;
 ...
end;

Нужно ли освобождать такие динамические массивы, или они освобождаются сами после уничтожения класса?

[Пепел Феникса]

сам массив нет(насколько я помню), а вот объекты содержащиеся в нем надо освоождать.

var i,j:integer;
begin
 for int i=0 to Length(FCells)-1 do for j:=0 to Length(FCells[i])-1 do FCells[i,j].Free;