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

DelphiÖУ¢Á÷£¢µÄÀûÓÃ

ʲôÊÇÁ÷£¿Á÷,¼òµ¥À´Ëµ¾ÍÊǽ¨Á¢ÔÚÃæÏò¶ÔÏó»ù´¡ÉϵÄÒ»ÖÖ³éÏóµÄ´¦ÀíÊý¾Ý
µÄ¹¤¾ß¡£ÔÚÁ÷ÖУ¬¶¨ÒåÁËһЩ´¦ÀíÊý¾ÝµÄ»ù±¾²Ù×÷£¬Èç¶ÁÈ¡Êý¾Ý£¬Ð´ÈëÊý¾ÝµÈ£¬
³ÌÐòÔ±ÊǶÔÁ÷½øÐÐËùÓвÙ×÷µÄ£¬¶ø²»ÓùØÐÄÁ÷µÄÁíһͷÊý¾ÝµÄÕæÕýÁ÷Ïò¡£Á÷²»
µ«¿ÉÒÔ´¦ÀíÎļþ£¬»¹¿ÉÒÔ´¦Àí¶¯Ì¬ÄÚ´æ¡¢ÍøÂçÊý¾ÝµÈ¶àÖÖÊý¾ÝÐÎʽ¡£Èç¹ûÄã¶Ô
Á÷µÄ²Ù×÷·Ç³£ÊìÁ·£¬ÔÚ³ÌÐòÖÐÀûÓÃÁ÷µÄ·½±ãÐÔ£¬Ð´Æð³ÌÐò»á´ó´óÌá¸ßЧÂʵġ£
ÏÂÃæ£¬±ÊÕßͨ¹ýËĸöʵÀý:EXEÎļþ¼ÓÃÜÆ÷¡¢µç×Ӻؿ¨¡¢×ÔÖÆOICQºÍÍøÂçÆÁÄ»
´«ÊäÀ´ËµÃ÷Delphi±à³ÌÖГÁ÷”µÄÀûÓá£ÕâЩÀý×ÓÖеÄһЩ¼¼ÇÉÔø¾­ÊǺܶàÈí
¼þµÄÃØÃܶø²»¹«¿ªµÄ£¬ÏÖÔÚ´ó¼Ò¿ÉÒÔÎÞ³¥µÄÖ±½ÓÒýÓÃÆäÖеĴúÂëÁË¡£
“ÍòÕɸߥƽµØÆð”£¬ÔÚ·ÖÎöʵÀý֮ǰ£¬ÎÒÃÇÏÈÀ´Á˽âÒ»ÏÂÁ÷µÄ»ù±¾¸ÅÄîºÍ
º¯Êý£¬Ö»ÓÐÔÚÀí½âÁËÕâЩ»ù±¾µÄ¶«Î÷ºóÎÒÃDzÅÄܽøÐÐÏÂÒ»²½¡£ÇëÎñ±ØÈÏÕæÁì»á
ÕâЩ»ù±¾·½·¨¡£µ±È»£¬Èç¹ûÄã¶ÔËüÃÇÒѾ­ºÜÊìϤÁË£¬Ôò¿ÉÒÔÌø¹ýÕâÒ»²½¡£
Ò»¡¢DelphiÖÐÁ÷µÄ»ù±¾¸ÅÄî¼°º¯ÊýÉùÃ÷
ÔÚDelphiÖУ¬ËùÓÐÁ÷¶ÔÏóµÄ»ùÀàΪTStreamÀ࣬ÆäÖж¨ÒåÁËËùÓÐÁ÷µÄ¹²Í¬ÊôÐÔ
ºÍ·½·¨¡£
TStreamÀàÖж¨ÒåµÄÊôÐÔ½éÉÜÈçÏ£º
1¡¢Size:´ËÊôÐÔÒÔ×Ö½Ú·µ»ØÁ÷ÖÐÊý¾Ý´óС¡£
2¡¢Position:´ËÊôÐÔ¿ØÖÆÁ÷ÖдæÈ¡Ö¸ÕëµÄλÖá£
TstreamÖж¨ÒåµÄÐé·½·¨ÓÐËĸö£º
1¡¢Read:´Ë·½·¨ÊµÏÖ½«Êý¾Ý´ÓÁ÷ÖжÁ³ö¡£º¯ÊýÔ­ÐÎΪ£º
   Function Read(var Buffer;Count:Longint):Longint;virtual;abstract;
   ²ÎÊýBufferΪÊý¾Ý¶Á³öʱ·ÅÖõĻº³åÇø£¬CountΪÐèÒª¶Á³öµÄÊý¾ÝµÄ×Ö½ÚÊý£¬
