[Rokuell]

В раздел public описания формы добавляешь нужную процедуру обработки
а потом присваиваешь её событию:

Код:

type
  TForm1 = class(TForm)
  ...
  public
   procedure MClick(Sender: TObject);
   procedure MMouseDown(Sender: TObject; Button: TMouseButton;
                                    Shift: TShiftState; X, Y: Integer);
  end;

...

procedure TForm1.MClick(Sender: TObject);
begin
 (Sender as TForm).Color := clBlack; // Если это форма, то TForm
 // Если нет - ставь другой тип
end;

procedure TForm1.MMouseDown(Sender: TObject);
begin
 ...
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
 V.Form_.OnClick := MClick;
 V.Form_.OnMouseDown := MMouseDown;
end;

В итоге при наступлении событий OnClick и OnMouseDown у объекта Form_
будут вызываться твои обработчики