Dephi中資源文件的應用

領測軟件測試網

Result := false; 
end; 
end; 
---------------------------------------------------------------------- 
(二)中級應用篇: 
 上面我們已經知道如何把一副BMP圖像從資源文件里面讀出來,但是BMP文件太大了,JPG文件應用的相對較多.那么如何把JPG圖像讀出來呢?用資源文件加流方式即可。具體方法如下: 
(1)MyJpg JPEG　My.JPG 
(2)Var 
　　　Stream:TStream; 
　　　MyJpg:TJpegImage; 
　　Begin 
　　　Stream：＝TResourceStream.Cceat(HINSTANCE,’MyJpg’,’JPEG’); 
　　　Try 
　　　　　MyJpg:=TJpegImage.Create; 
　　　　Try 
　　　　　　MyJpg.LoadfromStream(Stream); 
　　　　　　Image1.Picture.Assignc(MyJpg); 
　　　　Finally 
　　　　　　MyJpg.Free; 
　　　　end; 
　　　Finally 

文章來源于領測軟件測試網 http://www.kjueaiud.com/