Me

int boxidx := Box.Me()

// **********************************************************
// Fired when a draggable box is dropped onto a droppable box
// **********************************************************
event BookDD.BookDD.OnBoxDrop(
  int SourceBoxID // Box that have been dropped. Use the Me property of th...
  int TargetBoxID // Box that received the drop. Use the Me property of th...
)
{
  string NomeBoxSrc = "" // Nome della box tirata
  string NomeBoxTgt = "" // Nome della box che ha ricevuto il drop
  // 
  // Mi posiziono sulla riga della box tirata
  BookDD.ShowDragBox()
  NomeBoxSrc := FormatMessage(Box |1, BookDD.IDPezzo, ??, ??, ??, ??)
  // 
  // Se tirano sul cestino... elimino la box
  if TargetBoxID = BookDD.Cestino.Me()
  {
    int IDPezzoDaElim = 0 // 
    // 
    // Recupero l'ID del pezzo da eliminare
    IDPezzoDaElim := BookDD.IDPezzo
    // 
    // Elimino la box tirata dalla tabella dei pezzi
    delete from Pezzi
    where
      ID = IDPezzoDaElim
    // 
    // Mostro il messaggio all'utente
    EsempiLB.MessageBox(FormatMessage(MSG Eliminato, NomeBoxSrc, ??, ??,
      ??, ??))
    // 
    return
  }
  // 
  // Mi posiziono sulla riga della box su cui è stato effettuato il Drop
  BookDD.ShowDropBox()
  NomeBoxTgt := FormatMessage(Box |1, BookDD.IDPezzo, ??, ??, ??, ??)
  // 
  // Mostro il messaggio all'utente
  EsempiLB.MessageBox(FormatMessage(MSG Tirato Sulla, NomeBoxSrc,
    NomeBoxTgt, ??, ??, ??))
}