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

Delphi TStream Ïêϸ½éÉÜ

Delphi TStream Ïêϸ½éÉÜ
Stream¶ÔÏó£¬ÓÖ³ÆÁ÷ʽ¶ÔÏó£¬ÊÇTStream¡¢THandleStream¡¢TFileStream¡¢TMemoryStream¡¢TResourceStreamºÍTBlobStreamµÈµÄͳ³Æ¡£ËüÃÇ·Ö±ð´ú±íÁËÔÚ¸÷ÖÖý½éÉÏ´æ´¢Êý¾ÝµÄÄÜÁ¦£¬ËüÃǽ«¸÷ÖÖÊý¾ÝÀàÐÍ(°üÀ¨¶ÔÏóºÍ²¿¼þ) 
ÔÚÄÚ´æ¡¢Íâ´æºÍÊý¾Ý¿â×Ö¶ÎÖеĹÜÀí²Ù×÷³éÏóΪ¶ÔÏó·½·¨£¬²¢ÇÒ³ä·ÖÀûÓÃÁËÃæÏò¶ÔÏó¼¼ÊõµÄÓŵ㣬ӦÓóÌÐò¿ÉÒÔÏ൱ÈÝÒ×µØÔÚ¸÷ÖÖStream¶ÔÏóÖп½±´Êý¾Ý¡£
¡¡¡¡ÏÂÃæ½éÉܸ÷ÖÖ¶ÔÏóµÄÊý¾ÝºÍ·½·¨¼°Ê¹Ó÷½·¨¡£
TStream¶ÔÏó
¡¡¡¡TStream¶ÔÏóÊÇÄÜÔÚ¸÷ÖÖý½éÖд洢¶þ½øÖÆÊý¾ÝµÄ¶ÔÏóµÄ³éÏó¶ÔÏó¡£´ÓTStream ¶ÔÏó¼Ì³ÐµÄ¶ÔÏóÓÃÓÚÔÚÄÚ´æ¡¢Windows×ÊÔ´Îļþ¡¢´ÅÅÌÎļþºÍÊý¾Ý¿â×ֶεÈý½éÖд洢Êý¾Ý¡£
¡¡ StreamÖж¨ÒåÁËÁ½¸öÊôÐÔ£ºSizeºÍPosition¡£ËüÃÇ·Ö±ðÒÔ×Ö½ÚΪµ¥Î»±íʾµÄÁ÷µÄ´óСºÍµ±Ç°Ö¸ÕëλÖá£TStreamÖж¨ÒåµÄ·½·¨ÓÃÓÚÔÚ¸÷ÖÖÁ÷ÖжÁ¡¢Ð´ºÍÏ໥¿½±´¶þ½øÖÆÊý¾Ý¡£ÒòΪËùÓеÄStream¶ÔÏó¶¼ÊÇ´ÓTStreamÖм̳ÐÀ´µÄ£¬ËùÒÔÔÚTStreamÖж¨ÒåµÄÓòºÍ·½·¨¶¼Äܱ»Stream¶ÔÏóµ÷ÓúͷÃ
ÎÊ¡£´ËÍ⣬ÓÖÓÉÓÚÃæÏò¶ÔÏó¼¼ÊõµÄ¶¯Ì¬Áª±à¹¦ÄÜ£¬TStreamΪ¸÷ÖÖÁ÷µÄÓ¦ÓÃÌṩÁËͳһµÄ½Ó¿Ú£¬¼ò»¯ÁËÁ÷µÄʹÓ㻲»Í¬Stream¶ÔÏóÊdzéÏóÁ˶Բ»Í¬´æ´¢Ã½½éµÄÊý¾ÝÉϵIJÙ×÷£¬Òò´Ë£¬TStreamµÄÐè·½·¨ÎªÔÚ²»Í¬Ã½½é¼äµÄÊý¾Ý¿½±´ÌṩÁË×î¼ò½ÝµÄÊֶΡ£
TStreamµÄÊôÐԺͷ½·¨
¡¡¡¡1. PositionÊôÐÔ¡¡
     ÉùÃ÷£ºproperty Position: Longint; 
¡¡¡¡PositionÊôÐÔÖ¸Ã÷Á÷ÖжÁдµÄµ±Ç°Æ«ÒÆÁ¿¡£
¡¡¡¡2. SizeÊôÐÔ
¡¡¡¡ÉùÃ÷£ºproperty Size: Longint; 
     SizeÊôÐÔÖ¸Ã÷ÁËÒÔ×Ö½ÚΪµ¥Î»µÄÁ÷µÄµÄ´óС£¬ËüÊÇÖ»¶ÁµÄ¡£
¡¡¡¡3. Copyfrom·½·¨
¡¡¡¡ÉùÃ÷£ºfunction Copyfrom(Source: TStream; Count: Longint): Longint; 
     Copyfrom´ÓSourceËùÖ¸¶¨µÄÁ÷Öп½±´Count¸ö×Ö½Úµ½µ±Ç°Á÷ÖУ¬ ²¢½«Ö¸Õë´Óµ±Ç°Î»ÖÃÒƶ¯Count¸ö×Ö½ÚÊý£¬º¯Êý·µ»ØÖµÊÇʵ¼Ê¿½±´µÄ×Ö½ÚÊý¡£
