20898_de-DE

liliconcom

Bild zuschneiden und Zuschnitt in Datentabelle einfügen<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />

Ich führe derzeit ein Skript aus, das ein 1-MB-Bild mit dem folgenden einfachen Skript in eine Datentabelle einfügt (wobei: link to image ein Netzlaufwerk ist, auf dem das JPG gespeichert ist).

Formel( Offen ( : Link zum Bild, "jpg" ) ),

Aufgrund der Größe des Bildes wird die Datentabelle groß (ich habe ~ 1500 Bilder) und habe die Zuschneidefunktion ausprobiert, kann aber die Syntax nicht korrigieren

Eine der verschiedenen Möglichkeiten, die ich ausprobiert habe, ist die folgende (und wahrscheinlich alle Kombinationen davon außer der richtigen!).

Formel( Offen ( : Link zum Bild, "jpg" ) ) << Ernte ( Links ( 190 ), oben( 0 ), Unterseite( 1690 ), Recht ( 700 ) ),

Ich fühle mich nah dran, aber noch nicht ganz da.

Im Idealfall würde es Folgendes tun

1. Öffnen Sie das Bild (eins nach dem anderen, um Computerspeicher zu sparen?)
2. Schneiden Sie das Bild zu und speichern Sie den Ausschnitt dann in einem zentralen Ordner. Dies würde dann bei Bedarf eine zusätzliche Bildanalyse ermöglichen.
3. Fügen Sie die Ernte in die Datentabelle ein
4. Schließen Sie das Originalbild.

Grüße

David

Betreff: Bild zuschneiden und Zuschnitt in Datentabelle einfügen

Hier ist ein Beispielskript, das das tut, was Sie angegeben haben

Namen standardmäßig hierher ( 1 ) ;

// Holen Sie sich die Liste der Bilder

Dateiliste = Dateien im Verzeichnis ( "$SAMPLE_IMAGES" ) ;

// Schleife über alle Bilder, Zuschneiden und Speichern

Zum ( ich = 1 , ich <= N Artikel ( Dateiliste ) , ich ++,

// Einen Ersatz verwenden, da der Erweiterungswert ein Ausdruck sein muss,

// kein Literal

Bewertung (

Ersatz (

Ausdruck (

Bild = Offen ( "$SAMPLE_IMAGES\" || Dateiliste [ ich ] , __Verlängerung__ )

) ,

Ausdruck ( __Verlängerung__ ) , Analysieren ( Wort ( - 1 , Dateiliste [ ich ] , "." ) )

)

) ;

// Warten Sie, bis das Bild gelesen wurde

Warte ab ( 1 ) ;

      

// Bild zuschneiden

Bild << Ernte ( Links ( 50 ) , Recht ( 100 ) , oben ( 60 ) , Unterseite ( 150 ) ) ;

// Speichern Sie das Bild in einem neuen Ordner

Bild << Bild speichern ( "" || Dateiliste [ ich ] , Wort ( - 1 , Dateiliste [ ich ] , "." ) ) ;

) ;

// Erstellen Sie eine neue Tabelle

Neue Tabelle ( "Ohne Titel" ,

Zeilen hinzufügen ( N Artikel ( Dateiliste ) ) ,

Neue Spalte ( "Bild" , Ausdruck , "Keiner" , Werte einstellen ( {} ) )

) ;

// Bildspalte füllen

Für jede Reihe (

: Bild = neues Bild ( "" || Dateiliste [ die Zeile ()])

) ;