Создаю компоненты таким образом:
	Код:
	  Grid[0] := TDrawGrid.Create(Form1);
 
У меня есть обработчик события:
	Код:
	procedure TForm1.DrawGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
var s : String;
begin
  case TDrawGrid(Sender).tag of
    1:  s := IntToStr(agres);
    2:  s := IntToStr(alcohol);
    3:  s := IntToStr(boss);
  end;
  TDrawGrid(Sender).Canvas.TextOut(35, 1, s);
end; 
Где нужно объявить эту процедуру в каком месте или в какой секциии и как ее назначить для обработки события компонента 
?