type 
  procedure Label1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
private
    { Private declarations }
  public
    { Public declarations }
  end;

procedure TForm1.Label1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
ReleaseCapture;
Panel1.Perform(WM_SYSCOMMAND, $f012, 0);
end;

검색을해서 이렇게 소스상에 적어두고 컴파일했는데 작동이 안되는거같아요

따로 이벤트를 추가를해줘야하나요? 이벤트를 추가를해야한다면 이벤트추가하는법좀