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

Õâ¶ÎvcµÄÉùÃ÷ÔõÑùת³Édelphi£¿

C/C++ code:
void __RPC_STUB IDirectUI_Init_Stub(
IRpcStubBuffer *This,
IRpcChannelBuffer *_pRpcChannelBuffer,
PRPC_MESSAGE _pRpcMessage,
DWORD *_pdwStubPhase);


com µÄdllµÄÒ»¸öº¯ÊýµÄÔ­ÐÍ£¬ÒªÏ뽫Õâ¸öÔ­ÐÍд³ÉdelphiµÄ²¢ÔÚdelphiÖÐʹÓ㬸ÃÔõÃ´Ð´ÄØ£¿

ÌØ±ðÊÇIRpcStubBufferµÈ¼¸¸öÀàÐÍ
Äã²»ÌṩC/C++µÄÊý¾ÝÀàÐÍÔ­ÐÍ£¬±ðÈËÔõÃ´×ªÄØ£¿

Õâ¶ÎÊý¾ÝÔ­ÐÍÔÚvcÀïÊÇ×Ô´øµÄ

type
  PIRpcStubBuffer = ^IRpcStubBuffer;
  PIRpcChannelBuffer = ^IRpcChannelBuffer;
  PDWORD = ^DWORD;

procedure __RPC_STUB IDirectUI_Init_Stub(
    This : PIRpcStubBuffer;
    _pRpcChannelBuffer : PIRpcChannelBuffer;
    _pRpcMessage : PRPC_MESSAGE;
    pdwStubPhase : PDWORD);


ÒýÓÃ
type
  PIRpcStubBuffer = ^IRpcStubBuffer;
  PIRpcChannelBuffer = ^IRpcChannelBuffer;
  PDWORD = ^DWORD;

procedure __RPC_STUB IDirectUI_Init_Stub(
    This : PIRpcStubBuffer;
    _pRpcChannelBuffer : PIRpcChannelBuffer;
    _pRpcMessage : PRPC_MESSAGE;
    pdwStubPhase : PDWORD);

¶î£¬¹Ø¼üÊÇdelphiÀïÃæÕÒ²»µ½ºÍIRPCStubBuffer¶ÔÓ¦µÄÊý¾ÝÀàÐÍ


Ïà¹ØÎÊ´ð£º

PythonÖеÄUnicodeÔÚDelphiÈçºÎ»¹Ô­³ÉGb2312£¿

ÒÑÖªPython ÖУº
s = unicode("²âÊÔ", "gb2312")
s = u'\u6d4b\u8bd5'
print s
²âÊÔ

ÔÚDelphiÀïÃæÈçºÎ½«\u6d4b\u8bd5ÕâÑùµÄ»¹Ô­³ÉGb2312µÄºº×ÖÄØ£¿
ÕÒµ½¸ö·½·¨
......

СµÜ²»»áDELPHI£¬Çë´óÏÀÃǰï¸öæ

Õâ¸öÊÇÀ¹½Ø°´¼üÏûÏ¢²¢²âÊÔÊÇ·ñΪENTER¼ü¡£
  begin
    case wParam of
      WM_KEYDOWN:
      fEatKeystroke := (p.vkCode = VK_RETURN);
  & ......

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

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

DelphiÔõÑùÏÔÊ¾ÍøÒ³µÄÒ»²¿·Ö

Delphi
  ÔõÑù»ñÈ¡ÍøÒ³²¿·ÖÄÚÈÝ£¨´úÂ룩£¬²¢ÇÒÏÔʾ³öÀ´£¡
£¨Ö»ÊÇÍøÒ³ÀïÃæµÄÒ»²¿·ÖÄÚÈݲ¢²»ÊÇÈ«²¿£©
ûŪ¶®£¡

ÀàËÆwebseverµÄ¹¦ÄÜ£¿
¹À¼ÆÊÇÀûÓÃieµÄ½Ó¿Ú¡£¡£¡£¡£¡£¡£¡£¡£

ÊÇÀàËÆwebseverµÄ¹¦ÄÜ ......

delphi¶¯Ì¬Êý×éÈçºÎÈ¥µôÒ»¸öÔªËØ

procedure DynArrayDelete(var A;elSize:Longint;index,Count:Integer);
var
len,MaxDelete:Integer;
P:PLongint; //4 ¸ö×ֽڵij¤ÕûÐÎÖ¸Õë
begin
P:=PLongint(A);// È¡µÄ A µÄ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