本文整理自网络,侵删。
TPicture 转 TBitmap
TempBmp.width:=100;
TempBmp.height:=100;
TempBmp.canvas.Draw(0,0,m_PicMouseOn.Graphic);//PicMouseOnj是TPictrue类型;
TBitmap转 TPicture
PicMouseOnj.Pictrue.Graphic:=TempBmp;//TempBmp是TBitmap类型
相关阅读 >>
Delphi getsys32path()得到系统system32路径
更多相关阅读请进入《Delphi》频道 >>