Sviluppo4d.it
Sito indipendente di informazioni tecniche per sviluppatori 4th Dimension italiani  

Sviluppatori 4D

Utility 4D

Risorse 4D



4d logo
Naviga: Prev Next

Titolo: Spostamento di una sottolista gerarchica

Categoria: Codice Ultimo Aggiornamento: 04/04/05


Ecco una metodo semplice per gestire lo spostamento di una sottolista all'interno di una lista Gerarchica. L'oggetto che contiene la lista gerarchica avrà questo codice:

If (Form event=On Drop )
        SpostaSottolista(Self->)
        REDRAW LIST(Self->)
End if

Ed ecco il codice del metodo SpostaSottolista:

C_LONGINT($1;$Lista_l)
C_LONGINT($oggettoOrig_l;$elementoOrig_l;$processoOrig_l)
C_LONGINT($riferimentoOrig_l;$riferimentoDest_l;$sottolista_l)
C_TEXT($testoOrig_t;$testoDest_t)
C_BOOLEAN($aperta)
$Lista_l:=$1

  `prendo i dati della posizione di partenza e di quella di arrivo
DRAG AND DROP PROPERTIES($oggettoOrig_l;$elementoOrig_l;$processoOrig_l)
GET LIST ITEM($Lista_l;$elementoOrig_l;$riferimentoOrig_l;$testoOrig_t;$sottolista_l;$aperta_b)
GET LIST ITEM($Lista_l;Drop position;$riferimentoDest_l;$testoDest_t)

  `cancello la partenza e inserisco i dati nella posizione di arrivo
DELETE LIST ITEM($Lista_l;$riferimentoOrig_l)
INSERT LIST ITEM($Lista_l;$riferimentoDest_l;$testoOrig_t;$riferimentoOrig_l;$sottolista_l;$aperta_b)

Inviato da: Umberto Migliore Visite: 12097

Se accedi con utente e password, puoi aggiungere dei commenti.


Accesso

User:
Pass: Accedi

Cerca

Se non trovi le informazioni che cerchi scrivi a aiuto@sviluppo4d.it

4D Principali

4D Discussioni

Faq random


Crediti

Dominio registrato da ZetaNet
Sito realizzato da Nexus srl
4D SQL 11.9.0 offerto da 4D & Italsoftware
Icone di FAMFAMFAM
Moderato da Umberto Migliore
301 utenti registrati

Pagina servita il 19/03/24 alle 05:19:17 Valid HTML 4.01! Valid CSS!

Mutuo Facile, iDigitalScout, iDigitalTags e altre app di Nexid srl per iPhone e iPad

Cidroid, distributore italiano lettori barcode per IOS Apple iPhone, iPod, iPad