¸Ã·½·¨·µ»ØÖµÎªÊµ¼Ê¶Á³öµÄ×Ö½ÚÊý£¬Ëü¿ÉÒÔСÓÚ»òµÈÓÚCountÖÐÖ¸¶¨µÄÖµ¡£
2¡¢Write:´Ë·½·¨ÊµÏÖ½«Êý¾ÝдÈëÁ÷ÖС£º¯ÊýÔ­ÐÎΪ£º
   Function Write(var Buffer;Count:Longint):Longint;virtual;abstract;
   ²ÎÊýBufferΪ½«ÒªÐ´ÈëÁ÷ÖеÄÊý¾ÝµÄ»º³åÇø£¬CountΪÊý¾ÝµÄ³¤¶È×Ö½ÚÊý£¬
¸Ã·½·¨·µ»ØÖµÎªÊµ¼ÊдÈëÁ÷ÖеÄ×Ö½ÚÊý¡£
3¡¢Seek:´Ë·½·¨ÊµÏÖÁ÷ÖжÁȡָÕëµÄÒÆ¶¯¡£º¯ÊýÔ­ÐÎΪ£º
Function Seek(Offset:Longint;Origint:Word):Longint;virtual;abstract;
²ÎÊýOffsetÎªÆ«ÒÆ×Ö½ÚÊý,²ÎÊýOrigintÖ¸³öOffsetµÄʵ¼ÊÒâÒ壬Æä¿ÉÄܵÄȡֵ
ÈçÏ£º
sofromBeginning:OffsetÎªÒÆ¶¯ºóÖ¸Õë¾àÀëÊý¾Ý¿ªÊ¼µÄλÖᣴËʱOffset±ØÐë
                  ´óÓÚ»òÕßµÈÓÚÁã¡£
sofromCurrent:OffsetÎªÒÆ¶¯ºóÖ¸ÕëÓ뵱ǰָÕëµÄÏà


Ïà¹ØÎĵµ£º

Delphi Éè¼ÆÄ£Ê½£º¡¶HeadFirstÉè¼ÆÄ£Ê½¡·Delphi7´úÂë

      ÈÝÆ÷µÄÖ÷ÒªÖ°ÔðÓÐÁ½¸ö£º´æ·ÅÔªËØºÍä¯ÀÀÔªËØ¡£¸ù¾Ýµ¥Ò»Ö°ÔðÔ­Ôò£¨SRP£©Òª½«¶þÕß·Ö¿ª£¬ÓÚÊǽ«ä¯ÀÀ¹¦ÄÜ´ò°ü·â×°¾ÍÓÐÁ˵ü´úÆ÷¡£
      Óõü´úÆ÷·â×°¶Ô¶¯Ì¬Êý×éµÄ±éÀú£º
