Dephi中資源文件的應用

領測軟件測試網

 Image1.Picture.Bitmap.Handle :=LoadBitmap(hInstance,’資源標識符’); 
end;  
  注：如果位圖沒有裝載成功，程序仍舊執行，但是Image將不再顯示圖片�？梢愿鶕﨤oadBitmap 函數的返回值判斷是否裝載成功，如果裝載成功返回值是非0，如果裝載失敗返回值是0。 
  另外一個存取顯示位圖的方法如下： 
procedure TfrMain.btnLoadPicClick(Sender: TObject);  
begin  
 Image1.Picture.Bitmap.LoadFromResourceName(hInstance,’資源標識符’);  
end;  
  2。存取資源文件中的光標  
  Screen.Cursors[]是一個光標數組，使用光標文件我們可以將定制的光標加入到這個屬性中。因為默認的光標在數組中索引值是0，所以除非想取代默認光標，最好將定制的光標索引值設為1。  
procedure TfrMain.btnUseCursorClick(Sender: TObject); 
begin 
  Screen.Cursors[1] :=LoadCursor(hInstance,’資源標識符’); 
  Image1.Cursor :=1; 
end; 
  3。存取資源文件中的圖標 
  將圖標放在資源文件中，可以實現動態改變應用程序圖標。 
procedure TfrMain.LoadIconClick(Sender: TObject); 
begin 
  Application.Icon.Handle := LoadIcon(hInstance,’資源標識符’); 
End; 
  4。存取資源文件中的AVI 
  在工程中添加一TAnimate控件(在Win32控件面板上)，在需要的地方加入： 

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