Scopo
Questa proprietà contiene un riferimento al documento attivato da una operazione di lookup oppure da un drag&drop generico. Può essere quindi usata per modificare il documento che ha richiesto il lookup direttamente dalla form di lookup, prima della sua chiusura, oppure per gestire le operazioni di drag&drop generico.
Sintassi
IDDocument d := ActivedDocument
Quando letta
Permette di recuperare un riferimento al documento che ha richiesto l'apertura della videata di lookup, oppure al documento trascinato in caso di operazione di drag&drop.
Quando scritta
Permette di impostare il documento che verrà utilizzato per le operazioni di drag & drop generico, oppure per l'impostazione dei dati di lookup.
Note
- In caso di operazioni di drag&drop generico questa proprietà viene impostata dal framework per indicare il documento trascinato, se esso è identificabile. Può essere modificata nell'evento OnGenericDrag e usata nell'evento OnGenericDrop.
- Durante le operazioni di lookup, invece, non è opportuno usare direttamente questa proprietà ma il suo corrispondente nella libreria della Form perchè ogni form di lookup contiene il riferimento al documento che ne ha richiesto l'apertura.
Esempio di codice
// **********************************************************************************
// Evento notificato dal book quando l'utente esegue un operazione di drop su di esso
// **********************************************************************************
event Desktop.LibroDesktop.OnGenericDrop(
string DragInfo //
inout boolean Cancel //
int Button //
float X //
float Y //
int XB //
int YB //
int BoxID //
)
{
// Mi è stato tirato sopra un documento...
if NOT(ActivedDocument IS Null Object)
{
// Sopra al desktop, creo icona
if BoxID = LibroDesktop.SfondoDesktop.Me()
{
IDDocument d := ActivedDocument // Actived Document
IDDocumentStructure ds := d.GetStructure() // d.Get Structure ()
string icon := Replace(ds.Icon, C16, C32) // Replace (ds.Icon, C16, C32)
int newx := X - Offset Icona
int newy := Y - Offset Icona
//
newx := newx - newx % Larghezza griglia X + Offset Bordo
newy := newy - newy % Larghezza griglia Y + Offset Bordo
//
// Creo l'icona nel desktop
insert values into Desktop
set Descrizione := d.GetName(ZERO)
set Tooltip := d.GetName(ONE)
set Immagine := icon
set IDImpiegato := Webtop.DatiSessione.IDImpiegato
set PosY := newy
set PosX := newx
set DocDNA := d.GetDNA()
//
this.Aggiorna()
}
}
//
// Sto spostando un icona...
if ToInteger(DragInfo) > ZERO
...
}
// Evento notificato dal book quando l'utente esegue un operazione di drop su di esso
// **********************************************************************************
event Desktop.LibroDesktop.OnGenericDrop(
string DragInfo //
inout boolean Cancel //
int Button //
float X //
float Y //
int XB //
int YB //
int BoxID //
)
{
// Mi è stato tirato sopra un documento...
if NOT(ActivedDocument IS Null Object)
{
// Sopra al desktop, creo icona
if BoxID = LibroDesktop.SfondoDesktop.Me()
{
IDDocument d := ActivedDocument // Actived Document
IDDocumentStructure ds := d.GetStructure() // d.Get Structure ()
string icon := Replace(ds.Icon, C16, C32) // Replace (ds.Icon, C16, C32)
int newx := X - Offset Icona
int newy := Y - Offset Icona
//
newx := newx - newx % Larghezza griglia X + Offset Bordo
newy := newy - newy % Larghezza griglia Y + Offset Bordo
//
// Creo l'icona nel desktop
insert values into Desktop
set Descrizione := d.GetName(ZERO)
set Tooltip := d.GetName(ONE)
set Immagine := icon
set IDImpiegato := Webtop.DatiSessione.IDImpiegato
set PosY := newy
set PosX := newx
set DocDNA := d.GetDNA()
//
this.Aggiorna()
}
}
//
// Sto spostando un icona...
if ToInteger(DragInfo) > ZERO
...
}
Ultima modifica: 25/10/2016 / Validità: da 6.5.2680