¡¡¡¡4. Read·½·¨
¡¡¡¡ÉùÃ÷£ºfunction Read(var Buffer; Count: Longint): Longint; virtual; abstract; 
     Read·½·¨´Óµ±Ç°Á÷Öеĵ±Ç°Î»ÖÃÆð½«Count¸ö×Ö½ÚµÄÄÚÈݸ´ÖƵ½BufferÖУ¬²¢°Ñµ±Ç°Ö¸ÕëÏòºóÒƶ¯Count¸ö×Ö½ÚÊý£¬º¯Êý·µ»ØÖµÊÇʵ¼Ê¶ÁµÄ×Ö½ÚÊý¡£Èç¹û·µ»ØֵСÓÚCount£¬ÕâÒâζ×ŶÁ²Ù×÷ÔÚ¶ÁÂúËùÐè×Ö½ÚÊýÇ°Ö¸ÕëÒѾ­µ½´ïÁËÁ÷µÄβ²¿¡£
¡¡¡¡Read·½·¨ÊdzéÏó·½·¨¡£Ã¿¸öºó¼ÌStream¶ÔÏó¶¼Òª¸ù¾Ý×Ô¼º


Ïà¹ØÎĵµ£º

Delphi±éÀúPanel×é¼þÉϵÄËùÓпؼþ

procedure frmMain.CLS; //Ö÷´°Ìå×Ô¶¨ÒåʼþCLS
var i:integer;
begin
  for i:=0 to panel5.ControlCount -1 do
  begin
    if panel5.Controls[i] is TEdit then  //Edit×é¼þ
    begin
       ((panel5.Contro ......

DelphiÖÐDLL³õʼ»¯ºÍÍ˳ö´¦Àí

DelphiÖÐDLL³õʼ»¯ºÍÍ˳ö´¦Àí
choysan
2010-01-08 8:56:43
<1>ÀûÓÃUnitµÄInitalizationÓëFinalizationÕâÁ½¸öС½Ú
¡¡¡¡¿ÉÒÔÔÚUnitµÄÕâÁ½¸öС½ÚÖа²ÅÅUnitµÄ½øÈëºÍÍ˳ö£¬µ«ÊÇ
ProgramÓëLibrary²¢Ã»ÓÐÕâÁ½¸ö²¿·Ö£¬ËùÒÔÖ»ÄÜдÔÚUnitÖС£
<2>ÀûÓÃExitProc±äÁ¿
¡¡¡¡ÔÚLibraryµÄbegin..end.ÖмäÊÇ¿ÉÒÔд´úÂëµÄ£ ......

Delphi Assigned


1.¸ù¾Ý Delphi Ö¸Áî²Î¿¼ÊÖ²áÖÐ
˵Ã÷£º
Assigned º¯Ê½ÔÚ²ÎÊý²»Îªnilʱ´«»ØTrue,±íʾָÕëÒѾ­Ö¸µ½Ä³¸öÄÚ´æµØÖ·£¬Õâ¸öÄÚ´æµØÖ·¿ÉÄÜÊÇÒ»¸ö¶ÔÏóµØÊ×µØÖ·£¬Ò²¿ÉÄÜÔÚº¯Êý»ò¹ý³ÌÖУ¬ÉùÃ÷Ò»¸öÖ¸Õë±äÁ¿£¬Ã»Óи³ÖµÎªnil £¬ÎÞÂÒµÄÖ¸Ïòij´¦£¬ÕâÁ½¸öÖÖÇé¿ö£¬Assigned£¨Ö¸Õë±äÁ¿£©¶¼²»Îªnil , º¯Êý·Å»ØTrue£»
¶ø²ÎÊýΪnilʱÔò´«»ØFals ......

delphi DBGridÓ¦ÓôóÈ«

 ÔÚ Delphi ÓïÑÔµÄÊý¾Ý¿â±à³ÌÖУ¬DBGrid ÊÇÏÔʾÊý¾ÝµÄÖ÷ÒªÊÖ¶ÎÖ®Ò»¡£µ«ÊÇ DBGrid ȱʡµÄÍâ¹ÛδÃâÏԵõ¥µ÷ºÍȱ·¦´´Òâ¡£Æäʵ£¬ÎÒÃÇÍêÈ«¿ÉÒÔÔÚÎÒÃǵijÌÐòÖÐͨ¹ý±à³ÌÀ´´ïµ½ÃÀ»¯DBGrid Íâ¹ÛµÄÄ¿µÄ¡£Í¨¹ý±à³Ì£¬ÎÒÃÇ¿ÉÒԸıä DBGrid µÄ±íÍ·¡¢Íø¸ñ¡¢Íø¸ñÏßµÄÇ°¾°É«ºÍ±³¾°É«£¬ÒÔ¼°Ïà¹ØµÄ×ÖÌåµÄ´óСºÍ·ç¸ñ¡£
    ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