VBAｿｽﾅ画像ｿｽtｿｽ@ｿｽCｿｽｿｽｿｽｿｽTｿｽCｿｽYｿｽﾏ更ｿｽｿｽｿｽoｿｽﾍゑｿｽｿｽｿｽﾉは？

ｿｽ@

ｿｽeｿｽｿｽｿｽｿｽﾌ過具ｿｽｿｽｿｽｿｽO

ｿｽEC/C++
ｿｽEDelphi
ｿｽEVisual BasicｿｽｿｽｿｽSｿｽｿｽ
ｿｽ@(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
ｿｽEVisual Basic(VB2-VB6)
ｿｽEVisual Basic .NET
ｿｽEVisual C++

ｿｽﾖ連ｿｽTｿｽCｿｽg

ｿｽEpapy's softwarelibrary

ｿｽ竄ｽｿｽｿｽ 2008/03/05(ｿｽｿｽ) 08:59:05

Windows XP , Access 2003 ｿｽﾅ指ｿｽ閧ｳｿｽ黷ｽｿｽ鞫懶ｿｽtｿｽ@ｿｽCｿｽｿｽｿｽｿｽﾇみ搾ｿｽｿｽﾝ、
ｿｽTｿｽCｿｽYｿｽﾌ変更ｿｽｿｽsｿｽｿｽｿｽAｿｽtｿｽ@ｿｽCｿｽｿｽｿｽﾆゑｿｽｿｽﾄ保托ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽB
ｿｽｿｽｿｽﾝビｿｽbｿｽgｿｽ}ｿｽbｿｽvｿｽﾌフｿｽ@ｿｽCｿｽｿｽｿｽｿｽﾇみ搾ｿｽｿｽﾝ、
WindowsAPI ｿｽｿｽ StretchBlt ｿｽｿｽgｿｽｿｽｿｽﾄ縮ｿｽｿｽｿｽｿｽｿｽｿｽｿｽ鞫懶ｿｽｿｽ
ｿｽEｿｽBｿｽｿｽｿｽhｿｽEｿｽﾉ表ｿｽｿｽｿｽｿｽｿｽ驍ｱｿｽﾆはでゑｿｽｿｽｿｽﾌゑｿｽmｿｽFｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽA
ｿｽEｿｽBｿｽｿｽｿｽhｿｽEｿｽﾅはなゑｿｽｿｽtｿｽ@ｿｽCｿｽｿｽｿｽﾉ保托ｿｽｿｽｿｽｿｽ驍ｽｿｽﾟの包ｿｽｿｽ@ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB
http://hpcgi1.nifty.com/MADIA/VBBBS2/wwwlng.cgi?print+200708/07080012.txt
ｿｽﾉゑｿｽｿｽｿｽgｿｽMｿｽｿｽｿｽlｿｽﾌソｿｽ[ｿｽXｿｽｿｽQｿｽlｿｽﾉ以会ｿｽｿｽﾌようｿｽﾉ擾ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB

    'ｿｽfｿｽoｿｽCｿｽXｿｽRｿｽｿｽｿｽeｿｽLｿｽXｿｽgｿｽnｿｽｿｽｿｽhｿｽｿｽｿｽ謫ｾ
    hdc = GetDC(0&)

    'ｿｽｿｽｿｽｿｽｿｽｿｽｿｽfｿｽoｿｽCｿｽXｿｽRｿｽｿｽｿｽeｿｽLｿｽXｿｽgｿｽ成
    hSrcMem = CreateCompatibleDC(hdc)
    hDstMem = CreateCompatibleDC(hdc)

    hBmp = LoadImage(0, SourceFileName, IMAGE_BITMAP, 0, 0, LR_LOADFROMFILE)
    hOldBmp = SelectObject(hSrcMem, hBmp)

    StretchBlt _
        hDstMem, _ｿｽ@ｿｽ@ｿｽ@ｿｽ@ｿｽ@ｿｽ@ｿｽ@ｿｽ@ｿｽ@ｿｽ@ｿｽ@ｿｽ@ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ hdc ｿｽﾉゑｿｽｿｽｿｽｿｽｿｽEｿｽBｿｽｿｽｿｽhｿｽEｿｽﾉ表ｿｽｿｽｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽｿｽ
        0, 0, 300, 300, _
        hSrcMem, _
        0, 0, 554, 787, _
        SRCCOPY


    ' GDIｿｽXｿｽ^ｿｽ[ｿｽgｿｽAｿｽbｿｽvｿｽ¥ｿｽｿｽｿｽﾌ擾ｿｽｿｽｿｽｿｽｿｽ
    GdiPStartupInput.GdiplusVersion = 1
    ' GDI+ｿｽｿｽｿｽCｿｽuｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄ趣ｿｽｿｽsｿｽﾈゑｿｽIｿｽｿｽ
    If GdiplusStartup(GDIPToken, GdiPStartupInput, 0&) <> 0 Then Exit Sub

    ' ｿｽsｿｽNｿｽ`ｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽGDI+BITMAPｿｽｿｽ成
    Ret = GdipCreateBitmapFromHBITMAP(hDstMem, 0&, GdipBmpHdl)ｿｽ@ｿｽｿｽｿｽ@ｿｽｿｽｿｽｿｽｿｽｿｽ hBmp ｿｽﾉゑｿｽｿｽｿｽｿｽｿｽAｿｽｿｽｿｽﾌまま難ｿｽｿｽｿｽｿｽtｿｽ@ｿｽCｿｽｿｽｿｽｿｽoｿｽﾍでゑｿｽｿｽﾜゑｿｽｿｽｿｽ
    If Ret = GDIPlusStatusConstants.Ok Then
        ' ｿｽGｿｽｿｽｿｽRｿｽ[ｿｽ_ｿｽpｿｽｿｽｿｽｿｽｿｽ[ｿｽ^ｿｽﾝ抵ｿｽ
        EncodParameters.Count = 1
        With EncodParameters.Parameter(0)
            .Guid = ConvCLSID(CLSID_QUALITY)
            .NumberOfValues = 1
            ' 4=EncoderParameterValueTypeLong
            .Type = 4
            ' ｿｽｿｽｿｽkｿｽiｿｽｿｽ
            .Value = VarPtr(Quality)
        End With
        ' JPGｿｽﾏ奇ｿｽｿｽﾅ保托ｿｽ
        SavePictureJpg = GdipSaveImageToFile(GdipBmpHdl, StrPtr(DestImageFile), ConvCLSID(CLSID_JPEG), VarPtr(EncodParameters))
        ' GDI+BITMAPｿｽｿｽpｿｽｿｽ
        GdipDisposeImage GdipBmpHdl
    End If

    ' GDI+ｿｽｿｽｿｽCｿｽuｿｽｿｽｿｽｿｽｿｽJｿｽｿｽ
    GdiplusShutdown GDIPToken

ｿｽ竄ｶｿｽｿｽ 2008/03/05(ｿｽｿｽ) 12:54:43

ｿｽｿｽｿｽxｿｽﾈ技ｿｽpｿｽｿｽgｿｽｿｽｿｽKｿｽvｿｽｿｽｿｽﾈゑｿｽｿｽｿｽﾎ、ｿｽｿｽｿｽLｿｽｿｽｿｽｿｽｿｽNｿｽﾅゑｿｽｿｽｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽ
StretchBltｿｽﾅ厄ｿｽｿｽｿｽｿｽﾆ駄目なゑｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽH

ｿｽ鞫懶ｿｽtｿｽ@ｿｽCｿｽｿｽ(Bmp)ｿｽｿｽgｿｽｿｽEｿｽkｿｽｿｽｿｽﾛ托ｿｽｿｽｿｽｿｽｿｽﾉは？
http://homepage1.nifty.com/MADIA/vb/vb_bbs2/200305/200305_03050049.html

ｿｽｿｽｿｽｿｽｿｽ 2008/03/05(ｿｽｿｽ) 13:11:17

ｿｽAｿｽNｿｽZｿｽXｿｽｿｽVBAｿｽﾈので、ｿｽsｿｽNｿｽ`ｿｽｿｽｿｽ[ｿｽ{ｿｽbｿｽNｿｽXｿｽｿｽｿｽﾈゑｿｽｿｽﾌでゑｿｽｿｽB
ｿｽｿｽｿｽｿｽﾉフｿｽHｿｽ[ｿｽｿｽｿｽﾉ表ｿｽｿｽｿｽｿｽｿｽｿｽけｿｽﾅはなゑｿｽｿｽﾌで、
ｿｽRｿｽｿｽｿｽgｿｽｿｽｿｽ[ｿｽｿｽｿｽﾉ貼ｿｽｿｽtｿｽｿｽｿｽﾄ托ｿｽｿｽすｿｽｿｽｿｽｿｽﾍｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾅ托ｿｽｿｽｿｽﾅゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽﾌ暦ｿｽｿｽpｿｽﾉゑｿｽｿｽｿｽｿｽﾄゑｿｽｿｽいｿｽｿｽﾆ会ｿｽｿｽpｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽﾄ。

ｿｽﾆゑｿｽｿｽｿｽｿｽけｿｽﾅ、ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽAｿｽhｿｽoｿｽCｿｽXｿｽｿｽｿｽｿｽﾒゑｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾜゑｿｽｿｽB

K.J.K. 2008/03/05(ｿｽｿｽ) 14:24:46

# ｿｽ答ではゑｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB

ｿｽｿｽｿｽﾌようｿｽﾈ用ｿｽrｿｽﾈゑｿｽﾎ、
http://www.imagemagick.org/script/index.php
ｿｽｿｽ
ImageMagick COM+ Object
ｿｽﾓゑｿｽｿｽgｿｽｿｽｿｽﾙゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾅは。

ｿｽ竄ｽｿｽｿｽ 2008/03/05(ｿｽｿｽ) 15:49:38

ｿｽﾔ趣ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽIｿｽI

ImageMagick ｿｽﾍ過具ｿｽｿｽﾉ使ｿｽｿｽｿｽｿｽｿｽoｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽｿｽﾈのでゑｿｽｿｽｿｽｿｽAｿｽﾊ環具ｿｽｿｽﾅゑｿｽｿｽﾌアｿｽNｿｽZｿｽXｿｽvｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽｿｽgｿｽｿｽｿｽ鼾ｿｽA
ｿｽﾊ途 ImageMagick ｿｽｿｽCｿｽｿｽｿｽXｿｽgｿｽ[ｿｽｿｽｿｽｿｽｿｽｿｽKｿｽvｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽﾋ。
ｿｽｿｽｿｽﾌゑｿｽｿｽｿｽｿｽ閧ｪｿｽずｿｽｿｽしｿｽｿｽｿｽﾈるたｿｽﾟ、ｿｽﾅゑｿｽｿｽｿｽｿｽ WindowsAPI ｿｽｿｽ
ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽAｿｽrｿｽbｿｽgｿｽ}ｿｽbｿｽvｿｽﾆｿｽｿｽｿｽｿｽｿｽｿｽﾌコｿｽｿｽｿｽeｿｽLｿｽXｿｽgｿｽfｿｽoｿｽCｿｽXｿｽｿｽ
ｿｽｿｽｿｽﾜゑｿｽｿｽﾖ係ｿｽtｿｽｿｽｿｽｿｽｿｽｿｽﾎゑｿｽｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽEｿｽEｿｽEｿｽB

COM+ Object ｿｽﾉつゑｿｽｿｽﾄは知ｿｽｿｽﾈゑｿｽｿｽﾌで抵ｿｽｿｽﾗてみまゑｿｽｿｽB

ｿｽFｿｽJｿｽｿｽｿｽj 2008/03/05(ｿｽｿｽ) 16:13:01

> ｿｽEｿｽBｿｽｿｽｿｽhｿｽEｿｽﾉ表ｿｽｿｽｿｽｿｽｿｽ驍ｱｿｽﾆはでゑｿｽｿｽｿｽﾌゑｿｽmｿｽFｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽA
> ｿｽEｿｽBｿｽｿｽｿｽhｿｽEｿｽﾅはなゑｿｽｿｽtｿｽ@ｿｽCｿｽｿｽｿｽﾉ保托ｿｽｿｽｿｽｿｽ驍ｽｿｽﾟの包ｿｽｿｽ@ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB

jpegｿｽtｿｽ@ｿｽCｿｽｿｽｿｽﾅなゑｿｽｿｽﾄ、bmpｿｽtｿｽ@ｿｽCｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽﾈゑｿｽ
GDI+ｿｽｿｽgｿｽｿｽﾈゑｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽﾌでは。

ｿｽﾈ会ｿｽｿｽAｿｽﾇ会ｿｽｿｽｿｽ

BitBlt
CreateCompatibleBitmap
DeleteObject

SavePicture

ｿｽﾆゑｿｽｿｽﾅ、ｿｽｿｽｿｽﾆゑｿｽｿｽﾈゑｿｽﾈゑｿｽｿｽｿｽｿｽﾈ。

ｿｽ竄ｽｿｽｿｽ 2008/03/05(ｿｽｿｽ) 16:27:26

ｿｽﾅ擾ｿｽｿｽﾉ擾ｿｽｿｽｿｽｿｽﾄなゑｿｽｿｽﾄゑｿｽｿｽﾝまゑｿｽｿｽｿｽIｿｽI
ｿｽﾅ終ｿｽIｿｽﾉゑｿｽ閧ｽｿｽｿｽｿｽﾌゑｿｽ jpeg ｿｽtｿｽ@ｿｽCｿｽｿｽｿｽﾈのでゑｿｽｿｽI

ｿｽ竄ｶｿｽｿｽ 2008/03/05(ｿｽｿｽ) 18:15:26

ｿｽｿｽｿｽｿｽｿｽｿｽﾖゑｿｽﾌ組ｿｽﾝ搾ｿｽｿｽせｿｽﾅ・ｿｽEｿｽE

GDI+ｿｽｿｽgｿｽpｿｽｿｽｿｽAGIFｿｽﾈどゑｿｽ¥ｿｽｿｽｿｽﾅゑｿｽｿｽｿｽRｿｽｿｽｿｽgｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽ成ｿｽｿｽｿｽｿｽ
http://maglog.jp/zerry/Article194475.html
GDI+ ｿｽｿｽgｿｽｿｽｿｽｿｽJPEGｿｽtｿｽ@ｿｽCｿｽｿｽｿｽﾌ作成
http://yaplog.jp/orator/archive/29

ｿｽ竄ｽｿｽｿｽ 2008/03/06(ｿｽｿｽ) 08:00:57

ｿｽ竄ｶｿｽｿｽlｿｽAｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽqｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB

> GDI+ｿｽｿｽgｿｽpｿｽｿｽｿｽAGIFｿｽﾈどゑｿｽ¥ｿｽｿｽｿｽﾅゑｿｽｿｽｿｽRｿｽｿｽｿｽgｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽ成ｿｽｿｽｿｽｿｽ
JPEGｿｽﾛ托ｿｽｿｽﾌ包ｿｽｿｽ@ｿｽｿｽｿｽﾚゑｿｽｿｽﾄゑｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽAｿｽsｿｽNｿｽ`ｿｽｿｽｿｽ[ｿｽRｿｽｿｽｿｽgｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽfｿｽoｿｽCｿｽXｿｽRｿｽｿｽｿｽeｿｽLｿｽXｿｽgｿｽｿｽnｿｽｿｽｿｽｿｽｿｽ@ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB

> GDI+ ｿｽｿｽgｿｽｿｽｿｽｿｽJPEGｿｽtｿｽ@ｿｽCｿｽｿｽｿｽﾌ作成
ｿｽ鞫懶ｿｽtｿｽ@ｿｽCｿｽｿｽｿｽｿｽﾇみ搾ｿｽｿｽｿｽﾅ、ｿｽtｿｽHｿｽ[ｿｽｿｽｿｽｿｽｿｽﾉ表ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ@ｿｽﾅゑｿｽｿｽﾋ。

ｿｽﾅ擾ｿｽｿｽﾉ擾ｿｽｿｽｿｽｿｽｿｽｿｽﾂゑｿｽｿｽﾈのでゑｿｽｿｽｿｽｿｽAｿｽﾈ会ｿｽｿｽﾌゑｿｽｿｽﾆはでゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
1.ｿｽrｿｽbｿｽgｿｽ}ｿｽbｿｽvｿｽﾌ読み搾ｿｽｿｽｿｽ
ｿｽiｿｽﾅ終ｿｽIｿｽﾉゑｿｽjpegｿｽｿｽﾇめゑｿｽ謔､ｿｽﾉ変更ｿｽ¥ｿｽｿｽﾅゑｿｽｿｽｿｽｿｽj
2.ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌ編集
3.ｿｽﾒ集ｿｽｿｽｿｽ黷ｽｿｽrｿｽbｿｽgｿｽ}ｿｽbｿｽvｿｽｿｽ JPEG ｿｽｿｽｿｽﾅ出ｿｽｿｽ

ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾌは、2ｿｽｿｽ3ｿｽﾌとゑｿｽｿｽｿｽﾅ、
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌデｿｽoｿｽCｿｽXｿｽRｿｽｿｽｿｽeｿｽLｿｽXｿｽgｿｽｿｽrｿｽbｿｽgｿｽ}ｿｽbｿｽvｿｽﾌハｿｽｿｽｿｽhｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽ闢厄ｿｽﾄゑｿｽiｿｽ¥ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽjｿｽﾆゑｿｽｿｽｿｽﾈのゑｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽB

ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽAｿｽhｿｽoｿｽCｿｽXｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽB

ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士 2008/03/06(ｿｽｿｽ) 09:21:42

