Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

Delphiµ÷ÓÃÍⲿ³ÌÐòÏê½â

WinExecÖ÷ÒªÔËÐÐEXEÎļþ¡£È磺
WinExec("Notepad.exe Readme.txt", SW_SHOW);
ShellExecute²»½ö¿ÉÒÔÔËÐÐEXEÎļþ£¬Ò²¿ÉÒÔÔËÐÐÒѾ­¹ØÁªµÄÎļþ¡£
Ê×ÏȱØÐëÒýÓÃshellapi.pasµ¥Ôª£ºuses ShellAPI; 
1.±ê×¼Ó÷¨ 
¡¡¡¡ ShellExecuteº¯ÊýÔ­Ðͼ°²ÎÊýº¬ÒåÈçÏ£º 
function ShellExecute(hWnd: HWND; Operation, FileName, Parameters,Directory: PChar; ShowCmd: Integer): HINST; stdcall; 
¡ñhWnd£ºÓÃÓÚÖ¸¶¨¸¸´°¿Ú¾ä±ú¡£µ±º¯Êýµ÷Óùý³Ì³öÏÖ´íÎóʱ£¬Ëü½«×÷ΪWindowsÏûÏ¢´°¿ÚµÄ¸¸´°¿Ú¡£ÀýÈ磬¿ÉÒÔ½«ÆäÉèÖÃΪӦÓóÌÐòÖ÷´°¿Ú¾ä±ú£¬¼´Application.Handle£¬Ò²¿ÉÒÔ½«ÆäÉèÖÃΪ×ÀÃæ´°¿Ú¾ä±ú£¨ÓÃGetDesktopWindowº¯Êý»ñµÃ£©¡£ 
¡ñOperation£ºÓÃÓÚÖ¸¶¨Òª½øÐеIJÙ×÷¡£ÆäÖГopen”²Ù×÷±íʾִÐÐÓÉFileName²ÎÊýÖ¸¶¨µÄ³ÌÐò£¬»ò´ò¿ªÓÉFileName²ÎÊýÖ¸¶¨µÄÎļþ»òÎļþ¼Ð£»“print”²Ù×÷±íʾ´òÓ¡ÓÉFileName²ÎÊýÖ¸¶¨µÄÎļþ£»“explore”²Ù×÷±íʾä¯ÀÀÓÉFileName²ÎÊýÖ¸¶¨µÄÎļþ¼Ð¡£µ±²ÎÊýÉèΪnilʱ£¬±íʾִÐÐĬÈϲÙ×÷“open”¡£ 
¡ñFileName£ºÓÃÓÚÖ¸¶¨Òª´ò¿ªµÄÎļþÃû¡¢ÒªÖ´ÐеijÌÐòÎļþÃû»òÒªä¯ÀÀµÄÎļþ¼ÐÃû¡£ 
¡ñParameters£ºÈôFileName²ÎÊýÊÇÒ»¸ö¿ÉÖ´ÐгÌÐò£¬Ôò´Ë²ÎÊýÖ¸¶¨ÃüÁîÐвÎÊý£¬·ñÔò´Ë²ÎÊýӦΪnil»òPChar(0)¡£ 
¡ñDirectory£ºÓÃÓÚÖ¸¶¨Ä¬ÈÏĿ¼¡£ 
¡ñShowCmd£ºÈôFileName²ÎÊýÊÇÒ»¸ö¿ÉÖ´ÐгÌÐò£¬Ôò´Ë²ÎÊýÖ¸¶¨³ÌÐò´°¿ÚµÄ³õʼÏÔʾ·½Ê½£¬·ñÔò´Ë²ÎÊýÓ¦ÉèÖÃΪ0¡£ 
ÈôShellExecuteº¯Êýµ÷Óóɹ¦£¬Ôò·µ»ØÖµÎª±»Ö´ÐгÌÐòµÄʵÀý¾ä±ú¡£Èô·µ»ØÖµÐ¡ÓÚ32£¬Ôò±íʾ³öÏÖ´íÎó¡£ 
ÉÏÊö½ö½öÊÇShellExecuteº¯ÊýµÄ±ê×¼Ó÷¨£¬ÏÂÃæ½«½éÉÜËüµÄÌØÊâÓ÷¨¡£ 
2.ÌØÊâÓ÷¨ 
¡¡¡¡Èç¹û½«FileName²ÎÊýÉèÖÃΪ“http:”ЭÒé¸ñʽ£¬ÄÇô¸Ãº¯Êý½«´ò¿ªÄ¬ÈÏä¯ÀÀÆ÷²¢Á´½Óµ½Ö¸¶¨µÄURLµØÖ·¡£ÈôÓû§»úÆ÷Öа²×°Á˶à¸öä¯ÀÀÆ÷£¬Ôò¸Ãº¯Êý½«¸ù¾ÝWindows 9x/NT×¢²á±íÖÐhttpЭÒé´¦Àí³ÌÐò£¨Protocols Handler£©µÄÉèÖÃÈ·¶¨Æô¶¯Äĸöä¯ÀÀÆ÷¡£ 
¡¡¸ñʽһ£ºhttp://ÍøÕ¾ÓòÃû¡£È磺 ShellExecute(handle,"open","http://www.neu.edu.cn",nil,nil,SW_SHOWNORMAL); 
¸ñʽ¶þ£ºhttp://ÍøÕ¾ÓòÃû/ÍøÒ³ÎļþÃû¡£  È磺ShellExecute(handle,"open","http://www.neu.edu.cn/default.htm",nil ,nil , SW_SHOWNORMAL); 
Èç¹û½«FileName²ÎÊýÉèÖÃΪ"mailto:"ЭÒé¸ñʽ£¬ÄÇô¸


