DelphiÖÐ×ÊÔ´ÎļþʹÓ÷½·¨Ïêϸ½²Êö
Ò»£®±àд RC ½Å±¾Îı¾
¡¡¡¡ÓüÇʱ¾»òÆäËüÎı¾±à¼Æ÷±àдһ¸öÀ©Õ¹ÃûΪ“.rc”µÄÎļþ¡£¸ñʽÈçÏ£º
¡¡¡¡AVI ÎÞÉù¶¯»
¡¡¡¡BITMAP λͼÎļþ
¡¡¡¡CURSOR ¹â±êÎļþ
¡¡¡¡ICON ͼ±êÎļþ
¡¡¡¡WAVE ÉùÒôÎļþ
ÒÔÉÏËùÁоùΪ±ê×¼×ÊÔ´ÀàÐÍ£¬Ò²¿ÉÒÔ¸ø×ÊÔ´×Ô¶¨ÒåÒ»¸öÀàÐÍ£¬È磺“mytype”¡£²»¹ýÁ½ÕßÔÚµ÷Ó÷½Ê½ÉÏÓÐЩ²»Í¬¡£
¶þ£®¸ù¾Ý RC ½Å±¾Îļþ±àÒë³É RES ×ÊÔ´Îļþ
¡¡¡¡ÔÚÃüÁîÌáʾ·ûÖÐÊäÈëÒÔÏÂÄÚÈÝ£º brcc32 FileName.rc //×¢£ºbrcc32.exeÔÚDelphiX\BinĿ¼ÖÐ
Èý£®ÔÚDelphiµ¥ÔªÖмÓÈë×ÊÔ´Îļþ
½«Éú³ÉµÄ RES ×ÊÔ´Îļþ¸´ÖƵ½ÏàÓ¦³ÌÐòËùÔÚµÄĿ¼ÖУ¬ÔÚµ¥ÔªÎļþÖеē{$R *DFM}”ºóÃæ¼ÓÉÏ“{$R FileName.res}”£¬±àÒëºó×ÊÔ´Îļþ¾Í±»°üº¬ÔÚ¿ÉÖ´ÐÐÎļþÖÐÁË¡£
˵Ã÷£ºÈç¹ûÏÓ2¡¢3Á½²½Âé·³£¬¿ÉÒÔ²ÉÓøü¼ò±ãµÄ×ö·¨£¬¼´£º½« RC ÎļþÖ±½ÓÌí¼Óµ½ÏîÄ¿ÖУ¬ÔÚ±àÒëDelphiÏîĿʱ£¬»á×Ô¶¯±àÒë¸Ã×ÊÔ´Îļþ¡£
ËÄ£®×ÊÔ´Îļþµ÷ÓÃʾÀý
¡¡¡¡£¨1£©´æÈ¡×ÊÔ´ÎļþÖеÄλͼ
//RC: testBmp bitmap res\test.bmp
Image1.Picture.Bitmap.LoadfromResourceName(HInstance, 'res\test.bmp');
//RC: testBmp bmptype res\test.bmp
var
resStream: TResourceStream;
begin
resStream := TResourceStream.Create(HInstance, 'testBmp', 'bmptype');
Image1.Picture.Bitmap.LoadfromStream(resStream);
resStream.Free;
end;
Çë×¢ÒâÉÏÃæÁ½ÖÖµ÷Ó÷½Ê½µÄ²»Í¬Ö®´¦¡£
£¨2£©´æÈ¡×ÊÔ´ÎļþÖеÄͼ±ê
½«Í¼±ê·ÅÔÚ×ÊÔ´ÎļþÖУ¬¿ÉÒÔʵÏÖ¶¯Ì¬¸Ä±äÓ¦ÓóÌÐòµÄͼ±ê¡£
//RC: testIcon icon res\test.ico
Application.Icon.Handle := LoadIcon(HInstance, 'testIcon');
£¨3£©´æÈ¡×ÊÔ´ÎļþÖеÄAVI¶¯»
//RC:
Ïà¹ØÎĵµ£º
ÓÃwebbrowser¿Ø¼þµÇ¼ºÍÏÔÊ¾ÍøÒ³
MSHTMLÊÇ΢Èí¹«Ë¾µÄÒ»¸öCOM×é¼þ£¬¸Ã×é¼þ·â×°ÁËHTMLÓïÑÔÖеÄËùÓÐÔªËØ¼°ÆäÊôÐÔ£¬Í¨¹ýÆäÌṩµÄ±ê×¼½Ó¿Ú£¬¿ÉÒÔ·ÃÎÊÖ¸¶¨ÍøÒ³µÄËùÓÐÔªËØ£®MSHTML¶ÔÏóÄ£ÐÍÊÇÓÉһЩ¶ÔÏóºÍ¼¯ºÏ×é³ÉµÄ£®´¦ÓÚ¸ù²¿µÄÊÇHTML£¬ÃèÊöÁË´ò¿ªÒ³ÃæµÄ1¸ö´°¿Ú£¬°üÀ¨Ò»ÏµÁм¯ºÏºÍ¶ÔÏó¡£ÈçFrames¼¯ºÏ£¬History£¬Location£¬Navigat ......
ÓÉÓÚÐèÒªÔÚ´°ÌåÖÐÉ趨һ¸öÈÕÆÚʱ¼ä£¬³öȥͨÓÃÐÍ¿¼ÂÇ£¬²ÉÓÃÁËTDateTimePicker¿Ø¼þ¡£
ÒòΪÕâ¸ö¿Ø¼þµÄĬÈÏ״ֻ̬ÄÜÏÔʾÈÕÆÚ£¬Ôì³ÉʹÓÃÉϵIJ»±ã£¬ËùÒÔÐèÒª×öÈçϵÄÉ趨£º
ÔڿؼþµÄformatÊôÐÔÀ¸ÀïÉèÖÃÈçÏÂÖµ£ºyyyy-mm-dd hh:mm:ss£»
É趨Íê³ÉºóµÄʱ¼äΪµ±Ç°µÄϵͳʱ¼ä£¬²»ÄÜͨ¹ýµ¯³öÈÕÀúÉ趨£¬Ö»ÄÜÔÚÎı¾¿òÖÐÉ趨¡£ ......
Delphi 7ʼþµÄ¶à´¦Àí»úÖÆ
Allen Tao
2007-08-19
¡¡¡¡Ê×ÏȽâÊÍÒ»ÏÂÕâ¸öÌâÄ¿¡£ÔÚÎÒʹÓÃDelphi 7µÄ¹ý³ÌÖз¢ÏÖ£¬Ò»¸ö¶ÔÏóµÄʼþÖ»Äܱ»Ò»¸ö¹ý³Ì´¦Àí¡£Èç¹û¶à´Î¸øÕâ¸ö¶ÔÏóµÄʼþ¸³¸ø´¦ÀíʼþµÄ¹ý³Ì£¬×îºóÕæÕý´¦ÀíʼþµÄ½«ÊÇ×îºó¸³ÖµµÄÄǸö¹ý³Ì¡£ÀýÈ磬ÓÐÀàTMyClassÖж¨ÒåÁËÒ»¸öʼþOnSomeFired£¬ÔÚÀàTClientClassÖи ......
WinExecÖ÷ÒªÔËÐÐEXEÎļþ¡£È磺
WinExec("Notepad.exe Readme.txt", SW_SHOW);
ShellExecute²»½ö¿ÉÒÔÔËÐÐEXEÎļþ£¬Ò²¿ÉÒÔÔËÐÐÒѾ¹ØÁªµÄÎļþ¡£
Ê×ÏȱØÐëÒýÓÃshellapi.pasµ¥Ôª£ºuses ShellAPI;
1.±ê×¼Ó÷¨
¡¡¡¡ ShellExecuteº¯ÊýÔÐͼ°²ÎÊýº¬ÒåÈçÏ£º
function ShellExecute(hWnd: HWND; Operati ......