On Begin Drag Over

Code	Pode ser chamado por	Definição
17	Área 4D Write Pro - Botão - Grade de botões - Caixa de seleção - Lista suspensa - Formulário - Lista hierárquica - Entrada - Lista - List Box - Botón con imagen - Menu pop-up com imagem - Área de Plug-in - Indicadores de progresso - Botão de opção - Regra - Seletor - Separador - Etapas - Controle de tabulação	Um objecto está a ser arrastado

Descrição

O evento Ao Começar Arrastar Novo pode ser selecionado para quaisquer objetos de forma que possam ser arrastados. Ele é gerado em todos os casos em que o objeto tem a propriedade Draggable. Ele pode ser chamado a partir do método do objeto de origem ou do método de formulário do objeto de origem.

Ao contrário do evento de formulário On Drag Over, o On Begin Drag Over é chamado no contexto do objeto de origem da ação de arrastar.

O evento On Begin Drag Over é útil para preparar a ação de arrastar. Pode ser usado para:

• Adicione dados e assinaturas ao pasteboard (via o comando APPEND DATA TO PASTEBOARD).
• Use um ícone personalizado durante a ação de arrastar (via o comando SET DRAG ICON).
• Aceitar ou recusar o arrastamento através de $0 no método do objeto arrastado.
  • Para indicar que as ações de arrastar são aceitas, o método do objeto de origem deve retornar 0 (zero); portanto, você deve executar $0:=0.
  • Para indicar que as ações de arrastar são recusadas, o método do objeto de origem deve retornar -1 (menos um); portanto, você deve executar $0:=-1.
  • Se nenhum resultado for retornado, 4D considera que as ações de arrastar são aceitas.

Os dados 4D são colocados na prancheta antes de chamar o evento. Por exemplo, no caso de arrastar sem a ação Arrastar Automático, o texto arrastado já está no quadro quando o evento é chamado.