GDI+ ｿｽﾅゑｿｽｿｽﾌゑｿｽｿｽﾆゑｿｽｿｽｿｽﾎ：

> 1.ｿｽrｿｽbｿｽgｿｽ}ｿｽbｿｽvｿｽﾌ読み搾ｿｽｿｽﾝ（ｿｽﾅ終ｿｽIｿｽﾉゑｿｽjpegｿｽｿｽﾇめゑｿｽ謔､ｿｽﾉ変更ｿｽ¥ｿｽｿｽﾅゑｿｽｿｽｿｽｿｽj
ｿｽXｿｽgｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽｿｽｿｽﾌ読み搾ｿｽｿｽﾝなゑｿｽAGdipLoadImageFromStreamｿｽB
ｿｽ鞫懶ｿｽtｿｽ@ｿｽCｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽAGdipLoadImageFromFileｿｽBｿｽｿｽｿｽｿｽｿｽbｿｽNｿｽﾉ抵ｿｽｿｽｿｽ
ImageｿｽIｿｽuｿｽWｿｽFｿｽNｿｽgｿｽﾌ包ｿｽｿｽｿｽｿｽﾈゑｿｽAGdipCloneImageｿｽB

ｿｽｿｽｿｽﾈみに破ｿｽｿｽｿｽﾍ、GdipDisposeImageｿｽB

