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

Delphiº¯ÊýºÍ¹ý³Ì

     ¹ý³ÌÎÞ·µ»ØÖµ£¬º¯ÊýÓзµ»ØÖµ¡£
     procedure MyProc(m,n : Integer; o : String; p : Single = 2.5; q : String = 'Delphi');
     ÈçÉÏÀýËùʾ£¬¹ý³ÌÉùÃ÷ºÍ¶¨ÒåÖУ¬¶à¸ö²ÎÊýÊÇÓ÷ֺŸô¿ªµÄ£¬µ«ÔÚµ÷ÓÃʱÊÇÓöººÅ¸ô¿ªµÄ ¡£eg£º
     MyProc(3, 4, 'me', 3.14);
     ÉÏÀýÖÐÊ¡ÂÔÁË×îºóÒ»¸ö²ÎÊý£¬µ±Ö¸¶¨Ò»¸ö²ÎÊýµÄȱʡֵºó£¬ÆäºóµÄËùÓвÎÊý¶¼±ØÐëÖ¸¶¨Ò»¸öȱʡֵ£¬ÈçÉÏÃæµÄÉùÃ÷ÖеIJÎÊý p ºÍ q ¡£»òÕß˵£¬Ó¦¸Ã°ÑËùÓÐÖ¸¶¨Ä¬ÈÏÖµµÄ²ÎÊý·ÅÔÚ²ÎÊýÁбíµÄºóÃæ¡£
     Delphiº¯ÊýµÄÖµÓÐÁ½ÖÖ·½Ê½·µ»Ø£¬µÚÒ»£º°ÑÖµ¸³¸øº¯ÊýÃû£»µÚ¶þ£º°ÑÖµ¸³¸øResult¡£¶øResultʵ¼ÊÉÏÊǺ¯ÊýÃûµÄÒ»¸ö±ðÃû£¬Í¬Ê±ËüÒ²ÊÇÿһ¸öº¯ÊýÄÚ²¿×Ô¶¯Òþº¬µÄ¾Ö²¿±äÁ¿£¬ÆäÀàÐ͸úº¯ÊýµÄ·µ»ØÀàÐÍÏàͬ¡£
     Ò»°ãÇé¿öÏ£¬Ê¹ÓÃResult·½Ê½·µ»Øº¯ÊýÖµ£¬¶ø²»Óú¯ÊýÃûÀ´·µ»Ø¡£ÒòΪÔÚµ÷ÓÃÒ»¸öÎÞ²ÎÊýµÄº¯Êýʱֻдº¯ÊýÃû¾Í¿ÉÒÔµ÷Ó㬲»ÏñCÓïÑÔµÈÆäËüÓïÑÔÒ»Ñù¼´Ê¹ÎÞ²ÎÊýÒ²ÒªÔÚº¯ÊýÃûºó¼ÓÉÏÀ¨ºÅ£¬ÕâÑùºÜÈÝÒײ»Ð¡ÐľÍд³ÉµÝ¹éµ÷Ó㬽øÈëËÀÑ­»·¡£ÁíÍ⣬ÓÐʱºòÔÚcoding¹ý³ÌÖпÉÄÜÐèÒªÐÞ¸ÄÒѾ­¶¨Ïµĺ¯ÊýÃû£¬´ËʱÈç¹ûÓÃResult·µ»Øº¯ÊýÖµµÄ»°¾Í²»ÐèÒªÔÙÐ޸ĺ¯ÊýÌåÁË¡£
function Add:Integer;
var
  i:Integer;
begin
  Result := 0;
  for i := 1 to 100 do
    Add := Add + i;    //ËÀÑ­»·
  ShowMessage(IntToStr(Result););
end;
     ÐèҪעÒâµÄÊÇ£¬DelphiºÍÆäËûһЩÓïÑÔ²»Í¬£¬ËüµÄº¯ÊýÔÚ·µ»ØÖµµÄʱºò²¢²»ÖÐÖ¹º¯Êý±¾Éí£¬Ëü×Ü»áÖ´Ðе½º¯ÊýµÄ×îºóÒ»ÌõÓï¾ä¡£Èç¹ûÐèÒªÌáǰÍ˳ö£¬¿ÉÒÔÓà Exit£»Óï¾ä¡£


Ïà¹ØÎĵµ£º

Delphi×é¼þ¿ª·¢½Ì³ÌÖ¸ÄÏ£¨2£©¼òµ¥À©³äTEdit


