C++ Builder / Démonstration d'un Drag and Drop

1 - Le petit bout de code pour ce programme

// - Cette fonction permet au trois source de pouvoir déposer dans la liste
void __fastcall TfwMenu::listObjetsDragOver(TObject *Sender, TObject *Source, int X, int Y, TDragState State, bool &Accept)
{
switch ( ((TComponent *)Source)->Tag )

{
case 10:
case 20:
case 30: Accept = true; break;
default: Accept = false; break;
}

}

// - Cette fonction permet la gestion du lâcher dans la liste
void __fastcall TfwMenu::listObjetsDragDrop(TObject *Sender, TObject *Source, int X, int Y)
{
switch ( ((TComponent *)Source)->Tag )

{
case 10: listObjets->Items->Add(((TLabel *)Source)->Caption); break;
case 20: listObjets->Items->Add(((TStaticText *)Source)->Caption); break;
case 30: listObjets->Items->Add(((TButton *)Source)->Caption); break;
default: break;
}

}

2 - Le résultat de l'exécution du programme