버전: 빌더2010
DB:MS-SQL2000

이미지를 DB에 저장했다가 불러오는 모듈을 개발중입니다.
기존에 단순 관리업무 모듈만 개발하다가 이미지 처리를 할려니 매우 방황하고 있습니다.

일단 포럼을 검색해보고 GraphicEx를 설치했습니다.
이미지 저장은 잘되는거 같습니다.

하지만 읽어와서 TImage에 표시하고 싶은데 잘 되지가 않네요.
JPG는 잘되는거 같은데 PNG파일이 문제네요.

먼저 제가 사용한 코드를 적어보겠습니다.
잘못 된 부분이 있으면 지적 부탁합니다.

많은분들의 도움 부탁드립니다.

#include <jpeg.hpp>
#include <GraphicEx.hpp>

//-이미지불러오기
AnsiString str;
Edit4->Text=ExtractFileName(OpenPictureDialog1->FileName);
str=ExtractFileExt(Edit4->Text.Trim());
if(str.UpperCase() == "PNG")
{
    TMemoryStream *ImageBuffer = new TMemoryStream();
    ImageBuffer->LoadFromFile(OpenPictureDialog1->FileName);
    TPNGGraphic* png = new TPNGGraphic();
    png->LoadFromStream(ImageBuffer);
    Image1->Picture->Bitmap->Assign(png);
    delete png;
}
else
{
    Image1->Picture->LoadFromFile(OpenPictureDialog1->FileName);
}
//-DB저장
TMemoryStream *stream1 = new TMemoryStream();
Image1->Picture->Graphic->SaveToStream(stream1);
ADOQuery1->Close();
ADOQuery1->SQL->Clear();
sql="insert into board1image(wrknum,filename,wrkimage,insid,insdate) values(";
sql+="'"+wrknum.Trim()+"',";
sql+="'"+filename.Trim()+"',";
sql+=":DATA,";
sql+="'"+WrkID.Trim()+"',";
sql+="getdate())";
ADOQuery1->SQL->Add(sql);
ADOQuery1->Parameters->ParamByName("DATA")->LoadFromStream(stream1,ftBlob);
ADOQuery1->ExecSQL();
//-DB불러오기
TBlobStream *stream1;
stream1 = (TBlobStream*)ADOQuery3->CreateBlobStream(ADOQuery3->FieldByName("wrkimage"), bmRead);
FileName=ADOQuery3->FieldByName("filename")->AsString.Trim();
str=ExtractFileExt(FileName.Trim());
if(str.UpperCase() == "PNG")
{
    TPNGGraphic* png = new TPNGGraphic();
    png->LoadFromStream(stream1);// <------오류발생하는 부분
        //오류메세지"Cannot load image.Invalid or unexpected PNG image format."
    Image1->Picture->Bitmap->Assign(png);
    delete png;
}
else if(str.UpperCase() == "JPG" || str.UpperCase() == "JPEG")
{
    TJPEGImage *Jpeg = new TJPEGImage;
    Jpeg->LoadFromStream(stream1);
    Image1->Picture->Graphic=Jpeg;
    delete Jpeg;
}