Ïà¹ØÎĵµ£º

VC Delphi Êý¾ÝÀàÐÍ


Delphi Êý¾ÝÀàÐÍÁбí
·ÖÀà
·¶Î§
×Ö½Ú
±¸×¢
¼òµ¥ÀàÐÍ
ÐòÊý
ÕûÊý
Integer
-2147483648 .. 2147483647
4
ÓзûºÅ32λ
Cardinal
0 .. 4294967295
4
ÎÞ·ûºÅ32λ
Shortint
-128 .. 127
1
ÓзûºÅ8λ
Smallint
-32768 .. 32767
2
ÓзûºÅ16λ
Longint
-2147483648 .. 2147483647
4
ÓзûºÅ32λ
Int64
- ......

delphi ¶Ô×Ö·û´®½øÐе¹ÐòµÄ×î¿ìËã·¨

var
   L,i:integer;
   Ustr,str:string;
   p:char;
begin
  str:='123456789ABCDEFG'
  L:=length(str);
  for i:=1 to l do begin
      p:=str[i];
      str[i]:=str[l-(i-1)];
     ......

Delphi±àдϵͳ·þÎñÆß£ºÍê³É¶Ë¿ÚÑÝʾ ÊÕ²Ø

Delphi±àдϵͳ·þÎñÆß£ºÍê³É¶Ë¿ÚÑÝʾ ÊÕ²Ø
 ÔÚ¿ª·¢´óÁ¿Socket²¢·¢·þÎñÆ÷£¬Íê³É¶Ë¿Ú¼ÓÖØµþI/OÊÇÆù½ñΪֹ×îºÃµÄÒ»ÖÖ½â¾ö·½°¸£¬ÏÂÃæÊǼòµ¥µÄ½éÉÜ£º
   “Íê³É¶Ë¿Ú”Ä£ÐÍÊÇÆù½ñΪֹ×îΪ¸´ÔÓµÄÒ»ÖÖI/OÄ£ÐÍ£¬ÌرðÊʺÏÐèҪͬʱ¹ÜÀíΪÊýÖÚ¶àµÄÌ×½Ó×Ö£¬²ÉÓÃÕâÖÖÄ£ÐÍ£¬ÍùÍù¿ÉÒÔ´ïµ½×î¼ÑµÄϵͳÐÔÄÜ¡£µ«ÊÇÖ ......

[delphi×é¼þ] WebbrowserµÄʹÓÃ

delphiÖÐWebbrowserµÄʹÓÃ
1.»ñµÃÍøÒ³ÖбäÁ¿Öµ
     htmÖÐ<script> var currID=123</script>
     ³ÌÐòÖпÉÒÔÕâôµ÷Óà id := Form1.WebBrowser1.OleObject.Document.script.currID
     ÖµµÃ˵Ã÷µÄÊÇ,±äÁ¿¿ÉÒÔÊÇjavascript¶¨ÒåµÄ,Ò²¿ÉÒÔÊÇvbs ......

Ò»Ãûdelphi³ÌÐòÔ±Òª¿ªÊ¼Ñ§Ï°JavaME

ÎÒһֱʹÓÃDelphi6¿ª·¢Èí¼þ£¬¿´µ½CSDNÉϵÄOPhoneÊÖ»ú¿ª·¢£¬ÓÖÈ¥GoogleÒ»·¬£¬Ìý˵±àдÊÖ»úÈí¼þ
ÄÜ׬Ǯ£¬ËùÒÔҪѧϰJava ME£¬¶ÁÁ˼¸Ì첩ÎÄ£¬´ó¶àÊý¸ÅÄî¸ãÇå³þÁË¡£
ҪѧJavaME¾ÍµÃÏÈѧJavaSE£¬ËùÒÔ×°Á˺ܶàÈí¼þ(²»×°ÄÇô¶à£¬OPhone¾Í×°²»ÉÏÈ¥)¡£
ÍÆ¼öһƪÓÅÐãµÄÎÄÕ£º
ÔÚ NetBeans IDE ÖÐÉè¼Æ Swing GUI
¶ÁÍêÕâÆªÎÄÕ£¬³õ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