ÉÏһƪ£¬½éÉÜÁË×é¼þ¿ª·¢µÄÒ»°ã¸ÅÊö£¬ÒÔ¼°×é¼þÀà²ã´Î½á¹¹µÄ¸÷¸öÀàµÄ´óÖÂÐÅÏ¢£¡ÏÖÔھͿªÊ¼Í¨¹ýʵÀý½øÐÐÀ´¼òµ¥µÄ½²ÊöÒ»ÏÂÒ»°ã×é¼þµÄ¿ª·¢¹ý³Ì£¡ÎÒÕâÀïÏȲÉÓÃ×î
»ù±¾µÄ·½Ê½À´´´½¨Ò»¸ö×é¼þ£¡Ò²¾ÍÊÇʹÓÃDelphi×Ô¼ºµÄ×é¼þ¿ª·¢Ïòµ¼À´½¨Á¢Ò»¸öеÄ×é¼þ¡£ÔÚÕâÀÎÒÒÔÀ©³äTEditΪÀý½øÐн²½â¡£
   ÄÇôÊ×ÏÈ£¬Òª½éÉܵľÍÊÇ ......

Delphi ×é¼þ¿ª·¢½Ì³ÌÖ¸ÄÏ£¨5£©ÊµÏÖÀàQQµÄ±à¼­¿ò

¾àÀëÉÏһƪϵÁеÄÎÄÕÂÓÐÒ»¶Îʱ¼äÁË£¬¼ÙÖÕÓÚÊÇ·ÅÍêÁË£¡ÏÖÔÚÔÛ¼ÌÐøÔÚTEditÉÏ×öÎÄÕ£¬Í¬Ê±À´ÊìϤijЩWindowsµÄϵͳÏûÏ¢¡£ÏÖÔÚÎÒ½²µÄÊÇÈçºÎʵÏÖÒ»¸öÀàËÆQQ±à¼­¿òµÄÑùʽ¡£
  
ÔÙ½²½â֮ǰ£¬ÏÈ»ØÀ¡Ç°¼¸ÆªÎÄÕÂÓÐЩÈËÌá³öµÄÎÊÌ⡣ͨ¹ýǰ¼¸ÆªÎÄÕ£¬ÓкܶàÈ˹Ø×¢£¬Í¬Ê±Ò²ÓÐÈ˸øÁËһЩ½¨Òé¡£ËùÒÔÎÒÕâÀï˵Ã÷һϣ¬ÎÒÕâ¸ö×é¼ ......

Delphi ÖÐ FindWindow ºÍ FindWindowEx µÄÓï·¨ºÍÓ÷¨

 Delphi ÖÐ FindWindow ºÍ FindWindowEx µÄÓï·¨ºÍÓ÷¨
FindWindow(
lpClassName,        {´°¿ÚµÄÀàÃû}
lpWindowName: PChar {´°¿ÚµÄ±êÌâ}
): HWND;              {·µ»Ø´°¿ÚµÄ¾ä±ú; ʧ°Ü·µ»Ø 0}
//FindWin ......

delphi ½Å±¾ÒýÇæ±È½Ï

TMS Scripter£ºÖ§³ÖPascalºÍVBScriptÁ½ÖÖÓï·¨¡£ÓŵãÊÇÎĵµÆëÈ«¡¢Àý×ÓÆëÈ«£¬½Å±¾¿ÉÖ±½ÓÖ§³ÖDLL£¬¹Ù·½»¹ÌṩÁ˷ḻµÄIDE Debug¹¤¾ß¡¢µ¥Ôªµ¼³öº¯Êý¹¤¾ßµÈ£¬È±µãÊDZàÒëÔËÐнÏÂý¡£for ¿ÕÑ­»·1000Íò´Î£¬ÐèÒª10ÃëÖÓÒÔÉÏ¡£TMS ScripterÊÇÉÌÒµ¹²ÏíÈí¼þ¡£
       FastScript£ºÓùýFastReport±¨±íµÄÍ¬Ñ ......

delphi µ÷ÓÃC# webservice

×ªÔØ×Ô£ºhttp://www.cnblogs.com/jdmei520/archive/2009/06/17/1505053.html
Webservice¼¼ÊõµÄ³öÏÖ½«¸÷ÖÖ¿ª·¢¼¼ÊõºÍÓïÑÔÍêÈ«µÄÈÚºÏÁË£¬ÏÂÃæ¾ÍÕâÖÖÈÚºÏÔÚC#ºÍdelphiÖ®¼äµÄ½»»¥×öÒ»´ÎÈ«ÃæµÄÌåÏÖ
1.ʹÓÃC#´´½¨Ò»¸öWebservice·þÎñ¡£
ʹÓÃvs2005µÄÄ£°å´´½¨C#µÄwebservice·Ç³£ÈÝÒס£Ô­ÎļþÈçÏÂ:
[WebService(Namespace  ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