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

delphi´æ·Åµ½Ò»¸öÊý×éÀï

¶¨Ò壺 
type
  pm= packed record { IO¼Ç¼ }
  Name:string[16]; { IOÃû³Æ }
  CHn:Byte; {ÊäÈëͨµÀºÅ }
  Pvh:Double; { Á¿³ÌÉÏÏÞ }
  Pvl:Double; { Á¿³ÌÏÂÏÞ }
  DW:string[8]; { Á¿³Ìµ¥Î» }
  Bjh:Double; { ±¨¾¯ÉÏÏÞ }
  Bjl:DOuble; { ±¨¾¯ÏÂÏÞ }
  BjCHn:Byte; { ±¨¾¯Êä³öͨµÀ }
  Pv:Double; { ²âÁ¿Öµ }
  Code:Word; { ²âÁ¿Öµ´úÂë }
  BZ1:Byte;
  BZ2:Byte;
  BZ3:Byte;
 end;

IOtalab:array[0..3]of pm;

Sbuf : Array[0..8191] of Byte;

ÈçºÎ½«IOtalab±í ´æ·Åµ½SbufÀïÃæ£¿¡¢¡¢¡¢¡¢¡¢¡¢¡¢¡¢¡¢¡¢
Çë½Ì¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£
ÓÃStreamд

CopyMemory

ÒýÓÃ
CopyMemory


ÓÃÁËcopymemory µ«²»ÐÐ

°ÑIOtalabдÈëµ½streamÖУ¬È»ºóÔÙ°ÑstreamдÈëµ½Sbuf ÖÐ

Á½ÖÖ·½·¨£º

1. ʹÓÃmoveÖ®ÀàµÄ¸´Öƺ¯Êý£»
2. ʹÓñäÌå¼Ç¼£¬ÐèÒªÉÔ΢¸Ä±äÒ»ÏÂÀàÐͶ¨Ò壺
  TSbuf = packed record
  case integer of
  0: (IOtalab: array[0..3] of pm);
  1: (sbuf: Array[0..8191] of byte);
  end;

var
  IOtalab: array[0..3]of pm;
  Sbuf: TSbuf;
ʹÓãº
  sbuf.iotalab[1].name := 'hello';
  sbuf.sbuf[8000] := 123;




Ïà¹ØÎÊ´ð£º

DELPHIÕâÖÖÇé¿öÔõô°ì£¿ - Delphi / Windows SDK/API

¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬
Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......

delphiÈçºÎµ÷ÓÃdllÎļþÖеÄexe

Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖǰ±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE
Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿


ÎÞÈ˻شð£¿

×ö³É×ÊÔ´Î ......

DelphiÔõôȡ·µ»ØÄÚÈÝÖеÄÖ¸¶¨²¿·Ö.

·µ»ØµÄÄÚÈÝÊÇÈçÏ´úÂë,ÔõôÄÜÇþµÀ2b?
<p class="text1">1a </p>
<p class="text1">2b </p>
<p class="text1">3c </p>
<p cl ......

delphi ±¾µØ×°ÔØÇý¶¯ - Delphi / Windows SDK/API

delphi ÊÖ¶¯×°ÔØÇý¶¯ÎļþÌáʾ£º
RROR (1058): The driver is marked as disabled (Start=4) in its service database entry.
ÊDz»ÊÇÕâ¸öÇý¶¯±ØÐèÒªÓÃINFÀ´°²×°¡£¡£ÓÃ×Ô´øµÄINFÀ´×°ÊÇÕý³£µÄ¡£ÓÃÊÖ¶¯×°ÔؾÍÌáʾÈçÉÏ¡ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