bmp ｿｽｿｽ jpeg ｿｽｿｽｿｽﾎ象なゑｿｽAｿｽｿｽｿｽｿｽｿｽ GdipLoadImageｿｽnｿｽﾌゑｿｽｿｽｿｽｿｽﾉ、
GdipCreateBitmapFromStream
GdipCreateBitmapFromFile
GdipCreateBitmapFromDirectDrawSurface
GdipCreateBitmapFromHBITMAP
ｿｽｿｽｿｽｿｽgｿｽｿｽｿｽﾄ読み搾ｿｽｿｽﾞとゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB

> 2.ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌ編集
GDI+ ｿｽﾈゑｿｽAGraphics ｿｽIｿｽuｿｽWｿｽFｿｽNｿｽgｿｽﾌ托ｿｽｿｽｿｽﾉなゑｿｽﾜゑｿｽｿｽﾋ。Graphics ｿｽﾍ、
Image ｿｽIｿｽuｿｽWｿｽFｿｽNｿｽgｿｽｿｽｿｽｿｽﾌ撰ｿｽｿｽｿｽｿｽﾈゑｿｽAGdipGetImageGraphicsContextｿｽB
ｿｽfｿｽoｿｽCｿｽXｿｽRｿｽｿｽｿｽeｿｽLｿｽXｿｽgｿｽnｿｽｿｽｿｽhｿｽｿｽｿｽｿｽｿｽｿｽﾌ撰ｿｽｿｽｿｽｿｽﾈゑｿｽAGdipCreateFromHDCｿｽB
ｿｽEｿｽBｿｽｿｽｿｽhｿｽEｿｽnｿｽｿｽｿｽhｿｽｿｽｿｽｿｽｿｽｿｽﾌ撰ｿｽｿｽｿｽｿｽﾈゑｿｽAGdipCreateFromHWNDｿｽB

