Dephi中資源文件的應用

領測軟件測試網

　　procedure TForm1.FormCreate(Sender:TObject);  

　　begin  

　　screen.cursors[crhand]:=loadcursor(Hinstance,’hand’);  

　　panel1.cursor:=crhand;  

　　end;  

　　除了編寫上面的代碼以外,我們還需要做的一項工作是將資源文件加入到項目文件當中去,編譯指令中的{$Rfilename}偽指令讓我們來增加資源文件，讓我們來看一看項目文件的代碼。  

　　program PCUR;  

　　uses Forms,  

　　HANDin’HAND.pas’{Form1};  

　　{$R*.RES}  

　　//這里的*意義為在程序編譯以后會產生一個與項目文件同名的資源文件，在這里為PCUR.RES文件,這部分是自動產生的。  

　　{$Rhand.res}//這部分是我們自己加入的自定義資源文件，這兩個資源文件(HAND.RES和//PCUR.RES中的資源都會附加在可執行文件PCUR.EXE的后面。  

　　begin  

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