꾸벅... 안냥하세요... 월천입니다. ㅋㅋㅋ 한 동안 잠시 잠시 왔다가기만 해서..
웬지 쑥---스럽습니다...
이것 저번에 질문을 올렸는 데... 답변이 없더군요..
그래서 한 동안 잊고 있다가 한달 전인가? 자료를 찾아 두고... 해봐야지 했는 데... 깜박하고...
오늘 새벽에 C++Builder 6.0에서 TEST해 보았습니다. 잘 되는 군요... 예제 만들고 하는 데..
시간이 제법 갔습니다. 혹 또 찾으시는 분 있을까? 싶어 올려 둡니다.
알고나면 별것 아닌데... ㅋㅋㅋ
자 그러면 모두 잘 주무시고.... 다음에.....
AnsiString asFile = LFilename.SubString( 8, 100 );
TGIFImage *gif = new TGIFImage();
gif->LoadFromFile( "d:\\" + asFile ); //경로는 자신들의 상황에 맞게 수정하면 되고 나는 리소스에 넣고 사용할련다..
TMemoryStream *msLogin = new TMemoryStream();
//Graphics::TBitmap *bmp = new Graphics::TBitmap(); //이 부분 델파이 소스 보면... Try ~ Except ~ Finally 사용하네요.. 뭐 특별히 없어도 될 것 같은 데...
//bmp->LoadFromFile( "d:\\logout.bmp" ); //http://borland.newsgroups.archived.at/public.delphi.internet.winsock/200504/0504051721.html
//bmp->SaveToStream(msLogin); //http://www.delphigroups.info/2/7/207714.html
gif->SaveToStream(msLogin);
msLogin->Seek( 0, soFromBeginning );
AResponseInfo->RawHeaders->Clear();
AResponseInfo->RawHeaders->Add( "Cache-Control: no-store, no-cache, must-revalidate" );
AResponseInfo->RawHeaders->Add( "Cache-Control: post-check=0, pre-check=0" );
AResponseInfo->RawHeaders->Add( "Pragma: no-cache" );
AResponseInfo->ResponseNo = 200;
AResponseInfo->ContentType = "image/gif"; //image/bmp
AResponseInfo->FreeContentStream = true;
AResponseInfo->ContentStream = msLogin;
delete gif;
|