ｿｽｿｽｿｽﾆは、GdipDrawLineI / GdipFillRectangleI / GdipDrawImage / GdipDrawString ｿｽｿｽｿｽﾅ画像ｿｽｿｽｿｽHｿｽAｿｽﾆ。

ｿｽｿｽｿｽ驍｢ｿｽﾍ、ｿｽｿｽ闕ゑｿｽｿｽｿｽﾈ低レｿｽxｿｽｿｽｿｽｿｽｿｽｿｽﾌゑｿｽｿｽﾟに、
GdipBitmapLockBits / GdipBitmapUnlockBits ｿｽｿｽpｿｽｿｽｿｽﾄ、
ｿｽrｿｽbｿｽgｿｽ}ｿｽbｿｽvｿｽfｿｽ[ｿｽ^ｿｽﾌバｿｽCｿｽiｿｽｿｽｿｽ直接托ｿｽｿｽすｿｽｿｽﾆゑｿｽｿｽB

> 3.ｿｽﾒ集ｿｽｿｽｿｽ黷ｽｿｽrｿｽbｿｽgｿｽ}ｿｽbｿｽvｿｽｿｽ JPEG ｿｽｿｽｿｽﾅ出ｿｽｿｽ
ｿｽｿｽｿｽﾉ御存ｿｽmｿｽﾌようｿｽｿｽ GdipSaveImageToFile ｿｽﾉて。

K.J.K. 2008/03/06(ｿｽｿｽ) 09:55:05

