delphi ¶Ô RESÎļþµÄʹÓÃ
Ò»¡¢Òý×Ó£º
ÏÖÔÚµÄWindowsÓ¦ÓóÌÐò¼¸ºõ¶¼Ê¹ÓÃͼ±ê¡¢Í¼Æ¬¡¢¹â±ê¡¢ÉùÒôµÈ£¬ÎÒÃdzÆËüÃÇΪ×ÊÔ´£¨Resource£©¡£×î¼òµ¥µÄʹÓÃ×ÊÔ´µÄ°ì·¨ÊǰÑÕâЩ×ÊÔ´µÄÔ´Îļþ´òÈëÈí¼þ°ü£¬ÒÔ·½±ã³ÌÐòÐèÒªµÄʱºòµ÷Óá£×ÊÔ´ÊdzÌÐòµÄÒ»²¿·Ö£¬³ÌÐòÒªÕý³£ÔËÐоÍÀë²»ÁË×ÊÔ´Îļþ¡£µ«ÊÇËüÊDz»¿ÉÖ´ÐдúÂë¡£
ΪÁ˸üºÃµØ¹ÜÀí×ÊÔ´£¬DelphiÖÐÌṩÁËÒ»ÖÖ.RESÀàÐ͵Ä×ÊÔ´Îļþ¡£Ëü¿ÉÒÔ°ÑÎÒÃdzÌÐòÖÐËùÐèÒªµÄ×ÊÔ´ÕûºÏµ½Ò»¸ö×ÊÔ´Îļþ(.RES)ÏÂÀ´¡£ÔÚ±àÒëÓ¦ÓóÌÐòʱֱ½Ó±àÒë½øÁË¿ÉÖ´ÐгÌÐòÀ³ÉΪӦÓóÌÐòµÄÕûºÏÌå¡£
ÕâÑù×öµÄºÃ´¦ÊÇ£º1¡£ÓÉÓÚ¶¨Î»×ÊÔ´±ÈÔÚ´ÅÅÌÖж¨Î»Îļþ»¨·Ñʱ¼äÉÙ£¬ËùÒÔÓ¦ÓóÌÐòÖ´Ðлá¸ü¿ì¡£2¡£¶àÖÖ×ÊÔ´¿ÉÒÔ·ÅÔÚÒ»¸öÎļþÖУ¬¼õÉÙÁËͼ±ê¡¢Í¼Æ¬¡¢¹â±ê¡¢ÉùÒôµÈÎļþÊýÁ¿¡£²»ÓÃÅÂÓû§ÔÚʹÓùý³ÌÖеIJ»Ð¡ÐĶøËð»µÁË×ÊÔ´ÎļþÖÂʹ³ÌÐòÎÞ·¨Õý³£ÔËÐС£
ȱµãÊÇ£ºÒòΪ×ÊÔ´ÎļþµÄ¼ÓÈë´Ó¶ø¼Ó´óÁ˱àÒë³öµÄ¿ÉÖ´ÐгÌÐòµÄ×Ö½ÚÊý£¬µ±×ÊÔ´Îļþ½Ï´óʱ»áʹӦÓóÌÐò±äµÃ¿´ÆðÀ´ÓºÖס£
ʹÓÃ×ÊÔ´ÎļþµÄÓŵãºÜÏÔÖø£¬ÆäȱµãÒ²ºÜÍ»³ö¡£ËùÒÔÔÚʵ¼ÊÓ¦ÓÃÖоÍÒª¸ù¾ÝÇé¿öȨºâÀû±×¡¢Áé»îʹÓã¬ÕâÒѲ»ÔÚ±¾ÎĵÄÌÖÂÛÖ®ÁС£ÏÂÃæ½ö¾ÍDelphiϵͳ±à³ÌÖжÔÓÚ×ÊÔ´ÎļþµÄʹÓ÷½·¨×öÒ»¸ö´óÖµÄ×ܽᡣ
¶þ¡¢´´½¨×ÊÔ´Îļþ£º
×¢ÒâÊÂÏ´´½¨µÄ×ÊÔ´ÎļþÃû²»ÒªºÍ¹¤³ÌÃûÏàͬ£¬ÒòΪDelphi´´½¨¹¤³Ìʱ»á×Ô¶¯´´½¨Ò»¸öºÍ¹¤³ÌÃûÏàͬµÄ×ÊÔ´Îļþ¡£²¢ÇÒ×îºÃ½«×ÊÔ´Îļþ±£´æµ½ºÍ¹¤³ÌÎļþͬһ¸öÎļþ¼ÐÖС£
1£®Ê×ÏÈ´´½¨Ò»¸ö.RcµÄ´¿Îı¾Îļþ¡£¸ñʽÈçÏ£º
×ÊÔ´±êʶ·û ¹Ø¼ü×Ö ×ÊÔ´ÎļþÃû
¸ñʽ˵Ã÷£º
¢Ù ×ÊÔ´±êʶ·û£º³ÌÐòÖе÷ÓÃ×ÊԴʱµÄÌØ¶¨±êºÅ£»
¢Ú ¹Ø¼ü×Ö£º±êʶ×ÊÔ´ÎļþÀàÐÍ£»ÀýÈ磺
Wave £º ×ÊÔ´ÎļþÊÇÉùÒôÎļþ£»
RCDATA£º JPEGÎļþ£»
AVI £º AVI¶¯»£»
ICON £º ͼ±êÎļþ£»
BITMAP£º λͼÎļþ£»
CURSOR£º ¹â±êÎļþ£»
Ïà¹ØÎĵµ£º
1.ÏÂÔØJNativeµÄ°ü
JNative-1.3.2ÏÂÓÐÈý¸öÎļþ£ºJNativeCpp.dll£¬libJNativeCpp.so£¬JNative.jar¡£
JNativeCpp.dll¿½µ½windows/system32Ŀ¼ÏÂ
libJNativeCpp.soΪLinuxÖÐʹÓõÄÎļþ
JNative.jarÀ©Õ¹°ü¿½µ½%JAVA_HOME%\jre\lib\extÏ»òÕßµ¼Èëµ½¹¤³ÌÖÐ
2.JnativeÖÐʹÓõ½µÄһЩÀàºÍ·½·¨
org
.xvolks
.jnative
.Jnat ......
¿ª·¢Õß¶¼Ï£Íû×Ô¼ºµÄ³ÌÐòÓÐÒ»¸öÓѺõĽçÃæ£¬´Ëʱ£¬Ò»¸öÉú¶¯»îÆÃ¡¢ÓбíÏÖÁ¦µÄ¹â±ê¾Í±Ø²»¿ÉÉÙÁË¡£Windows ȱʡÌṩ22ÖÖ±ê×¼¹â±ê¹©ÔÚ³ÌÐòÖе÷Ó㬵«¶ÔÒ»¸öÇóÐÂÇó±äµÄ³ÌÐòÔ±À´Ëµ£¬±ê×¼¹â±ê¾Í²»ÄÜÂú×ãÒªÇóÁË£¬ÐèҪʹÓÃ×Ô¼ºµÄ¹â±ê£¬ÄÇô£¬ÔÚ³ÌÐòÖÐÔõÑùʹÓÃ×Ô¼ºµÄ¹â±êÄØ£¿ ¡¡¡¡¡ñ¹â±ê×ÊÔ´µÄ»ñµÃ ¡¡¡¡ÒªÊ¹ÓÃ×Ô¶¨Òå¹â±ê£¬±ØÐëÏȵõ½Õâ ......
VCÉùÃ÷
HANDLE CreateMutex(
¡¡¡¡LPSECURITY_ATTRIBUTES lpMutexAttributes, // SD
¡¡¡¡BOOL bInitialOwner, // initial owner
¡¡¡¡LPCTSTR lpName // object name
¡¡¡¡);
delphiÉùÃ÷£º
function CreateMutex(lpMutexAttributes: PSecurityAttributes; bInitialOwner: BOOL; lpName: PChar): THandle; stdcall;
´´½ ......
³£Íü¼Ç£¬ÔÚ´Ë×ö±Ê¼Ç¡£
Õ⼸¸öº¯Êý¶¼°üº¬ÔÚStrUtilsÖУ¬ËùÒÔÐèÒªuses StrUtils;
¼ÙÉè×Ö·û´®ÊÇ Dstr := ’Delphi is the BEST’, ÄÇô
LeftStr(Dstr, 5) := ’Delph’
MidStr(Dstr, 6, 7) := ’ ......
ÖØÔØ CreateParams ·½·¨¼´¿É
ÉùÃ÷£º
procedure CreateParams(var Params: TCreateParams);override;
procedure TForm2.CreateParams(var Params: TCreateParams);
begin
inherited;
Params.WndParent := 0;
end; ......