Hallo
Guten Morgen.
Hier ist ein Link für die Dateien um die es geht.
https://we.tl/S1lwyUxJLs
Vielen Dank für die Hilfe.
Gruß
GreyEnt
Metadaten /Exif von Dateien auslesen.
Re: Metadaten /Exif von Dateien auslesen.
Ich progge PureBasic weil Jägermeister nen dicken Kopf macht.
Re: Metadaten /Exif von Dateien auslesen.
Auf die Schnelle habe ich keine Spezifikation zu diesem Dateiformat gefunden.
Beim Betrachten der Datei in einem Hex-Editor konnte ich folgende Informationen in Erfahrung bringen:Ich vermute, die Positionen der Daten sind nicht fixiert, sondern abhängig der vorherigen Daten, wodurch der obige Code sicherlich nur mit der Beispieldatei funktioniert.
Es wäre hilfreich, wenn du noch ein paar Beispieldateien zum Herunterladen anbieten könntest.
Sehr wichtig ist auch die Information, ob die Eingaben in deinem CAD-Programm begrenzt sind. Trifft das zu: Wie viele Zeichen sind erlaubt?
Beim Betrachten der Datei in einem Hex-Editor konnte ich folgende Informationen in Erfahrung bringen:
- Jedes Zeichen benötigt zwei Bytes, daher ist schon mal klar, dass es sich um Unicode-Strings handelt
- String-Länge (einschließlich der String-Terminierung) wird in Zeichenlänge angegeben und zwar in Form eines Long-Wertes direkt vor dem String
Code: Alles auswählen
File$ = "Pfad/zur/Part1.par"
If ReadFile(0, File$)
FileSeek(0, $163C+4)
;CountOfCharacters = ReadLong(0)
Debug "Titel: " + ReadString(0, #PB_Unicode) ;, CountOfCharacters)
FileSeek(0, $1654+4)
;CountOfCharacters = ReadLong(0)
Debug "Thema: " + ReadString(0, #PB_Unicode) ;, CountOfCharacters)
FileSeek(0, $1678+4)
;CountOfCharacters = ReadLong(0)
Debug "Autor: " + ReadString(0, #PB_Unicode) ;, CountOfCharacters)
FileSeek(0, $1434+4)
;CountOfCharacters = ReadLong(0)
Debug "Manager: " + ReadString(0, #PB_Unicode) ;, CountOfCharacters)
FileSeek(0, $1444+4)
;CountOfCharacters = ReadLong(0)
Debug "Firma: " + ReadString(0, #PB_Unicode) ;, CountOfCharacters)
; usw.
CloseFile(0)
Else
Debug "Fehler: ReadFile()"
EndIf
Es wäre hilfreich, wenn du noch ein paar Beispieldateien zum Herunterladen anbieten könntest.
Sehr wichtig ist auch die Information, ob die Eingaben in deinem CAD-Programm begrenzt sind. Trifft das zu: Wie viele Zeichen sind erlaubt?
Zuletzt geändert von Sicro am 21.03.2017 00:33, insgesamt 1-mal geändert.
Warum OpenSource eine Lizenz haben sollte :: PB-CodeArchiv-Rebirth :: Pleasant-Dark (Syntax-Farbschema) :: RegEx-Engine (kompiliert RegExes zu NFA/DFA)
Manjaro Xfce x64 (Hauptsystem) :: Windows 10 Home (VirtualBox) :: Neueste PureBasic-Version
Re: Metadaten /Exif von Dateien auslesen.
@Sicro
Das sind Windows Standardsachen, sonst könnten diese Eigenschaften ja auch nicht im Eigenschaftsfenster jedes beliebiegen Windows-Rechners angezeigt werden. Es gibt Win-Apis um diese Dateieigenschaften auszulesen, leider zu lange her bei mir, dass ich es noch auswendig weiß
Das sind Windows Standardsachen, sonst könnten diese Eigenschaften ja auch nicht im Eigenschaftsfenster jedes beliebiegen Windows-Rechners angezeigt werden. Es gibt Win-Apis um diese Dateieigenschaften auszulesen, leider zu lange her bei mir, dass ich es noch auswendig weiß
Re: Metadaten /Exif von Dateien auslesen.
@Josh
Auf cad.de bin ich zum Thema fündig geworden.
Vielen Dank.
@Sicro
Vielen Dank für dein Code. Ich werde es mir angucken.
Möchtest Du noch weitere Modelle?
Auf cad.de bin ich zum Thema fündig geworden.
Vielen Dank.
@Sicro
Vielen Dank für dein Code. Ich werde es mir angucken.
Möchtest Du noch weitere Modelle?
Ich progge PureBasic weil Jägermeister nen dicken Kopf macht.
Re: Metadaten /Exif von Dateien auslesen.
Hilft dieser Link vielleicht weiter?
http://www.plm.automation.siemens.com/e ... load.shtml
Dort gibt es "Solid Edge Viewer".
http://www.plm.automation.siemens.com/e ... load.shtml
Dort gibt es "Solid Edge Viewer".
Re: Metadaten /Exif von Dateien auslesen.
Ich progge PureBasic weil Jägermeister nen dicken Kopf macht.