DelphiÉî¶È̽Ë÷Ö®×Ô¶¯Íê³ÉÍâ¿ÇÀ©Õ¹
ÒýÓÃ×Ô£ºhttp://develop.csai.cn/delphi/NO000001.htm
×Ô¶¯Íê³É¼ò½é
¡¡¡¡´ó¼ÒÒ»¶¨¶¼·Ç³£ÊìϤIEä¯ÀÀÆ÷µÄµØÖ·ÊäÈë±à¼¿ò£¬ËüÌṩÁË×Ô¶¯Íê³ÉµÄ¹¦ÄÜ¡£×Ô¶¯Íê³É£¨Auto Complete£©¹¦Äܼò»¯Á˱༿òµÄÊäÈ빦ÄÜ£¬Ëü¿ÉÒÔ¸ù¾ÝÒѾÊäÈëµÄ²¿·Ö×Ö·û´®½øÐÐÔ¤²âºÍÆ¥Å䡣ͼ2.7µÄÀý×Ó£¬ÑÝʾÁË×Ô¶¯Íê³É¿ÉÒÔÒÀ¾ÝÊäÈëµÄ“pro”£¬¸ø³öPascalµÄ±£Áô×ÖÖÐÓëÆäÏàÆ¥ÅäµÄ×Ö·û´®Áбí"procedure"¡¢"program"¡¢"property"¡£
¡¡¡¡ÔÚÀûÓÃ×Ô¶¯Íê³É¹¦ÄÜÇ°£¬±ØÐëÒªÖªµÀ×Ô¶¯Íê³É²¢²»ÊÇÈÎÒâ°æ±¾µÄWindows¶¼Ö§³Ö£¬×Ô¶¯Íê³É¹¦ÄÜʵ¼ÊÉÏÊÇÓÉInternet Explorer 4.0ÒýÈë²¢±ØÐëÓÐ4.71°æ¼°ÒÔÉϵÄShell32.dllµÄÖ§³Ö¡£ºÜ¶àÔçÆÚµÄϵͳ£¬°üÀ¨ºÜ¶à°²×°ÁËIE 4µÄϵͳ²¢²»Ö§³ÖÕâÏîÌØÐÔ£¬ËùÒÔʹÓÃ×Ô¶¯Íê³É¹¦ÄÜʱ±ØÐëÈ·±£Òª°²×°µÄϵͳ֧³ÖÕâÏÄÜ£¬Èç¹û²»Ö§³Ö¾ÍÐèÒª°²×°IEºÍ¼¯³ÉÍâ¿Ç¡£
¡¡¡¡×Ô¶¯Íê³É¹¦ÄÜÊÇͨ¹ýÒ»×éCOM½Ó¿ÚÀ´ÊµÏֵġ£ÕâЩ½Ó¿ÚʹÎÒÃÇ¿ÉÒÔÁ¬½Ó×Ô¶¯Íê³Éµ½±à¼¿ò£¬Ìí¼Ó±à¼¿ò¿ÉÒÔö¾ÙµÄ×Ö·û´®ÁÐ±í²¢ÅäÖÃÆäÏÔʾÊôÐÔ¡£
¡¡¡¡1. ×Ô¶¯Íê³ÉµÄÓÃ;
¡¡¡¡Ê¹ÓÃ×Ô¶¯Íê³É¹¦ÄÜ¿ÉÒÔÔöÇ¿³ÌÐòµÄÒ×ÓÃÐÔ£¬Ëü¿ÉÒÔ½ÚÊ¡Óû§·´¸´ÊäÈëһЩ³£ÓÃ×Ö·û´®µÄʱ¼ä£¬²¢¼õÉÙÊäÈë´íÎó¡£Ëü»¹¿ÉÒÔÓÃÓÚ²¿·Ö×Ö·ûÆ¥ÅäµÄ²éÕÒϵͳ£¬¿ÉÒÔÓÃËüʵÏÖ¶ÔÊý¾Ý¿âÄÚÈݵĿìËÙ²éÕÒ¡£ÁíÍ⣬Ëü»¹Ö§³ÖÏòä¯ÀÀÆ÷ÀúÊ·¡¢×î½üÔËÐгÌÐòºÍÍâ¿ÇĿ¼ÊäÈëµÈ¹¦ÄÜÖÐÌí¼Ó×Ô¶¨ÒåµÄÍê³ÉÁÐ±í¡£
¡¡¡¡2. ÅäÖÃ×Ô¶¯Íê³É
¡¡¡¡ÐèÒªÖªµÀµÄÊÇÔÚDelphiÀﲢûÓÐÌṩ×Ô¶¯Íê³É¹¦ÄÜÏà¹ØCOM½Ó¿ÚµÄpascalÉùÃ÷µ¥Ôª¡£ÓÉÓÚÒ»°ãÕâÀà½Ó¿ÚÔÚ΢Èí¶¼ÊÇÒÔCÓïÑÔµÄÍ·ÎļþÐÎʽÌṩ½Ó¿Ú£¬Delphi²»¿ÉÄܼ°Ê±Ìṩ×îеÄÏàÓ¦µÄPascal°ü×°µ¥Ôª¡£ËùÒÔΪÁËʹÓÃÕâÏÄÜ£¬±¾ÎÄÖжîÍâÌṩÁËÒ»¸öshlintfµ¥Ôª·ÒëÁËÏàÓ¦µÄÍ·ÎļþµÄÉùÃ÷¡£Ï±í×ܽáÁËShlintfµÄÄÚÈÝ£º
COM¶ÔÏó
½Ó ¿Ú
CLSID_AutoComplete
IAutoComplete
CLSID_ACLHistory
IAutoComplete2
CLSID_ACListISF
IACList
CLSID_ACLMRU
IACList2
CLSID_ACLMulti
ICurrentWorkingDirectory
IObjMgr
¡¡¡¡×Ô¶¯Íê³É¹¦ÄÜ×î»ù±¾µÄÒ»¸ö½Ó¿Ú¾ÍÊÇIAutoComplete½Ó¿Ú£¬ËüµÄÉùÃ÷ÈçÏ£º
type
IAutoComplete = interface(IUnknown)
[SID_IAutoComplete]
function Init(hwndEdit: HWND; punkACL: IUnknown; pwszRegKeyPath: PWideChar;
pwszQuickComplete: PWideChar): HResult; stdcall;
function Enable(fEnable: Boolean): HResult; stdcall;
end;
¡¡¡¡IautoComplete½Ó¿ÚÓÐÁ½¸ö·½·¨£ºInitºÍEnable¡£
¡¡¡¡Init·½·¨ÓÃÀ´°ÑIAut
Ïà¹ØÎĵµ£º
Ï£Íû´ó¼ÒÔÚתÌùµÄʱºò×¢Ã÷³ö´¦£¬Ð»Ð»)
ÓÃDELPHI¿ª·¢ÍøÂç´úÂëÒѾÓÐÒ»¶Îʱ¼äÁË£¡
ÎÒ·¢ÏÖÔÚÍøÉÏÓÃVCÀ´ÊµÏÖÍê³É¶Ë¿Ú£¨IOCP£©µÄ´úÂëºÜ¶à£¬µ«ÊÇʹÓÃDELPHIÀ´ÊµÏֵľͱȽÏÉÙÁË¡£¶ÔIOCP½²µÄÇå³þµÄ¾Í¸üÉÙÁË¡£ÔÚÕâÀïÎÒ°Ñ×Ô¼º±àдDELPHIϵÄIOCPд³öÀ´£¬Ï£Íû¶Ô¸ÕѧÍê³É¶Ë¿ÚµÄÅóÓÑÓиö°ïÖú¡£
Ê×ÏÈÎÒÃÇÀ´Á˽âһЩÔÚʹÓÃIOCPµÄʱºòÐèÒ ......
ÀûÓÃWindows APIº¯ÊýWritePrivateProfileString ºÍGetPrivateProfileString¿É¶Ô.INIÎļþ½øÐжÁд²Ù×÷¡£Æäʵ£¬¶Ô.INIÎļþµÄ¶ÁдÍêÈ«¿ÉÒÔÀûÓÃDelphiµÄÄÚÖú¯ÊýÀ´ÊµÏÖ¡£ÏÂÃæ¾Í½éÉÜһЩ¶Ô.INIÎļþ¶ÁдʱÏà¹ØµÄÀ༰ÆäÊôÐÔ·½·¨¡£
1¡¢TIniFile¶ÔÏó
ÒÔDelphiÖУ¬¶¨ÒåÁËÒ»¸öTIniFile¶ÔÏ󣬽«.INIÎļþ·â×°ÔÚÆäÖУ¬²¢ÌṩһЩ·½·¨£ ......
·þÎñ¶Ë£ºÌí¼ÓADOConnection£¬ADOQuery1£¬ADOQuery2¡£ÉèÖÃADOQuery1ΪÖ÷±í£¬ADOQuery2Ϊ´Ó±í¡£(ͨ¹ý ADOQuery2.SQL.Text:= 'select * from ´Ó±í where FKID=:Ö÷±íPKID'ÉèÖÃ)¡£Ìí¼ÓDataSetProvider1ºÍDataSetProvider2·Ö±ðÁ¬½Óµ½ADOQuery1ºÍADOQuery2¡£
¿Í»§¶Ë£ºÌí¼ÓClientDataSet1£¬ClientDataSet2¡£ClientDataS ......
Unt_Machine_WebDll.pas
BODY {background: #FFFFFF}
A:link { color: #0000FF}
A:visited { color: #0000FF}
A:Active { color: #0000FF}
.bold {font-weight: bold}
.italic {font-style: italic}
.underline {text-decoration: underline}
unit Unt_Machine_WebDll;
{$WARN SYMBOL_PLATFORM OF ......
Delphi Óë C/C++ Êý¾ÝÀàÐͶÔÕÕ±í
DelphiÊý¾ÝÀàÐÍC/C++
ShorInt
8λÓзûºÅÕûÊý
char
Byte
8λÎÞ·ûºÅÕûÊý
BYTE,unsigned short
SmallInt
16λÓзûºÅÕûÊý
short
Word
16λÎÞ·ûºÅÕûÊý
unsigned short
Integer,LongInt
32λÓзûºÅÕûÊý
int,long
Cardinal,LongWord/DWORD
32λÎÞ·ûºÅÕûÊý
unsigned long
Int6 ......