CF Raybaudi modificata
Moderatore: Moderatori
- PIG-NAH
- Messaggi: 2564
- Iscritto il: martedì 7 agosto 2007, 2:00
- Località: BIG BANG
CF Raybaudi modificata
Ho modificato questa bellissima CF di Ray che serve a recuperare i numeri ID persi in modo che l'utonto deve solo scrivere:
NextID ( "nome della lista" ; 1)
mi piacerebbe sapere se scritta così va bene o può rallentare il calcolo ( possibilmente da Ray )
NextID ( listname ; start)
Consenti([
list = ElementiListeValori ( Get ( NomeFile ) ; listname ) ;
nextList = ParoleaDestra ( list ; ContaParole ( list ) - start + 1 ) ;
first = RicavaComeNumero ( ParoleaSinistra ( nextList ; 1 ) ) ;
last = RicavaComeNumero ( ParoleaDestra ( nextList ; 1 ) )
];
Casi (
EVuoto ( last ) ; start ;
last + 1 - start > ConteggioValore ( nextList ) and start < first ; start ;
last + 1 - start > ConteggioValore ( nextList ) ; NextID ( listname ; start + 1) ;
last + 1
)
)
NextID ( "nome della lista" ; 1)
mi piacerebbe sapere se scritta così va bene o può rallentare il calcolo ( possibilmente da Ray )
NextID ( listname ; start)
Consenti([
list = ElementiListeValori ( Get ( NomeFile ) ; listname ) ;
nextList = ParoleaDestra ( list ; ContaParole ( list ) - start + 1 ) ;
first = RicavaComeNumero ( ParoleaSinistra ( nextList ; 1 ) ) ;
last = RicavaComeNumero ( ParoleaDestra ( nextList ; 1 ) )
];
Casi (
EVuoto ( last ) ; start ;
last + 1 - start > ConteggioValore ( nextList ) and start < first ; start ;
last + 1 - start > ConteggioValore ( nextList ) ; NextID ( listname ; start + 1) ;
last + 1
)
)
FM8 ADV XP SP3
- PIG-NAH
- Messaggi: 2564
- Iscritto il: martedì 7 agosto 2007, 2:00
- Località: BIG BANG
Re: CF Raybaudi modificata
Mi rispondo da solo e mi do anche di bischero.
La funzione come l'ho modificata è inutilizzabile causa biblica lentezza di calcolo
Forget it
La funzione come l'ho modificata è inutilizzabile causa biblica lentezza di calcolo
Forget it
FM8 ADV XP SP3