GDI+ｿｽﾅ行ｿｽｿｽｿｽﾌなゑｿｽﾎ、ｿｽﾅ擾ｿｽｿｽｿｽｿｽｿｽﾅ鯉ｿｽﾜゑｿｽGDI+ｿｽｿｽｿｽｿｽｿｽﾅ行ｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾌゑｿｽｿｽyｿｽﾅゑｿｽｿｽ蛯､ｿｽB
ｿｽﾅ、ｿｽTｿｽCｿｽYｿｽﾌ変更ｿｽﾉゑｿｽGdipGetImageThumbnailｿｽｿｽｿｽLｿｽｿｽｿｽﾈケｿｽ[ｿｽXｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB

ｿｽFｿｽJｿｽｿｽｿｽj 2008/03/06(ｿｽｿｽ) 10:43:14

ｿｽｿｽｿｽｿｽAｿｽSｿｽRｿｽﾖ係ｿｽﾈゑｿｽｿｽｿｽｿｽﾇ。
2008/03/05(ｿｽｿｽ) 16:13:01 ｿｽﾌ趣ｿｽｿｽﾌｿｽｿｽXｿｽｿｽ

OleCreatePictureIndirect
ReleaseDC
DeleteDC
ｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽﾄまゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽﾗ厄ｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB

ｿｽ竄ｽｿｽｿｽ 2008/03/06(ｿｽｿｽ) 18:23:31

ｿｽﾔ信ｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽIｿｽIｿｽI

ｿｽ鞫懶ｿｽtｿｽ@ｿｽCｿｽｿｽｿｽｿｽﾇみ搾ｿｽｿｽｿｽﾅ画像ｿｽtｿｽ@ｿｽCｿｽｿｽｿｽｿｽoｿｽﾍゑｿｽｿｽﾚ的ｿｽﾈので、
GdipLoadImageｿｽ@ｿｽnｿｽﾉなゑｿｽﾌでゑｿｽｿｽｿｽｿｽﾋ。

ｿｽｿｽｿｽｿｽﾈ奇ｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽﾄみようｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾒ集ｿｽﾍひとまゑｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽﾄ、ｿｽﾇみ搾ｿｽｿｽﾝと出ｿｽﾍの確ｿｽFｿｽｿｽｿｽｿｽ謔､ｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽB

1.GdipLoadImageFromFileｿｽ@ｿｽﾅフｿｽ@ｿｽCｿｽｿｽｿｽﾌ読み搾ｿｽｿｽﾝ。
ｿｽｿｽｿｽｿｽｿｽ jpeg, bmp ｿｽﾌ托ｿｽｿｽApng ｿｽｿｽｿｽｿｽOK?
2.GdipGetImageGraphicsContext ｿｽﾅイｿｽｿｽｿｽ[ｿｽWｿｽｿｽOｿｽｿｽｿｽtｿｽBｿｽbｿｽNｿｽｿｽ
ｿｽOｿｽｿｽｿｽtｿｽBｿｽbｿｽNｿｽｿｽﾒ集ｿｽiｿｽHｿｽjｿｽｿｽｿｽｿｽｿｽﾍ鯉ｿｽｿｽ
3.ｿｽﾒ集ｿｽｿｽｿｽｿｽｿｽOｿｽｿｽｿｽtｿｽBｿｽbｿｽNｿｽｿｽｿｽｿｽCｿｽｿｽｿｽ[ｿｽWｿｽﾉ？
4.GdipSaveImageToFile ｿｽﾅフｿｽ@ｿｽCｿｽｿｽｿｽｿｽ

2. ｿｽｿｽGdipGetImageGraphicsContext ｿｽﾌ宣言ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB
Google ｿｽﾅ抵ｿｽｿｽﾗてゑｿｽﾙとゑｿｽﾇヒｿｽbｿｽgｿｽｿｽｿｽﾈゑｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽEｿｽEｿｽE
ｿｽﾜゑｿｽｿｽA3ｿｽﾅは会ｿｽｿｽｿｽgｿｽpｿｽｿｽｿｽｿｽﾎよいｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽH

ｿｽｿｽｿｽｿｽﾎゑｿｽｿｽｿｽﾅゑｿｽｿｽﾝまゑｿｽｿｽｿｽBｿｽnｿｽﾟゑｿｽGDI+ｿｽﾆゑｿｽｿｽｿｽｿｽｿｽﾌゑｿｽmｿｽｿｽｿｽｿｽｿｽﾌゑｿｽ
ｿｽSｿｽRｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽB

ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士 2008/03/06(ｿｽｿｽ) 19:20:14

> 1.GdipLoadImageFromFileｿｽ@ｿｽﾅフｿｽ@ｿｽCｿｽｿｽｿｽﾌ読み搾ｿｽｿｽﾝ。
> ｿｽｿｽｿｽｿｽｿｽ jpeg, bmp ｿｽﾌ托ｿｽｿｽApng ｿｽｿｽｿｽｿｽOK?
ｿｽﾍゑｿｽｿｽBｿｽﾇみ搾ｿｽｿｽﾝゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾝゑｿｽﾎ会ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB

GDI+ ｿｽｿｽｿｽﾎ会ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽ鞫懶ｿｽ`ｿｽｿｽｿｽﾉつゑｿｽｿｽﾄは、ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB
http://msdn.microsoft.com/library/ja/cpguide/html/_gdiplus_Images_Bitmaps_and_Metafiles_about.asp

ｿｽｿｽｿｽｿｽｿｽｿｽ GdipLoadImageFromFile ｿｽﾌ場合ｿｽAｿｽﾇみ搾ｿｽｿｽﾜれたｿｽtｿｽ@ｿｽCｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽbｿｽNｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾜゑｿｽｿｽﾌで、ｿｽﾅゑｿｽｿｽｿｽﾎ、GdipLoadImageFromStream ｿｽｿｽ
ｿｽgｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾇゑｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽB
http://www.vb-user.net/junk/replySamples/2007.10.21.12.01/DrawFromStream.txt

> 2.GdipGetImageGraphicsContext ｿｽﾅイｿｽｿｽｿｽ[ｿｽWｿｽｿｽOｿｽｿｽｿｽtｿｽBｿｽbｿｽNｿｽｿｽ
> ｿｽOｿｽｿｽｿｽtｿｽBｿｽbｿｽNｿｽｿｽﾒ集ｿｽiｿｽHｿｽjｿｽｿｽｿｽｿｽｿｽﾍ鯉ｿｽｿｽ
ｿｽｿｽｿｽﾌ「ｿｽﾒ集ｿｽvｿｽﾅ会ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌゑｿｽｿｽﾉゑｿｽｿｽｿｽﾄ、ｿｽ闖ｿｽｿｽｿｽﾙなゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB

ｿｽｿｽｿｽﾆゑｿｽｿｽﾎ、ｿｽﾅ擾ｿｽｿｽﾉ擾ｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽ
> ｿｽTｿｽCｿｽYｿｽﾌ変更ｿｽｿｽsｿｽｿｽｿｽAｿｽtｿｽ@ｿｽCｿｽｿｽｿｽﾆゑｿｽｿｽﾄ保托ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽB
ｿｽﾆゑｿｽｿｽｿｽｿｽﾌゑｿｽｿｽAｿｽ鞫懶ｿｽﾌ縦ｿｽｿｽｿｽﾌサｿｽCｿｽYｿｽｿｽﾓ図ｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽﾎ、K.J.K.ｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽ謔､ｿｽﾉ、GdipGetImageThumbnail ｿｽ利用ｿｽｿｽｿｽｿｽﾌゑｿｽｿｽﾈ単ｿｽｿｽｿｽﾆ。

> 3.ｿｽﾒ集ｿｽｿｽｿｽｿｽｿｽOｿｽｿｽｿｽtｿｽBｿｽbｿｽNｿｽｿｽｿｽｿｽCｿｽｿｽｿｽ[ｿｽWｿｽﾉ？
GdipGetImageThumbnail ｿｽﾉゑｿｽｿｽTｿｽCｿｽYｿｽﾏ更ｿｽｿｽｿｽｿｽｿｽﾈゑｿｽﾎ、
Image ｿｽｿｽｿｽｿｽｿｽﾊゑｿｽ Image ｿｽｿｽｿｽｿｽｿｽｿｽ驍ｽｿｽﾟ、Graphics ｿｽﾍ使ｿｽpｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB

ｿｽｿｽｿｽｿｽｿｽﾌ画像ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽｿｽｿｽ`ｿｽ謔ｵｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽHｿｽｿｽsｿｽｿｽｿｽ鼾ｿｽﾍ、
Graphics ｿｽIｿｽuｿｽWｿｽFｿｽNｿｽgｿｽｿｽｿｽKｿｽvｿｽﾉなゑｿｽﾜゑｿｽｿｽB

ｿｽﾈゑｿｽｿｽAGDI+ ｿｽｿｽ Image ｿｽIｿｽuｿｽWｿｽFｿｽNｿｽgｿｽﾆは、ｿｽ鞫懶ｿｽfｿｽ[ｿｽ^(ｿｽtｿｽ@ｿｽCｿｽｿｽ,ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ)ｿｽｿｽｿｽﾌゑｿｽﾌゑｿｽ¥ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽｿｽAGraphics ｿｽIｿｽuｿｽWｿｽFｿｽNｿｽgｿｽﾍ、ｿｽｿｽｿｽｿｽ Image ｿｽﾉ対ゑｿｽｿｽｿｽ`ｿｽｿｽcｿｽ[ｿｽｿｽ(ｿｽyｿｽｿｽｿｽAｿｽuｿｽｿｽｿｽVｿｽAｿｽtｿｽHｿｽｿｽｿｽgｿｽﾈゑｿｽ)ｿｽｿｽ¥ｿｽｿｽｿｽﾜゑｿｽｿｽB

ｿｽﾜゑｿｽｿｽAImage ｿｽｿｽｿｽｿｽ成ｿｽｿｽｿｽｿｽ Graphics ｿｽﾌ場合ｿｽAｿｽ`ｿｽ謔ｵｿｽｿｽｿｽｿｽｿｽﾊゑｿｽ
ｿｽｿｽｿｽﾉなゑｿｽｿｽｿｽ Image ｿｽﾉゑｿｽｿｽﾌまま費ｿｽｿｽfｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾌで、
> ｿｽﾒ集ｿｽｿｽｿｽｿｽｿｽOｿｽｿｽｿｽtｿｽBｿｽbｿｽNｿｽｿｽｿｽｿｽCｿｽｿｽｿｽ[ｿｽWｿｽﾉ？
ｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆは行ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB

> 4.GdipSaveImageToFile ｿｽﾅフｿｽ@ｿｽCｿｽｿｽｿｽｿｽ
ｿｽﾅゑｿｽｿｽﾋ。

ｿｽ竄ｽｿｽｿｽ 2008/03/06(ｿｽｿｽ) 19:42:42

ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士ｿｽlｿｽAｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽIｿｽI

ｿｽﾍゑｿｽｿｽBｿｽｿｽｿｽJPEGｿｽ鞫懶ｿｽﾌフｿｽ@ｿｽCｿｽｿｽｿｽTｿｽCｿｽYｿｽﾌ縮ｿｽｿｽｿｽｿｽｿｽﾚ的ｿｽﾈので、
ｿｽcｿｽｿｽｿｽTｿｽCｿｽYｿｽﾌ縮ｿｽｿｽｿｽﾆ、ｿｽｿｽｿｽkｿｽｿｽｿｽﾌ指ｿｽ閧ｪｿｽﾅゑｿｽｿｽﾄ保托ｿｽｿｽﾅゑｿｽｿｽｿｽｿｽOKｿｽﾅゑｿｽｿｽB

ｿｽｿｽｿｽsｿｽｿｽｿｽしｿｽﾄゑｿｽｿｽｿｽﾔに以会ｿｽｿｽﾌ様ｿｽﾉゑｿｽｿｽﾄビｿｽbｿｽgｿｽ}ｿｽbｿｽvｿｽﾅ読み搾ｿｽｿｽﾝ、
JPEGｿｽｿｽQualityｿｽiｿｽｿｽｿｽkｿｽｿｽｿｽHｿｽjｿｽｿｽwｿｽ閧ｵｿｽﾄ出ｿｽﾍゑｿｽｿｽ驍ｱｿｽﾆはでゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽI

    Ret = GdipCreateBitmapFromFile(StrPtr(SourceFileName), lngBmp)

    EncodParameters.Count = 1
        With EncodParameters.Parameter(0)
            .Guid = ConvCLSID(CLSID_QUALITY)
            .NumberOfValues = 1
            ' 4=EncoderParameterValueTypeLong
            .Type = 4
            ' ｿｽｿｽｿｽkｿｽiｿｽｿｽ
            .Value = VarPtr(Quality)
        End With
    Ret = GdipSaveImageToFile(lngBmp, StrPtr(DestFileName), ConvCLSID(CLSID_JPEG), VarPtr(EncodParameters))

Graphicsｿｽﾍ不ｿｽvｿｽﾆのゑｿｽｿｽﾆなので、ｿｽｿｽｿｽﾆはサｿｽCｿｽYｿｽkｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽﾌゑｿｽｿｽﾈ、ｿｽﾆ思ｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽA
ｿｽrｿｽbｿｽgｿｽ}ｿｽbｿｽvｿｽｿｽImageｿｽﾆゑｿｽｿｽｿｽｿｽﾌは会ｿｽｿｽｿｽｿｽﾙなゑｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
ｿｽﾜゑｿｽｿｽAｿｽTｿｽCｿｽYｿｽkｿｽｿｽｿｽﾉつゑｿｽｿｽﾄ　GdipGetImageThumbnail ｿｽ調べゑｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽA
ｿｽ骭ｾｿｽｿｽｿｽｿｽgｿｽｿｽｿｽｿｽｿｽｿｽｿｽが鯉ｿｽｿｽﾂゑｿｽｿｽｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB
ｿｽiGDI+ｿｽﾆゑｿｽｿｽｿｽｿｽﾌは会ｿｽｿｽﾅゑｿｽｿｽｿｽﾈに擾ｿｽが擾ｿｽｿｽﾈゑｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽHｿｽH
ｿｽ@ｿｽgｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾎ費ｿｽｿｽﾉ便暦ｿｽｿｽﾈゑｿｽﾌに鯉ｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽEｿｽEｿｽEｿｽj

ｿｽ¥ｿｽｿｽｿｽあゑｿｽﾜゑｿｽｿｽが、ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾙどゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽB

ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士 2008/03/06(ｿｽｿｽ) 20:19:42

> ｿｽrｿｽbｿｽgｿｽ}ｿｽbｿｽvｿｽｿｽImageｿｽﾆゑｿｽｿｽｿｽｿｽﾌは会ｿｽｿｽｿｽｿｽﾙなゑｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
Bitmap ｿｽIｿｽuｿｽWｿｽFｿｽNｿｽgｿｽｿｽ Image ｿｽIｿｽuｿｽWｿｽFｿｽNｿｽgｿｽﾌ茨ｿｽｿｽﾅゑｿｽｿｽB

Image ｿｽﾌ機ｿｽ¥ｿｽﾉ会ｿｽｿｽｿｽｿｽﾄ、bmp, jpg, gif, png ｿｽｿｽｿｽｿｽ
ｿｽrｿｽbｿｽgｿｽ}ｿｽbｿｽvｿｽnｿｽ鞫懶ｿｽ操作すｿｽ驍ｽｿｽﾟの機ｿｽ¥ｿｽｿｽｿｽﾇ会ｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB

> ｿｽ骭ｾｿｽｿｽｿｽｿｽgｿｽｿｽｿｽｿｽｿｽｿｽｿｽが鯉ｿｽｿｽﾂゑｿｽｿｽｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB
SDK ｿｽｿｽ [GDI+ Reference] - [GDI+ Flat API] ｿｽﾌ搾ｿｽｿｽﾉ、ｿｽﾖ撰ｿｽｿｽﾌ宣言ｿｽｿｽ
ｿｽﾚゑｿｽｿｽﾄゑｿｽｿｽｿｽﾌゑｿｽ(C++ｿｽp)ｿｽAｿｽｿｽｿｽｿｽｿｽ VB6 ｿｽｿｽ Declare ｿｽｿｽｿｽﾉ翻ｿｽしてみてゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB
http://msdn2.microsoft.com/en-us/library/ms533969.aspx

>ｿｽiGDI+ｿｽﾆゑｿｽｿｽｿｽｿｽﾌは会ｿｽｿｽﾅゑｿｽｿｽｿｽﾈに擾ｿｽが擾ｿｽｿｽﾈゑｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽHｿｽH
SDK ｿｽﾉ細ゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽBｿｽpｿｽ黷ｩｿｽｿｽ C++ ｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽｿｽﾇゑｿｽB

>ｿｽ@ｿｽgｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾎ費ｿｽｿｽﾉ便暦ｿｽｿｽﾈゑｿｽﾌに鯉ｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽEｿｽEｿｽEｿｽj
C++ ｿｽpｿｽﾉは、ｿｽｿｽｿｽbｿｽpｿｽ[ｿｽﾆなゑｿｽNｿｽｿｽｿｽXｿｽｿｽｿｽｿｽｿｽﾅに提供ゑｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽA
VB ｿｽｿｽｿｽｿｽｿｽﾉゑｿｽA.NET Framework ｿｽﾉゑｿｽ System.Drawing ｿｽｿｽｿｽOｿｽｿｽﾔの会ｿｽｿｽﾉ、
GDI+ ｿｽﾌクｿｽｿｽｿｽXｿｽｿｽｿｽpｿｽﾓゑｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB

ｿｽｿｽｿｽﾌようｿｽﾈ趣ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽAｿｽｿｽｿｽﾛには、Flat API ｿｽﾌ出ｿｽﾔはゑｿｽｿｽﾙど托ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB
SDK ｿｽﾉは、Flat API ｿｽﾖ撰ｿｽｿｽ直接呼ぶ趣ｿｽｿｽ推擾ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾈゑｿｽｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
> It is recommended that you do not directly call the functions in the flat API.

ｿｽｿｽｿｽｿｽﾆゑｿｽ VBA ｿｽｿｽ VB6 ｿｽﾉゑｿｽｿｽｿｽｿｽﾄは、Flat API ｿｽｿｽ Declare ｿｽ骭ｾ(ｿｽﾜゑｿｽｿｽﾍタｿｽCｿｽvｿｽｿｽｿｽCｿｽuｿｽｿｽｿｽｿｽ)ｿｽｿｽ
ｿｽﾄび出ｿｽｿｽｿｽﾙゑｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽｿｽﾇゑｿｽB

ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士 2008/03/06(ｿｽｿｽ) 20:28:59

> ｿｽﾜゑｿｽｿｽAｿｽTｿｽCｿｽYｿｽkｿｽｿｽｿｽﾉつゑｿｽｿｽﾄ　GdipGetImageThumbnail ｿｽ調べゑｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽA
> ｿｽ骭ｾｿｽｿｽｿｽｿｽgｿｽｿｽｿｽｿｽｿｽｿｽｿｽが鯉ｿｽｿｽﾂゑｿｽｿｽｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB

ｿｽｿｽｿｽﾌ抵ｿｽ`ｿｽｿｽ

GpStatus WINGDIPAPI GdipGetImageThumbnail(
    GpImage *image,
    UINT thumbWidth,
    UINT thumbHeight,
    GpImage **thumbImage,
    GetThumbnailImageAbort callback,
    VOID * callbackData)

ｿｽｿｽｿｽｿｽｿｽｿｽAVBA ｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽﾈ。

Private Declare Function GdipGetImageThumbnail Lib "gdiplus" _
   (ByVal baseImage As Long, _
    ByVal thumbWidth As Long, _
    ByVal thumbHeight As Long, _
    ByRef thumbImage As Long, _
    ByVal callback As Long, _
    ByVal callbackData As Long) As Long

ｿｽｿｽｿｽｿｽ1: ｿｽｿｽｿｽﾆなゑｿｽ Image ｿｽIｿｽuｿｽWｿｽFｿｽNｿｽg
ｿｽｿｽｿｽｿｽ2: ｿｽkｿｽｿｽｿｽｿｽﾌ包ｿｽ
ｿｽｿｽｿｽｿｽ3: ｿｽkｿｽｿｽｿｽｿｽﾌ搾ｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽ4: ｿｽｿｽｿｽｿｽｿｽﾉ、ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾊゑｿｽ Image ｿｽｿｽｿｽﾔゑｿｽｿｽｿｽｿｽ

ｿｽﾅ鯉ｿｽｿｽ 2 ｿｽﾂの茨ｿｽｿｽｿｽｿｽﾍ、0 ｿｽｿｽnｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽﾜゑｿｽｿｽ蛯､ｿｽB

ｿｽ竄ｽｿｽｿｽ 2008/03/07(ｿｽｿｽ) 08:31:29

ｿｽ鞫懶ｿｽﾌサｿｽCｿｽYｿｽkｿｽｿｽｿｽAｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽIｿｽIｿｽIｿｽIｿｽI
ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士ｿｽlｿｽﾍゑｿｽｿｽﾟ皆ｿｽlｿｽA
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌゑｿｽｿｽwｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽIｿｽI

ｿｽｿｽｿｽﾓ奇ｿｽｿｽﾓでゑｿｽｿｽI
ｿｽｿｽｿｽｿｽﾆゑｿｽﾗ具ｿｽｿｽｿｽｿｽﾄ参ｿｽｿｽﾜゑｿｽｿｽIｿｽI

ｿｽｿｽｿｽXｿｽWｿｽｿｽｿｽ[ 2008/05/30(ｿｽｿｽ) 17:51:46

ｿｽﾍゑｿｽｿｽﾟて趣ｿｽｿｽ竄ｳｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB

ｿｽｿｽｿｽｿｽ竄ｽｿｽｿｽｿｽlｿｽﾆ難ｿｽｿｽlｿｽﾌ厄ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄ、ｿｽﾟ具ｿｽｿｽﾌ難ｿｽeｿｽｿｽｿｽｿｽﾉトｿｽｿｽｿｽCｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽBｿｽｿｽ閧ｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽeｿｽｿｽjpegｿｽtｿｽ@ｿｽCｿｽｿｽｿｽｿｽﾇみ搾ｿｽｿｽｿｽﾅｿｽｿｽTｿｽCｿｽYｿｽｿｽｿｽﾄ保托ｿｽｿｽB
ｿｽｿｽｿｽ黷ｾｿｽｿｽｿｽﾅゑｿｽｿｽB

GdipGetImageThumbnailｿｽﾅ縮ｿｽｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽﾜでは厄ｿｽｿｽﾈゑｿｽｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽAGdipSaveImageToFileｿｽﾅ保托ｿｽｿｽｿｽｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽｿｽB

ｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽRｿｽｿｽｿｽpｿｽCｿｽｿｽｿｽGｿｽｿｽｿｽ[ｿｽﾅ「ｿｽpｿｽuｿｽｿｽｿｽbｿｽN ｿｽIｿｽuｿｽWｿｽFｿｽNｿｽg ｿｽｿｽｿｽWｿｽｿｽｿｽ[ｿｽｿｽｿｽﾅ抵ｿｽ`ｿｽｿｽｿｽ黷ｽｿｽｿｽｿｽ[ｿｽUｿｽ[ｿｽｿｽ`ｿｽ^ｿｽﾉ鯉ｿｽｿｽｿｽAｿｽﾏ撰ｿｽｿｽﾉ奇ｿｽｿｽ闢厄ｿｽﾄる事ｿｽｿｽｿｽﾅゑｿｽｿｽAｿｽｿｽｿｽsｿｽｿｽｿｽoｿｽCｿｽｿｽｿｽfｿｽBｿｽｿｽｿｽOｿｽﾌ関撰ｿｽｿｽﾉ渡ｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽBｿｽvｿｽﾆなゑｿｽﾜゑｿｽｿｽB

ｿｽJｿｽｿｽｿｽﾂ具ｿｽｿｽｿｽVistaSP1+ACCESS2007(VBA)ｿｽﾅゑｿｽｿｽB

ｿｽRｿｽｿｽｿｽpｿｽCｿｽｿｽｿｽGｿｽｿｽｿｽ[ｿｽﾍ趣ｿｽｿｽﾌ箇擾ｿｽｿｽﾅ費ｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB

EncodParameters.Count = 1
        With EncodParameters.Parameter(0)
            .Guid = ConvCLSID(CLSID_QUALITY) ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽConCLSIDｿｽﾅエｿｽｿｽｿｽ[
            .NumberOfValues = 1
            .Type = 4
            .Value = VarPtr(Quality)
        End With
    Ret = GdipSaveImageToFile(lngBmp, StrPtr(DestFileName), ConvCLSID(CLSID_JPEG), VarPtr(EncodParameters))

ConvCLSIDｿｽｿｽ

Private Function ConvCLSID(ByVal sGuid As String) As UUID
    CLSIDFromString StrPtr(sGuid), ConvCLSID
End Function

ｿｽﾆゑｿｽｿｽﾄゑｿｽｿｽｿｽﾜゑｿｽｿｽB

VBAｿｽﾉ鯉ｿｽｿｽ轤ｸｿｽvｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌゑｿｽｿｽ范ｬｿｽﾅサｿｽｿｽｿｽvｿｽｿｽｿｽRｿｽ[ｿｽhｿｽ頼ゑｿｽﾉ作成ｿｽﾅゑｿｽｿｽ驍ｮｿｽ轤｢ｿｽﾌｿｽｿｽxｿｽｿｽｿｽﾈのでゑｿｽｿｽｿｽｿｽﾅ行ｿｽｿｽｿｽlｿｽﾜゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB

ｿｽﾖ乗質ｿｽｿｽﾅ申ｿｽｿｽｿｽごゑｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB

ｿｽｿｽｿｽｿｽｿｽLｿｽｿｽｿｽﾈ擾ｿｽがゑｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽ轤ｨｿｽ閧｢ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽBm(_ _)m

ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士 2008/05/30(ｿｽｿｽ) 19:14:09

ｿｽｿｽｿｽｿｽﾏみのスｿｽｿｽｿｽbｿｽhｿｽﾉ便乗質ｿｽ竄ｷｿｽｿｽﾌは費ｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB
ｿｽVｿｽKｿｽﾉ趣ｿｽｿｽｿｽ投稿ｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽﾉ関連ｿｽXｿｽｿｽｿｽbｿｽhｿｽｿｽ URL ｿｽｿｽﾚゑｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB

> ｿｽpｿｽuｿｽｿｽｿｽbｿｽN ｿｽIｿｽuｿｽWｿｽFｿｽNｿｽg ｿｽｿｽｿｽWｿｽｿｽｿｽ[ｿｽｿｽｿｽﾅ抵ｿｽ`ｿｽｿｽｿｽ黷ｽｿｽｿｽｿｽ[ｿｽUｿｽ[ｿｽｿｽ`ｿｽ^ｿｽﾉ鯉ｿｽｿｽｿｽA
> ｿｽﾏ撰ｿｽｿｽﾉ奇ｿｽｿｽ闢厄ｿｽﾄる事ｿｽｿｽｿｽﾅゑｿｽｿｽAｿｽｿｽｿｽsｿｽｿｽｿｽoｿｽCｿｽｿｽｿｽfｿｽBｿｽｿｽｿｽOｿｽﾌ関撰ｿｽｿｽﾉ渡ｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽ[ｿｽUｿｽ[ｿｽｿｽ`ｿｽ^ｿｽAｿｽｿｽｿｽｿｽﾑ、ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾉ受け趣ｿｽｿｽvｿｽｿｽｿｽVｿｽ[ｿｽWｿｽｿｽｿｽｿｽｿｽｿｽA
ｿｽｿｽｿｽﾗゑｿｽ Private ｿｽﾅ宣言ｿｽｿｽｿｽﾄみてゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB

ｿｽｿｽｿｽﾌペｿｽ[ｿｽWｿｽﾌトｿｽbｿｽvｿｽｿｽ

Created by board of various Programming Library.