1.ÈÝÆ÷ÖеÄÔªËØÀà
{¡¶HeadFirstÉè¼ÆÄ£Ê½¡·Ö®µü´úÆ÷ģʽ }
{ ÈÝÆ÷ÖеÄÔªËØÀà ......

Delphi Éè¼ÆÄ£Ê½£º¡¶HeadFirstÉè¼ÆÄ£Ê½¡·Delphi7´úÂë

ÃüÁîģʽ¿ÉÒÔºÜÇáËɵÄʵÏÖ³·Ïú£¨Undo£©¹¦ÄÜ¡£
1. ÃüÁîµÄ½ÓÊÜÕß
unit uReceiveObject;

interface

type
TLight = class(TObject)
public
procedure Open;
procedure Off;
end;

implementation

{ TLight }

procedure TLight.Off;
begin
Writeln('Light is off.'); ......

DelphiÁ¬½ÓSQL Server 2000

Ò»¡¢ÔÚDelphi7ÖÐÁ¬½ÓMS SQL Server 2000µÄ·½·¨¡£
¸Õ¿ªÊ¼Ê±½çÃæÈçÏ£ºÌí¼Ó4¸ö¿Ø¼þ¡£
ÉèÖÿؼþÊôÐÔ¹ý³Ì£º
1¡¢ADOConnection1ÉèÖÃ
1£©Ë«»÷ADOConnection1£¬½øÐÐÉèÖÃÁ¬½Ó×Ö·û´®£¨×÷ÓÃÊÇ£ºÑ¡È¡Á¬½ÓÇý¶¯·½Ê½ºÍÁ¬½ÓµÄÊý¾Ý¿âÉèÖã©¡£¹ý³ÌÈçÏÂͼËùʾ£º
2¡¢ADOQuery1ÉèÖ㺠
1£©ADOQuery1.connectionÊôÐÔΪADOConnection1; ......

DELPHIÈçºÎÏìӦʼþ

ÓÉÓÚÏîÄ¿ÐèÒª£¬¿ªÊ¼Ñ§Ï°DELPHI£¬²¢×Ô¼º±àд´úÂëÀ´²âÊÔÓÃVCдµÄDLL£¬¾õµÃ×Ô¼ºÓÖ¶àÕÆÎÕÁËһЩ£¬²»¶ÔµÄµØ·½Ï£ÍûÖ¸Õý£¬ÎÒ»áºÃºÃѧϰ
1¡¢ÏìÓ¦¼üÅÌʼþ£º
ÒòΪKeyPreviewĬÈÏÊÇ False;ÎÒÃÇÕâÀïÐèÒªÏìÓ¦¼üÅÌʼþµÄ»°£¬ÐèÒª½«ÆäÐÞ¸ÄΪTrue£»
ËùÒÔKeyPreview:=True; Õâ¶ÔһЩ¿ì½Ý¼ü»áÓÐÓá£
ÔÚFormCreateÕâ¸öº¯ÊýÀïÐÞ¸ÄKeyPrevie ......

delphi×ÊÔ´ÎļþÖÆ×÷¼°Ê¹ÓÃÏê½â

Ò»¡¢Òý×Ó£º
ÏÖÔÚµÄWindowsÓ¦ÓóÌÐò¼¸ºõ¶¼Ê¹ÓÃͼ±ê¡¢Í¼Æ¬¡¢¹â±ê¡¢ÉùÒôµÈ£¬ÎÒÃdzÆËüÃÇΪ×ÊÔ´£¨Resource£©¡£×î¼òµ¥µÄʹÓÃ×ÊÔ´µÄ°ì·¨ÊǰÑÕâЩ×ÊÔ´µÄÔ´Îļþ´òÈëÈí¼þ°ü£¬ÒÔ·½±ã³ÌÐòÐèÒªµÄʱºòµ÷Óá£×ÊÔ´ÊdzÌÐòµÄÒ»²¿·Ö£¬³ÌÐòÒªÕý³£ÔËÐоÍÀë²»ÁË×ÊÔ´Îļþ¡£µ«ÊÇËüÊDz»¿ÉÖ´ÐдúÂë¡£
ΪÁ˸üºÃµØ¹ÜÀí×ÊÔ´£¬DelphiÖÐÌṩÁËÒ»ÖÖ.RESÀàÐ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