Mdl_ExifEx メンバ
画像ファイルのExif情報、GPS情報、DNG情報、Canon CRW情報、IPTC情報を取得します。
●メソッドの一覧
名前 引数 戻り値 説明 GetCPUInfo ( ExifStyle , String ) Boolean型 記録したCPU情報を取得します。 GetCRW_Encode なし Text.Encoding型 Canon CRW情報を取り出す時のEncodingを取得します。 GetDispTypeGPSLatitudeAndLongitude なし GPSDispKind型 GPSの緯度、経度の表示形式を取得します。 GetDNGInfo ( DNGTag , Boolean , strcExifGPSInfo ) Boolean型 指定したDNG情報を取得します。 GetExifFileInfo ( String , [Boolean] , [Integer] , [Integer] ) Boolean型 指定ファイルのExif情報を取得します。 GetExifInfo ( ExifTag , Boolean , strcExifGPSInfo ) Boolean型 指定したExif情報を取得します。 GetGPSFileInfo ( String , [Boolean] , [Integer] , [Integer] ) Boolean型 指定ファイルのGPS情報を取得します。 GetGPSInfo ( GPSTag , Boolean , strcExifGPSInfo ) Boolean型 指定したGPS情報を取得します。 GetIPTC_Encode なし Text.Encoding型 IPTC情報を取り出す時のEncodingを取得します。 GetTIFFAndOtherInfo ( TIFFAndOtherTag , Boolean , strcExifGPSInfo ) Boolean型 指定したTIFFAndOther情報を取得します。 SetCRW_Encode ( Text.Encoding ) なし Canon CRW情報を取り出す時のEncodingを設定します。 SetDispTypeGPSLatitudeAndLongitude ( GPSDispKind ) Boolean型 GPSの緯度、経度の表示形式を設定します。 SetIPTC_Encode ( Text.Encoding ) なし IPTC情報を取り出す時のEncodingを設定します。 SetUserComment_Getdata ( Boolean ) なし ユーザコメントの取得データ方式をセットします。
●Mdl_ExifEx構造体の一覧
名前:strcIPTCInfo
構文:
Public Structure strcIPTCInfo Dim Int_IPTC_Count As Integer Dim Int_DataNo() As Integer Dim Int_IPTC_AppRecocdeNo() As Integer Dim Str_Name() As String Dim Str_Name2() As String Dim Str_Value() As String End Structure
内容: IPTC情報。
名前 型 説明 Int_IPTC_Count Integer IPTC情報数。 Int_DataNo() Integer データ番号。 Int_IPTC_AppRecodeNo() Integer IPTCのアプリケーションレコード番号。 Str_Name() String IPTCのアプリケーション名称。 Str_Name2() String IPTCのアプリケーション名称(英語)。 Str_Value() String データ値。
構文:
Public Structure strcCRWCanonInfo Dim Int_CRW_Count As Integer Dim Int_DataNo() As Integer Dim Str_Name() As String Dim Str_Name2() As String Dim Str_Value() As String Dim Str_OrgValue() As String End Structure
内容: CRW情報。
名前 型 説明 Int_CRW_Count Integer CRW情報数。 Int_DataNo() Integer データ番号。 Str_Name() String CRWの名称。 Str_Name2() String CRWの名称(英語)。 Str_Value() String データ値。 Str_OrgValue() String オリジナル値。 Str_Value() String データ値。
名前:strcExifInfo
構文:
Public Structure strcExifInfo Dim Lng_IFDOffset As Long Dim Int_EntryCount As Integer Dim Int_ExifCount As Integer Dim Int_GPSCount As Integer Dim Int_DNGCount As Integer Dim Int_TIFFAndOtherCount As Integer Dim Int_EntryTag() As Integer Dim Str_EntryName() As String Dim Str_EntryName2() As String Dim Sho_EntryType() As EntryType Dim Lng_EntryDataLen() As Long Dim Lng_EntryOffset() As Long Dim Str_EntryOrgValue() As String Dim Str_EntryValue() As String Dim Int_DataPointer() As Integer Dim Strc_IPTC As strcIPTCInfo Dim Strc_CanonCRW As strcCRWCanonInfo End Structure
内容: Exif、GPS、DNS、Tiff and Other情報。
名前 型 説明 Lng_IFDOffset Long IFD Offset。 Int_EntryCount Integer エントリ数。 Int_ExifCount Integer Exif情報数。 Int_GPSCount Integer GPS情報数。 Int_DNGCount Integer DNG情報数。 Int_TIFFAndOtherCount Integer TIFF And Other情報数。 Int_EntryTag() Integer エントリのTAG値。 Str_EntryName() String エントリ名。 Str_EntryName2() String エントリ名2(英語)。 Sho_EntryType() EntryType エントリタイプ。 Lng_EntryDataLen() Long エントリの長さ。 Lng_EntryOffset() Long エントリのオフセット。 Str_EntryOrgValue() String エントリのオリジナル値。 Str_EntryValue() String エントリ値。 Int_DataPointer() Integer データポインタ。 Strc_IPTC strcIPTCInfo IPTC情報。 Strc_CanonCRW strcCRWCanonInfo Canon CRW情報。
構文:
Public Structure strcExifGPSInfo Dim Int_Tag As Integer Dim Str_Name As String Dim Str_Name2 As String Dim Sho_Type As EntryType Dim Int_DataLen As Integer Dim Str_Value As String Dim Int_OrgSize As Integer Dim Byte_OrgValue() As Byte End Structure
内容: Exif、GPS、DNS、Tiff and Other情報。
名前 型 説明 Int_Tag Integer TAG。 Str_Name String Entry名。 Str_Name2 String Entry名(英語)。 Sho_Type EntryType Type。 Int_DataLen Integer 長さ。 Str_Value String 値。 Int_OrgSize Integer 元の値のサイズ。 Byte_OrgValue() Byte 元の値 (0 〜 Int_OrgSize - 1)。
●Mdl_ExifEx定数の一覧
名前:EntryType (Type値)
名前 内容 TYPE_BYTE 8ビット符号なし整数。 TYPE_ASCII 一つの7ビットASCIIコードを納めた8ビットバイト。最後のバイトはNULLで終端する。ASCIIのカウントはNULLも含めた値とする。 TYPE_SHORT 16ビット(2バイト)符号なし整数。 TYPE_INTEGER 32ビット(4バイト)符号なし整数。 TYPE_RATIONAL TYPE_INTEGER 2個。最初のTYPE_INTEGERは分子、2個目のTYPE_INTEGERは分母を表す。 TYPE_UNDEFINED フィールドの定義により、どんな値をとってもよい8ビットバイト。 TYPE_SSHORT 16ビット(2バイト)符号付き整数(2の補数表現)。 TYPE_SLOG 32ビット(4バイト)符号付き整数(2の補数表現)。 TYPE_SRATIONAL TYPE_SLOG 2個。最初のTYPE_SLOGは分子、2個目のTYPE_SLOGは分母を表す。
名前:ExifTag (Exif)
名前 内容 ImageWidth イメージ画像の幅 ImageHeight イメージ画像の高さ BitsPerSample ピクセルあたりの分解値 Compression 圧縮の種類 PhotometricInterpretation 画像構成 Orientation 画像方向 SamplesPerPixel 1ピクセルあたりのデータ数 PlanarConfiguration 画像データの並び YCbCrSubSampling YCbCr形式のサンプリング比率 YCbCrPositioning YCCの画素構成 XResolution 画像幅の解像度 YResolution 画像高さの解像度 ResolutionUnit 解像度の単位 StripOffsets 画像データのロケーション RowsPerStrip ストリップ中のライン数 StripByteCounts ストリップのデータ量 JPEGInterchangeFormat JPEGのSOIへのオフセット JPEGInterchangeFormatLength JPEGデータのバイト数 TransferFunction 再生階調カーブ特性 WhitePoint ホワイトポイント PrimaryChromaticities 原色の色度座標値 YCbCrCoefficients 色変換マトリックス係数 ReferenceBlackWhite 画像情報の黒点・白点値 DateTime ファイル変更日時 ImageDescription 画像タイトル Make メーカー名 Model モデル名 Software 使用ソフトウェア名 Artist 作者名 Copyright 著作権情報 ExifVersion Exifのバージョン FlashPixVersion フラッシュピックスのバージョン ColorSpace 色空間 Gamma ガンマ ComponentsConfiguration 各コンポーネントの意味 CompressedBitsPerPixel 圧縮率 PixelXDimension 画像の幅 PixelYDimension 画像の高さ MakerNote メーカー依存データ UserComment ユーザーコメント RelatedSoundFile 音声ファイルの名前 DateTimeOriginal 原画像データの作成日時 DateTimeDigitized デジタルデータの作成日時 SubSecTime ファイル変更日時の小数点以下の時刻 SubSecTimeOriginal 原画像データの作成日時の小数点以下の時刻 SubSecTimeDigitized デジタルデータの作成日時の小数点以下の時刻 ExposureTime 露出時間 FNumber レンズF値 ExposureProgram 露出プログラム SpectralSensitivity スペクトル感度 ISOSpeedRatings ISOスピードレート OECF OECF ShutterSpeedValue シャッタースピード ApertureValue レンズ絞り値 BrightnessValue 対象物の明るさ ExposureBiasValue 露光補正量 MaxApertureValue レンズの開放F値 SubjectDistance 被写体までの距離 MeteringMode 自動露出の測光モード LightSource 光源 Flash フラッシュ FocalLength レンズの焦点距離 SubjectArea Subject area FlashEnergy フラッシュ強度 SpatialFrequencyResponse 入力装置情報 FocalPlaneXResolution CCDの画素密度(幅) FocalPlaneYResolution CCDの画素密度(高さ) FocalPlaneResolutionUnit CCD画素密度の単位 SubjectLocation 被写体位置 ExposureIndex CCD感度 SensingMethod イメージセンサーの形式 FileSource ファイルソース SceneType シーンタイプ CFAPattern CFAパターン CustomRendered カスタム画像処理 ExposureMode 露出モード WhiteBalance ホワイトバランス DigitalZoomRatio デジタルズーム FocalLengthIn35mmFilm レンズの焦点距離(35mm) SceneCaptureType 撮影シーンタイプ GainControl ゲインコントロール Contrast コントラスト Saturation 彩度 Sharpness シャープネス DeviceSettingDescription デバイス設定の説明 DeviceSettingDescription 被写体までの距離 ImageUniqueID 画像識別ID InteroperabilityIFDPointer ExifR98拡張情報 InteroperabilityIndex Interoperability Identification ExifIFDPointer Exif Tag
名前:GPSTag (GPS)
名前
内容
GPSVersionID GPSタグバージョン GPSLatitudeRef 緯度(N/S) GPSLatitude 緯度(数値) GPSLongitudeRef 経度(E/W) GPSLongitude 経度(数値) GPSAltitudeRef 高度基準 GPSAltitude 高度(数値) GPSTimeStamp GPS時間(UTC) GPSSatellites GPS衛星情報 GPSStatus GPS受信機の状態 GPSMeasureMode GPSの測定方法 GPSDOP 測定の正確性 GPSSpeedRef 速度の単位 GPSSpeed 速度(数値) GPSTrackRef 進行方向基準 GPSTrack 進行方向(数値) GPSImgDirectionRef 撮影画像の方向基準 GPSImgDirection 撮影画像の方向(数値) GPSMapDatum 測地測量 GPSDestLatitudeRef 目的地の緯度(N/S) GPSDestLatitude 目的地の緯度(数値) GPSDestLongitudeRef 目的地の経度(E/W) GPSDestLongitude 目的地の経度(数値) GPSDestBearingRef 目的地の方角基準 GPSDestBearing 目的地の方角 GPSDestDistanceRef 目的地までの距離の単位 GPSDestDistance 目的地までの距離 GPSProcessingMethod GPS処理方法 GPSAreaInformation GPS地域情報 GPSDateStamp GPS日付 GPSDifferential GPS補正情報 GPSInfoIFDPointer GPS Tag
名前:DNGTag (DNG)
名前
内容
DNGVersion DNGバージョン DNGBackwardVersion DNG Backwardバージョン UniqueCameraModel カメラモデル LocalizedCameraModel 限定カメラモデル CFAPlaneColor CFAプレーンColor CFALayout CFAレイアウト LinearizationTable 線形化テーブル BlackLevelRepeatDim 黒レベルのサイズ BlackLevel 黒レベル BlackLevelDeltaH 黒レベルデルタH BlackLevelDeltaV 黒レベルデルタV WhiteLevel 白レベル DefaultScale デフォルトスケール BestQualityScale 高品質スケール DefaultCropOrigin デフォルト切取り基点 DefaultCropSize デフォルト切取りサイズ CalibrationIlluminant1 光源キャリブレーション1 CalibrationIlluminant2 光源キャリブレーション2 ColorMatrix1 カラーマトリックス1 ColorMatrix2 カラーマトリックス2 CameraCalibration1 カメラキャリブレーション1 CameraCalibration2 カメラキャリブレーション2 ReductionMatrix1 縮小マトリックス1 ReductionMatrix2 縮小マトリックス2 AnalogBalance アナログバランス AsShotNeutral ニュートラルショット AsShotWhiteXY ホワイトX-Yショット BaselineExposure ベースライン露出 BaselineNoise ベースラインノイズ BaselineSharpness ベースラインシャープネス BayerGreenSplit ベイヤーグリーン分割 LinearResponseLimit 線型反応限界 CameraSerialNumber カメラシリアル番号 LensInfo レンズ情報 ChromaBlurRadius 彩度ぼけ半径 AntiAliasStrength カメラのアンチエイリアスフィルタの相対的な強度 ShadowScale シャドウスケール DNGPrivateData DNGプライベートデータ MakerNoteSafety メーカーノートセーフティ RawDataUniqueID RAWデータユニークID OriginalRawFileName オリジナルRAWファイル名 OriginalRawFileData オリジナルRAWファイルデータ ActiveArea アクティブ領域 MaskedAreas マスク領域 AsShotICCProfile 撮影時ICCプロファイル AsShotPreProfileMatrix 撮影時プロファイルマトリックス CurrentICCProfile カレントICCプロファイル CurrentPreProfileMatrix カレントプロファイルマトリックス ColorimetricReference 比色分析参照 CameraCalibrationSignature カメラキャリブレーションの署名 ProfileCalibrationSignature プロファイルキャリブレーションの署名 ExtraCameraProfiles 他のカメラプロフィール AsShotProfileName 撮影時プロフィール名 NoiseReductionApplied 適用ノイズリダクション ProfileName プロフィール名 ProfileHueSatMapDims 色境界 ProfileHueSatMapData1 色相Sat.マップデータプロフィール1 ProfileHueSatMapData2 色相Sat.マップデータプロフィール2 ProfileToneCurve トーンカーブプロフィール ProfileEmbedPolicy プロフィール埋め込み方針 ProfileCopyright プロフィール著作権 ForwardMatrix1 前行列1 ForwardMatrix2 前行列2 PreviewApplicationName プレビューアプリケーション名 PreviewApplicationVersion プレビューアプリケーションバージョン PreviewSettingsName プレビュー設定名 PreviewSettingsDigest プレビュー設定要約 PreviewColorSpace プレビュー色空間 PreviewDateTime プレビュー日時 RawImageDigest RAWイメージ要約 OriginalRawFileDigest オリジナルRAWファイル要約 SubTileBlockSize サブタイトルブロックサイズ RowInterleaveFactor 列を挟む要因 ProfileLookTableDims 表示テーブルデータプロフィールのサイズ ProfileLookTableData 表示テーブルデータプロフィール OpcodeList1 Opcode リスト1 OpcodeList2 Opcode リスト2 OpcodeList3 Opcode リスト3 NoiseProfile ノイズプロファイル
名前:TIFFAndOtherTag (TIFF and Other)
名前
内容
NewSubfileType New Subfile Type SubfileType Subfile Type Threshholding Thresh holding CellWidth Cell Width CellLength Cell Length FillOrder Fill Order DocumentName Document Name MinSampleValue Min Sample Value MaxSampleValue Max Sample Value PageName Page Name XPosition X Position YPosition Y Position FreeOffsets Free Offsets FreeByteCounts Free Byte Counts GrayResponseUnit Gray Response Unit GrayResponseCurve Gray Response Curve T4Options T4 Options T6Options T6 Options PageNumber Page Number HostComputer Host Computer Predictor Predictor ColorMap Color Map HalftoneHints Halftone Hints TileWidth Tile Width TileLength Tile Length TileOffsets Tile Offsets TileByteCounts Tile Byte Counts BadFaxLines Bad Fax Lines CleanFaxData Clean Fax Data ConsecutiveBadFaxLines Consecutive Bad Fax Lines SubIFDs Sub IFDs InkSet Ink Set InkNames Ink Names NumberOfInks Number Of Inks DotRange Dot Range TargetPrinter Target Printer ExtraSamples Extra Samples SampleFormat Sample Format SMinSampleValue S Min Sample Value SMaxSampleValue S Max Sample Value TransferRange Transfer Range ClipPath Clip Path XClipPathUnits X Clip Path Units YClipPathUnits Y Clip Path Units Indexed Indexed JPEGTables JPEG Tables OPIProxy OPI Proxy GlobalParametersIFD Global Parameters IFD ProfileType Profile Type FaxProfile Fax Profile CodingMethods Coding Methods VersionYear Version Year ModeNumber Mode Number Decode Decode ImageBaseColor Image Base Color T82Options T82 Options JPEGProc JPEG Proc JPEGLosslessPredictors JPEG Lossless Predictors JPEGPointTransforms JPEG Point Transforms JPEGQTables JPEG Q Tables JPEGDCTables JPEG DC Tables JPEGACTables JPEG AC Tables StripRowCounts Strip Row Counts XML XML RATING Rating RATING_PERCENT RatingPercent ImageID Image ID AnnotationData Annotation Data ModelPixelScaleTag Model Pixel ScaleTag IPTC IPTC INGRPacketDataTag INGR Packet Data Tag INGRFlagRegisters INGR Flag Registers IrasBTransformationMatrix IrasB Transformation Matrix ModelTiepointTag Model Tiepoint Tag ModelTransformationTag Model Transformation Tag PhotoshopSettings Photoshop Settings ICCProfile ICC Profile GeoKeyDirectoryTag Geo Key Directory Tag GeoDoubleParamsTag Geo Double Params Tag GeoAsciiParamsTag Geo Ascii Params Tag ImageLayer Image Layer ImageSourceData Image Source Data TITLE TITLE COMMENTS COMMENTS AUTHOR AUTHOR KEYWORDS KEYWORDS SUBJECT SUBJECT GDAL_METADATA GDAL METADATA GDAL_NODATA GDAL NODATA OceScanjobDescription Oce Scanjob Description OceApplicationSelector Oce Application Selector OceIdentificationNumber Oce Identification Number OceImageLogicCharacteristics Oce Image Logic Characteristics PrintIM Print IM ExifInfo Exif情報 AliasLayerMetadata Alias Layer Metadata TimeZoneOffset Time Zone Offset CFARepeatPatternDim CFA Repeat Pattern Dim BatteryLevel Battery Level Interlace Interlace SelfTimerMode Self Timer Mode Noise Noise ImageNumber Image Number SecurityClassification Security Classification ImageHistory Image History TIFF_EPStandardID TIFF/EP Standard ID TIFF_FlashEnergy Flash Energy TIFF_SpatialFrequencyResponse Spatial Frequency Response TIFF_FocalPlaneXResolution Focal Plane X Resolution TIFF_FocalPlaneYResolution Focal Plane Y Resolution TIFF_FocalPlaneResolutionUnit Focal Plane Resolution Unit TIFF_ExposureIndex Exposure Index TIFF_SensingMethod Sensing Method TIFF_CFAPattern CFA Pattern
名前:IPTCApp2 (IPTCのアプリケーション2)
名前
内容
RecordVersion Record Version ObjectTypeReference Object Type Reference Intellectual_genre Intellectual_genre Title Title EditStatus Edit Status EditorialUpdate Editorial Update Urgency Urgency IPTC_Subject_Code IPTC Subject Code Category Category SupplementalCategories Supplemental Categories FixtureIdentifier Fixture Identifier Keywords Keywords ContentLocationCode Content LocationCode ContentLocationName Content Location Name ReleaseDate Release Date ReleaseTime Release Time ExpirationDate Expiration Date ExpirationTime Expiration Time Instructions Instructions ActionAdvised Action Advised ReferenceService Reference Service ReferenceDate Reference Date ReferenceNumber Reference Number DateCreated Date Created TimeCreated Time Created DigitalCreationDate Digital Creation Date DigitalCreationTime Digital Creation Time OriginatingProgram Originating Program ProgramVersion Program Version ObjectCycle Object Cycle Creator Creator AuthorTitleCreators_Jobtitle Author Title Creators Jobtitle City City Sublocation Sublocation Province_State Province State ISO_Country_Code ISO Country Code Country Country OriginalTransmissionReference Original Transmission Reference Headline Headline Credit_Line Credit Line Source Source CopyrightNotice Copyright Notice Contact_Information Contact Information Caption Caption LocalCaption Local Caption Description_writer Description writer RasterizedCaption Rasterized Caption ImageType Image Type ImageOrientation Image Orientation LanguageIdentifier Language Identifier AudioType Audio Type AudioSamplingRate Audio Sampling Rate AudioSamplingResolution Audio Sampling Resolution AudioDuration Audio Duration AudioOutcue Audio Outcue JobID Job ID MasterDocumentID Master Document ID ShortDocumentID Short Document ID UniqueDocumentID Unique Document ID OwnerID Owner ID ObjectDataPreviewFileFormat Object Data Preview File Format ObjectDataPreviewFileFormatVersion Object Data Preview File Format Version ObjectDataPreviewData Object Data Preview Data Prefs Prefs ClassifyState Classify State SimilarityIndex Similarity Index DocumentNotes Document Notes DocumentHistory Document History ExifCameraInfo Exif Camera Info
名前:GPSDispKind (GPSの表示形式)
名前
内容
LatitudeAndLongitudeMark 記号 xx°xx.xx’ LatitudeAndLongitudeMarkDMS 記号 xx°xx’xx” LatitudeAndLongitudeString 文字 xx度xx.xx分 LatitudeAndLongitudeStringDMS 文字 xx度xx分xx秒 LatitudeAndLongitudePercentage 百分率
名前:ExifStyle (ExifまたはGPSの指定用)
名前
内容
Exif Exifを示します。 GPS GPSを示します。
●Mdl_ExifExメソッド の説明
名前:GetCPUInfo
構文:Public Function GetCPUInfo( ExifStyle, CPU ) As Boolean 機能:記録したCPU情報を取得します。
引数:
名前 型 引数渡しの方法 説明 ExifStyle ExifStyle 値渡し(ByVal) 取得する種類を渡します。 CPU String 参照渡し(ByRef) CPU情報を戻します。
II:インテル
MM:モトローラ戻り値:Boolean
戻り値の説明:
True:成功。
False:失敗、エラー発生。使用例:
Dim Str_CPU As String If Mdl_ExifEx.GetExifFileInfo("C:\Exif情報.JPG") Then If Mdl_ExifEx.GetCPUInfo(ExifStyle.Exif, Str_CPU) Then MsgBox("記録CPU情報:" & Str_CPU) End If End If
名前:GetCRW_Encode
構文:Public Function GetCRW_Encode() As System.Text.Encoding
機能:Canon CRW情報を取り出す時のEncodingを取得します。
引数:なし
戻り値:System.Text.Encoding
戻り値の説明:
Canon CRW情報を取り出す時に使用するEncodingを戻します。
使用例:
Dim CRWEncode As System.Text.Encoding = Mdl_ExifEx.GetCRW_Encode()
名前:GetDispTypeGPSLatitudeAndLongitude
構文:Public Function GetDispTypeGPSLatitudeAndLongitude() As GPSDispKind 機能:GPSの緯度、経度の表示形式を取得します。
引数:なし
戻り値:GPSDispKind
戻り値の説明:
表示形式を戻します。
使用例:
Dim Str_Msg As String = Nothing Select Case Mdl_ExifEx.GetDispTypeGPSLatitudeAndLongitude() Case Mdl_ExifEx.GPSDispKind.LatitudeAndLongitudeMark Str_Msg = "記号 xx°xx.xx’" Case Mdl_ExifEx.GPSDispKind.LatitudeAndLongitudeMarkDMS Str_Msg = "記号 xx°xx’xx”" Case Mdl_ExifEx.GPSDispKind.LatitudeAndLongitudeString Str_Msg = "文字 xx度xx.xx分" Case Mdl_ExifEx.GPSDispKind.LatitudeAndLongitudeStringDMS Str_Msg = "文字 xx度xx分xx秒" Case Mdl_ExifEx.GPSDispKind.LatitudeAndLongitudePercentage Str_Msg = "百分率" End Select MsgBox("GPS表示種類:" & Str_Msg)
名前:GetDNGInfo
構文:Public Function GetDNGInfo( DNGTag , Nothing , DNGInfo ) As Boolean 機能:指定したDNG情報を取得します。
※GetExifFileInfoでExif情報を先に取得して下さい。
引数:
名前 型 引数渡しの方法 説明 DNGTag DNGTag 値渡し(ByVal) 取得するTAG値を渡します。 Nothing Boolean 参照渡し(ByRef) 取得情報の有無を戻します。
True :情報なし。
False:情報あり。DNGInfo strcExifGPSInfo 参照渡し(ByRef) DNG情報を戻します。 戻り値:Boolean
戻り値の説明:
True:成功。
False:失敗、エラー発生。使用例:
Dim Bln_Nothing As Boolean ' 確認変数. Dim Strc_DNGInfo As Mdl_ExifEx.strcExifGPSInfo = Nothing ' Exif情報. If Mdl_ExifEx.GetExifFileInfo("C:\Exif情報.JPG") Then If Mdl_ExifEx.GetDNGInfo(DNGTag.DNGVersion, Bln_Nothing, Strc_DNGInfo) Then If Not Bln_Nothing Then MsgBox(Strc_DNGInfo.Str_Name & ":" & Strc_DNGInfo.Str_Value) Else MsgBox("情報がありません。") End If Else MsgBox("DNG情報が取得できませんでした。") End If End If
名前:GetExifFileInfo
構文:Public Function GetExifFileInfo( FileName , [ExifTagOffset] , [NotJpgTiff] , [SetEntryValueSize] ) As Boolean 機能:指定ファイルのExif、DNG、IPTC、Canon CRW、Tiff and Other情報を取得します。
引数:
名前 型 引数渡しの方法 説明 FileName String 値渡し(ByVal) ファイル名(フルパス名)を渡します。 [ExifTagOffset] Boolean 値渡し(ByVal) ExifTagのオフセット用タグを情報に追加する。
True :追加します。
False:追加しません(規定)。[NotJpgTiff] Integer 値渡し(ByVal) JpegまたはTiffでもない場合にチェックするサイズを渡します。(規定値:0)
※-1はファイル全体で確認します。[SetEntryValueSize] Integer 値渡し(ByVal) EntryValueに設定するサイズを渡します。(規定値:256) 戻り値:Boolean
戻り値の説明:
True:成功。
False:失敗、エラー発生。使用例:
If Mdl_ExifEx.GetExifFileInfo("C:\Exif情報.JPG") Then MsgBox("Exif情報を取得しました。") Else MsgBox("Exif情報の取得に失敗しました。") End If
名前:GetExifInfo
構文:Public Function GetExifInfo( ExifTag , Nothing , ExifInfo ) As Boolean 機能:指定したExif情報を取得します。
※GetExifFileInfoでExif情報を先に取得して下さい。
引数:
名前 型 引数渡しの方法 説明 ExifTag ExifTag 値渡し(ByVal) 取得するTAG値を渡します。 Nothing Boolean 参照渡し(ByRef) 取得情報の有無を戻します。
True :情報なし。
False:情報あり。ExifInfo strcExifGPSInfo 参照渡し(ByRef) Exif情報を戻します。 戻り値:Boolean
戻り値の説明:
True:成功。
False:失敗、エラー発生。使用例:
Dim Bln_Nothing As Boolean ' 確認変数. Dim Strc_ExifInfo As Mdl_ExifEx.strcExifGPSInfo = Nothing ' Exif情報. If Mdl_ExifEx.GetExifFileInfo("C:\Exif情報.JPG") Then If Mdl_ExifEx.GetExifInfo(ExifTag.Make, Bln_Nothing, Strc_ExifInfo) Then If Not Bln_Nothing Then MsgBox(Strc_ExifInfo.Str_Name & ":" & Strc_ExifInfo.Str_Value) Else MsgBox("情報がありません。") End If Else MsgBox("Exif情報が取得できませんでした。") End If End If
名前:GetGPSFileInfo
構文:Public Function GetGPSFileInfo( FileName , [ExifTagOffset] , [NotJpgTiff] , [SetEntryValueSize] ) As Boolean 機能:指定ファイルのGPS情報を取得します。
引数:
名前 型 引数渡しの方法 説明 FileName String 値渡し(ByVal) ファイル名(フルパス名)を渡します。 [ExifTagOffset] Boolean 値渡し(ByVal) ExifTagのオフセット用タグを情報に追加する。
True :追加します。
False:追加しません(規定)。[NotJpgTiff] Integer 値渡し(ByVal) JpegまたはTiffでもない場合にチェックするサイズを渡します。(規定値:0)
※-1はファイル全体で確認します。[SetEntryValueSize] Integer 値渡し(ByVal) EntryValueに設定するサイズを渡します。(規定値:256) 戻り値:Boolean
戻り値の説明:
True:成功。
False:失敗、エラー発生。使用例:
If Mdl_ExifEx.GetGPSFileInfo("C:\GPS情報.JPG") Then MsgBox("GPS情報を取得しました。") Else MsgBox("GPS情報の取得に失敗しました。") End If
名前:GetGPSInfo
構文:Public Function GetGPSInfo( GPSTag , Nothing , GPSInfo ) As Boolean 機能:指定したGPS情報を取得します。
※GetGPSFileInfoでGPS情報を先に取得して下さい。
引数:
名前 型 引数渡しの方法 説明 GPSTag GPSTag 値渡し(ByVal) 取得するTAG値を渡します。 Nothing Boolean 参照渡し(ByRef) 取得情報の有無を戻します。
True :情報なし。
False:情報あり。GPSInfo strcExifGPSInfo 参照渡し(ByRef) GPS情報を戻します。 戻り値:Boolean
戻り値の説明:
True:成功。
False:失敗、エラー発生。使用例:
Dim Bln_Nothing As Boolean ' 確認変数. Dim Strc_GPSInfo As Mdl_ExifEx.strcExifGPSInfo = Nothing ' GPS情報. If Mdl_ExifEx.GetGPSFileInfo("C:\Exif情報.JPG") Then If Mdl_ExifEx.GetGPSInfo(GPSTag.GPSLatitude, Bln_Nothing, Strc_GPSInfo) Then If Not Bln_Nothing Then MsgBox(Strc_GPSInfo.Str_Name & ":" & Strc_GPSInfo.Str_Value) Else MsgBox("情報がありません。") End If Else MsgBox("GPS情報が取得できませんでした。") End If End If
名前:GetIPTC_Encode
構文:Public Function GetIPTC_Encode() As System.Text.Encoding 機能:IPTC情報を取り出す時のEncodingを取得します。
引数:なし
戻り値:System.Text.Encoding
戻り値の説明:
IPTC情報を取り出す時に使用するEncodingを戻します。
使用例:
Dim DefEncode As System.Text.Encoding = Mdl_ExifEx.GetIPTC_Encode()
名前:GetTIFFAndOtherInfo
構文:Public Function GetTIFFAndOtherInfo( TIFFAndOtherTag , Nothing , TIFFAndOtherInfo ) As Boolean 機能:指定したTIFFAndOther情報を取得します。
※GetExifFileInfoでExif情報を先に取得して下さい。
引数:
名前 型 引数渡しの方法 説明 TIFFAndOtherTag TIFFAndOtherTag 値渡し(ByVal) 取得するTAG値を渡します。 Nothing Boolean 参照渡し(ByRef) 取得情報の有無を戻します。
True :情報なし。
False:情報あり。TIFFAndOtherInfo strcExifGPSInfo 参照渡し(ByRef) TIFFAndOther情報を戻します。 戻り値:Boolean
戻り値の説明:
True:成功。
False:失敗、エラー発生。使用例:
Dim Bln_Noting As Boolean ' 確認変数. Dim Strc_TIFFAndOther As Mdl_ExifEx.strcExifGPSInfo = Nothing ' TIFFAndOther情報. If Mdl_ExifEx.GetExifFileInfo(Me!Text1.Text) Then If Mdl_ExifEx.GetTIFFAndOtherInfo(TIFFAndOtherTag.NewSubfileType, _ Bln_Noting, Strc_TIFFAndOther) Then If Not Bln_Noting Then MsgBox(Strc_TIFFAndOther.Str_Name & ":" & Strc_TIFFAndOther.Str_Value) Else MsgBox("情報がありません。") End If Else MsgBox("TIFFAndOther情報が取得できませんでした。") End If End If
名前:SetCRW_Encode
構文:Public Sub SetCRW_Encode( Encode ) 機能:Canon CRW情報を取り出す時のEncodingを設定します。
引数:
名前 型 引数渡しの方法 説明 Encode System.Text.Encoding 値渡し(ByVal) Canon CRW情報を取り出す時のEncodingを渡します。 戻り値:なし
使用例:
Mdl_ExifEx.SetCRW_Encode(System.Text.Encoding.UTF8)
名前:SetDispTypeGPSLatitudeAndLongitude
構文:Public Function SetDispTypeGPSLatitudeAndLongitude( LatitudeAndLongitude ) As Boolean 機能:GPSの緯度、経度の表示形式を設定します。
引数:
名前 型 引数渡しの方法 説明 LatitudeAndLongitude GPSDispKind 値渡し(ByVal) 表示形式を渡します。 戻り値:Boolean
戻り値の説明:
True:成功。
False:失敗、エラー発生。使用例:
Mdl_ExifEx.SetDispTypeGPSLatitudeAndLongitude(Mdl_ExifEx.GPSDispKind.LatitudeAndLongitudeMark)
名前:SetIPTC_Encode
構文:Public Sub SetIPTC_Encode( Encode ) 機能:IPTC情報を取り出す時のEncodingを設定します。
引数:
名前 型 引数渡しの方法 説明 Encode System.Text.Encoding 値渡し(ByVal) IPTC情報を取り出す時のEncodingを渡します。 戻り値:なし
使用例:
Mdl_ExifEx.SetIPTC_Encode(System.Text.Encoding.UTF8)
名前:SetUserComment_Getdata
構文:Public Sub SetUserComment_Getdata( DataOrOffset ) 機能:ユーザコメントの取得データ方式をセットします。
引数:
名前 型 引数渡しの方法 説明 DataOrOffset Boolean 値渡し(ByVal) 取得データ方式を渡します。
True :データで取得します。
False:オフセットで取得します。戻り値:なし
使用例:
Mdl_ExifEx.SetUserComment_Getdata(True) If Mdl_ExifEx.GetExifFileInfo("C:\Exif情報.JPG") Then MsgBox("Exif情報を取得しました。") Else MsgBox("Exif情報の取得に失敗しました。") End If
Copyright (C) 2010 Nihon System Developer Corp. All Rights Reserved.