[plionut]

A través del object inspector:

Código Delphi [-]
procedure TMiFormulario.MiComponenteDragDrop1(Sender, Source: TObject; X, Y: Integer);
begin
  showmessage('blabla')
end;

El valor de la propiedad dragmode del panel que quiero mover es dmAutomatic