604
社区成员




#include <jpeg.hpp
void __fastcall TForm1::ShowPic(AnsiString sPicFile)//该函数可以兼容BMP和JPE。
{
int i_type;
TImage *Scr_Image =new TImage(this);
Scr_Image->Width = User_Image->Width ; Scr_Image->Height = User_Image->Height ;
Scr_Image->Visible = false;
Graphics::TBitmap *BM=new Graphics::TBitmap();
BM->Width =User_Image->Width; BM->Height = User_Image->Height;
BM->PixelFormat = pf24bit;
Scr_Image->Stretch = true;
Scr_Image->Picture->LoadFromFile(sPicFile);
BM->Assign(Scr_Image->Picture->Graphic);//用这句可以兼容BMP和JPG
//然后可以对BM进行随便操作。
//randomize(); i_type = random(15) ;
// ShowPicVariety(User_Image,BM,i_type);
delete BM; delete Scr_Image;
}
[code=c]