| | | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte | | | | Request a special discount on NVIDIA RTX 5000 Ada Generation GPU !, eine Pressemitteilung
|
Autor
|
Thema: JPG 2 ECW inkl Worldfile (367 mal gelesen)
|
Bernd P Ehrenmitglied V.I.P. h.c. cook-general
Beiträge: 3424 Registriert: 07.06.2001 W10-64bit, AMD Ryzen 7 3700X,32GB RAM, Sapphire Pulse Radeon RX 570 8G G5, Canon TX-3000 MFP, Maus Cherry MW4500, Sub:Infrastructure Design Suite, Office 365
|
erstellt am: 21. Jun. 2023 16:59 <-- editieren / zitieren --> Unities abgeben:
servus, Konvertiert JPG in ECW inkl. Integration der Daten aus dem Wordfile in den ECW Header EPSG anpassen. Irfanview und ECW Header Editor (hat noch wer einen Link?) ps.: Irfanview kann 13000x13000 Pixel. Edit pps.: Code in eine Bat und die Bat ins selbe Verzeichnis wie die JPG.
Code: @echo off "C:\Program Files\IrfanView\i_view64.exe" "*.JPG" /convert=%cd%\*.ECWfor %%f in (*.jgw) do ( set DATEI=%%f setlocal enableextensions enabledelayedexpansion set /a count=0 for /f "tokens=*" %%A in (%%f) do ( set /a count+=1 echo.!count! %%A if !count! EQU 1 set Zeile1=%%A if !count! EQU 2 set Zeile2=%%A if !count! EQU 3 set Zeile3=%%A if !count! EQU 4 set Zeile4=%%A if !count! EQU 5 set Zeile5=%%A if !count! EQU 6 set Zeile6=%%A ) set Datei=%%f echo !Datei! set Datei=%cd%\!Datei:jgw=ecw! echo !Datei! "C:\Program Files\ERDAS\Image Web Server Utilities 2011\bin\ECWHeaderEditor.exe" "!Datei!" -proj EPSG31256 -originx !Zeile5! -originy !Zeile6! -cellx !Zeile1! -celly !Zeile1! ) echo Schliesst in 3... ping 127.0.0.1 -n 2 >nul echo Schliesst in 2... ping 127.0.0.1 -n 2 >nul echo Schliesst in 1... ping 127.0.0.1 -n 2 >nul
------------------ <----- Bitte Systeminfo eintragen, warum siehst du hier. Schöne Grüsse aus der Steiermark Bernd P. [Diese Nachricht wurde von Bernd P am 21. Jun. 2023 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KlaK Ehrenmitglied V.I.P. h.c. Dipl. Ing. Vermessung, CAD- und Netz-Admin
Beiträge: 2799 Registriert: 02.05.2006 AutoCAD LandDesktop R2 bis 2004 Civil 3D 2005 - 2022 Plateia, Canalis Visual Basic
|
erstellt am: 21. Jun. 2023 17:36 <-- editieren / zitieren --> Unities abgeben: Nur für Bernd P
|
Bernd P Ehrenmitglied V.I.P. h.c. cook-general
Beiträge: 3424 Registriert: 07.06.2001 W10-64bit, AMD Ryzen 7 3700X,32GB RAM, Sapphire Pulse Radeon RX 570 8G G5, Canon TX-3000 MFP, Maus Cherry MW4500, Sub:Infrastructure Design Suite, Office 365
|
erstellt am: 21. Jun. 2023 17:58 <-- editieren / zitieren --> Unities abgeben:
Ich hab den ECW Header Editor als installations Datei, aber der ist mittlerweile schwer zu finden, zumindest hab ich jetzt auf die schnelle nicht gefunden. ------------------ <----- Bitte Systeminfo eintragen, warum siehst du hier. Schöne Grüsse aus der Steiermark Bernd P. [Diese Nachricht wurde von Bernd P am 21. Jun. 2023 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Bernd P Ehrenmitglied V.I.P. h.c. cook-general
Beiträge: 3424 Registriert: 07.06.2001 W10-64bit, AMD Ryzen 7 3700X,32GB RAM, Sapphire Pulse Radeon RX 570 8G G5, Canon TX-3000 MFP, Maus Cherry MW4500, Sub:Infrastructure Design Suite, Office 365
|
erstellt am: 28. Jun. 2023 07:21 <-- editieren / zitieren --> Unities abgeben:
Edit: Irfanview 32bit ist schneller beim konvertieren. Beim 64bit hängt irgendetwas... Code: "C:\Program Files (x86)\IrfanView\i_view32.exe" "*.JPG" /convert=%cd%\*.ECW ::"C:\Program Files\IrfanView\i_view64.exe" "*.JPG" /convert=%cd%\*.ECW @echo off for %%f in (*.jgw) do ( set DATEI=%%f setlocal enableextensions enabledelayedexpansion set /a count=0 for /f "tokens=*" %%A in (%%f) do ( set /a count+=1 echo.!count! %%A if !count! EQU 1 set Zeile1=%%A if !count! EQU 2 set Zeile2=%%A if !count! EQU 3 set Zeile3=%%A if !count! EQU 4 set Zeile4=%%A if !count! EQU 5 set Zeile5=%%A if !count! EQU 6 set Zeile6=%%A ) set Datei=%%f echo !Datei! set Datei=%cd%\!Datei:jgw=ecw! echo !Datei! "C:\Program Files\ERDAS\Image Web Server Utilities 2011\bin\ECWHeaderEditor.exe" "!Datei!" -proj EPSG31256 -originx !Zeile5! -originy !Zeile6! -cellx !Zeile1! -celly !Zeile1! )echo Schliesst in 3... ping 127.0.0.1 -n 2 >nul echo Schliesst in 2... ping 127.0.0.1 -n 2 >nul echo Schliesst in 1... ping 127.0.0.1 -n 2 >nul
------------------ <----- Bitte Systeminfo eintragen, warum siehst du hier. Schöne Grüsse aus der Steiermark Bernd P. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
| Anzeige.:
Anzeige: (Infos zum Werbeplatz >>)
|