Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö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ÏÂÓÃCDO·¢ËÍÓÊÏäʵÀý

Ïà¶ÔÓõÚÈý·½¿Ø¼þ£¬CDO·¢ËÍÓʼþ»¹ÊǺܼò½à·½±ãµÄ
×¢£ºCDONTSΪCDOµÄ×Ó¼¯£¬½öÖ§³ÖWinNT/Win2K£¬WinXPÒÔÉÏÇëÓÃCDO;
µ¥ÔªÒýÓÃComObj;
procedure TForm1.Button1Click(Sender: TObject);
var
VCDOMessage:oleVariant;
begin
  vCDOMessage:=CreateOleObject('CDO.Message');
  vcdomessage.from:='MR.F'+'< ......

delphi TWebBrowser×é¼þʹÓÃÏê½â

delphi TWebBrowser×é¼þʹÓÃÏê½â
      ¸Ã×é¼þÊÇÒ»¸öä¯ÀÀÆ÷×é¼þ£¬¿ÉÒÔÏÔʾһ¸öÖ¸¶¨µØÖ·µÄÍøÒ³¡¢ÉèÖÃÍøÒ³´ò¿ªÊ±µÄÖ÷Ò³ÒÔ¼°¶ÔÍøÒ³½øÐÐÏà¹ØµÄ²Ù×÷£¬Í¬Ê±Ò²¿ÉÒÔ¶ÔHTMLÎļþ½øÐмôÇС¢¸´ÖÆ¡¢Õ³Ìù¡¢É¾³ýµÈ²Ù×÷¡£¸Ã
      ×é¼þÔÚInternet×é¼þÒ³ÖС£
     ......

C# Delphi´¦Àí·ÖÎöQQЭÒé


C# Delphi´¦Àí·ÖÎöQQЭÒé
 
 
¡¡´ó¼Ò˵µ½QQЭÒé¶¼¾õµÃºÜÉñÃØ£¬ÊÇÒòΪQQ²»ÏñMSN»òÕßICQЭÒé¶¼ÒѾ­¹Ù·½¹«²¼ÁË£¬¶øQQµÄûÓй«²¼¡£Ñо¿ËüµÄÈËÒ²²»ÊÇÌØ±ðµÄ¶à£¬ËäÈ»ÒѾ­ÓÐÁË»ùÓÚ QQЭÒéËùд³ÉµÄµÚÈý·½Èí¼þ foicq, qq plugins for gaim, LumaQQ£¬µ«ÊÇÓÉÓÚËûÃÇÊÇ»ùÓÚ¶þ½øÖÆStreamµÄЭÒé¹ýÓÚ¸´ÔÓ£¬´ó¼ÒÔĶÁ´úÂëÒ²ÓÐÒ ......

Ò»¸ö·½±ãÓÐÓõÄDelphiÊý¾Ý¿â²Ù×÷Àà(ת)

unit MyADO;
interface
uses
SysUtils, Classes,ADODB,DB,Variants,StdCtrls,Dialogs;
type
TMyADO = class(TComponent)
    private
    Connection: TADOConnection;
    Query: TADOQuery;
    Table: TADOTable;
    FConnectio ......

delphi virtual dynamic

dynamic¾ÍÊÇËüÊǶ¯Ì¬·½·¨£¬Ã»Óо²Ì¬µØÖ·£¬ËùÒÔËÙ¶ÈÂýÒ»µã
virtualÊÇÐé·½·¨£¬Èç¹ûÔÚ»ùÀàÖв»ÉùÃ÷³ÉÐé·½·¨µÄ»°£¬¼Ì³Ðºó£¬¸Ã·½·¨»áÌáʾһ¾¯¸æÐÅÏ¢£¬°Ñ»ùÀàÖз½·¨ÆÁ±ÎµôÁË
---------------------------------------------------------------
¶¯Ì¬£¨Dynamic£©ºÍÐéÄ⣨Virtual£©ºó¶¼¿ÉÒÔʹÓÃOverride¹Ø¼ü×ÖÔÚÅÉÉúÀàÖжԶÔÓ¦ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