20898_it-IT

liliconcom

Ritaglia immagine e inserisci ritaglio nella tabella dati<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />

Attualmente sto eseguendo uno script che inserisce un'immagine da 1 Mb in una tabella di dati utilizzando il seguente semplice script (dove: link all'immagine è un'unità di rete in cui è memorizzato il jpg)

Formula( Aprire ( :Link all'immagine, "jpg" ) ),

A causa delle dimensioni dell'immagine, la tabella dei dati sta diventando grande (ho ~ 1500 immagini) e ho provato la funzione di ritaglio ma non riesco a ottenere la sintassi corretta

uno dei vari modi che ho provato è il seguente (e probabilmente tutte le combinazioni di questo tranne quella corretta!).

Formula( Aprire ( :Link all'immagine, "jpg" ) ) << raccolto ( Sinistra ( 190 ), superiore( 0 ), metter il fondo a( 1690 ), Giusto ( 700 ) ),

Sento di essere vicino ma non del tutto lì.

Idealmente farebbe quanto segue

1. Apri l'immagine (una alla volta per risparmiare memoria del computer?)
2. ritaglia l'immagine, quindi salva il ritaglio in una cartella centrale. Ciò consentirebbe quindi un'ulteriore analisi dell'immagine, se necessario.
3. Inserisci il ritaglio nella tabella dei dati
4. Chiudi l'immagine originale.

Saluti

Davide

Ri: ritaglia l'immagine e inserisci il ritaglio nella tabella dati

Ecco uno script di esempio che fa ciò che hai indicato di volere

I nomi predefiniti sono qui ( 1 ) ;

// Ottieni l'elenco delle immagini

filelist = File nella directory ( "$SAMPLE_IMAGES" ) ;

// Passa in rassegna tutte le immagini, ritagliandole e salvandole

Per ( io = 1 , io <= N articoli ( filelist ) , io ++,

// Utilizzo di un sostituto perché il valore dell'estensione deve essere un'espressione,

// non un letterale

Valutazione (

Sostituire (

Espr (

imm = Aprire ( "$SAMPLE_IMAGES\" || filelist [ io ] , __estensione__ )

) ,

Espr ( __estensione__ ) , Analizza ( Parola ( - 1 , filelist [ io ] , "." ) )

)

) ;

// Attendere la lettura dell'immagine

Aspettare ( 1 ) ;

      

// Ritaglia l'immagine

imm << Raccolto ( Sinistra ( 50 ) , Giusto ( 100 ) , Superiore ( 60 ) , Metter il fondo a ( 150 ) ) ;

// Salva l'immagine in una nuova cartella

imm << Salva immagine ( "" || filelist [ io ] , Parola ( - 1 , filelist [ io ] , "." ) ) ;

) ;

// Crea una nuova tabella

Nuova Tavola ( "Senza titolo" ,

Aggiungi righe ( N articoli ( filelist ) ) ,

Nuova Colonna ( "Immagine" , Espressione , "Nessuno" , Imposta valori ( {} ) )

) ;

// Popola la colonna dell'immagine

forachrow (

: Immagine = nuova immagine ( "" || filelist [ riga ()])

) ;