Cual es el evento que se ejecuta al mover un formulario

[ecfisa]

Hola Jorge.

Podrías capturar el mensaje WM_MOVING, vg.:
.h

Código PHP:

...
class TForm1 : public TForm
{
__published:    // IDE-managed Components
 
private:    // User declarations
  void virtual __fastcall WMMoving(TMessage& Message);
protected:
  BEGIN_MESSAGE_MAP
    VCL_MESSAGE_HANDLER(WM_MOVING, TMessage, WMMoving);
  END_MESSAGE_MAP(TForm);
public:        // User declarations
  __fastcall TForm1(TComponent* Owner);
}; 


.cpp

Código PHP:

...
void __fastcall TForm1::WMMoving(TMessage& Message)
{
  if (Message.Msg == WM_MOVING)
    ShowMessage("Moviendo");
  DefaultHandler(&Message);
} 


O también el mensaje WM_SYSCOMMAND como te indicó roman:
.h

Código PHP:

...
class TForm1 : public TForm
{
__published:    // IDE-managed Components
private:    // User declarations
  void virtual __fastcall WMSysCommand(TWMSysCommand &Message);
protected:
  BEGIN_MESSAGE_MAP
  VCL_MESSAGE_HANDLER(WM_SYSCOMMAND, TWMSysCommand, WMSysCommand)
  END_MESSAGE_MAP(TForm)
public:        // User declarations
  __fastcall TForm1(TComponent* Owner);
}; 


.cpp

Código PHP:

...
const SC_DRAGMOVE = 0xF012;

void __fastcall TForm1::WMSysCommand(TWMSysCommand &Message)
{
 if (Message.CmdType == SC_DRAGMOVE)
    ShowMessage("Moviendo");
  DefaultHandler(&Message);
} 


Saludos