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

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 ²ð·Ö×Ö·û´®

×î½üÔÚʹÓÃDelphi¿ª·¢Ò»ÖÖÓ¦ÓÃϵͳµÄ¼¯³É¿ª·¢»·¾³¡£ÆäÖÐÐèҪʵÏÖÒ»¸ö×Ö·û´®²ð·Ö¹¦ÄÜ£¬·½·¨»ù±¾Ô­ÐÍÓ¦¸ÃÊÇ£º
procedure
SplitString(src: string
; ch: Char; var
stringList: TStringList);
Ä¿µÄÊÇʹÓÃ×Ö·ûch²ð·Ösrc×Ö·û´®£¬°Ñ²ð·ÖµÄ½á¹û·ÅÈëstringListÖС£ÀýÈ磺src:='abc|def|ghi'; ch='|'µÄʱºò£¬·µ»ØµÄstringLis ......

DelphiͼÏñ´¦ÀíÖÐScanLineµÄʹÓÃ

Ò»°ãÎÒÃÇÔÚDelphiÖнøÐÐͼÏñ´¦Àíʱ²ÉÓÃPixelsÏñËص㸳ֵµÄ·½·¨£¬Delphi´úÂëÈçÏ£º
var
x,y:Integer;
cColor:TColor;
begin
  for y:=0 to Image1.Height-1 do
    for x:=0 to Image1.Width-1 do
      cColor:=Image1.Canvas.Pixels[i,j];
end;
µ«ÊÇÕâÖÖ·½·¨Óиöȱ ......

ʹÓÃDelphiÄÚÖú¯Êý¶ÁдINIÎļþ


ÀûÓÃWindows APIº¯ÊýWritePrivateProfileString ºÍGetPrivateProfileString¿É¶Ô.INIÎļþ½øÐжÁд²Ù×÷¡£Æäʵ£¬¶Ô.INIÎļþµÄ¶ÁдÍêÈ«¿ÉÒÔÀûÓÃDelphiµÄÄÚÖú¯ÊýÀ´ÊµÏÖ¡£ÏÂÃæ¾Í½éÉÜһЩ¶Ô.INIÎļþ¶ÁдʱÏà¹ØµÄÀ༰ÆäÊôÐÔ·½·¨¡£
1¡¢TIniFile¶ÔÏó
ÒÔDelphiÖУ¬¶¨ÒåÁËÒ»¸öTIniFile¶ÔÏ󣬽«.INIÎļþ·â×°ÔÚÆäÖУ¬²¢ÌṩһЩ·½·¨£ ......

Delphi 7¸ßЧÊý¾Ý¿â³ÌÐòÉè¼Æ

ÄÚÈݼò½é
    dbExpressÊÇBorland¹«Ë¾ÏÂÒ»´úÊý¾Ý·ÃÎʼ¼Êõ¡£±¾Êé²»½öÏêϸ½éÉÜÁËdbExpressµÄ»ù±¾¹¦ÄÜ¡¢Ê¹Óü¼ÇÉÒÔ¼°Delphi/KylixµÄDataSnap¼¼Êõ£¬»¹ÏêϸÌÖÂÛÁËdbExpressµÄʵÏÖÔ­ÀíÒÔ¼°dbExpressµÄδÀ´·¢Õ¹Ç÷ÊÆ¡£±¾Êé½á¹¹ÇåÎú£¬½²½â͸³¹£¬ÊµÀý·á¸»¡£×÷ÕßÀîάÊÇBorland¹«Ë¾ÖøÃû¼¼Êõר¼Ò£¬ÔøÖøÓжಿDelphiÃû ......

Delphi µÄ×Ö·û¼°×Ö·û´®[

Delphi µÄ×Ö·û¼°×Ö·û´®[1] - string¡¢AnsiString¡¢WideString¡¢String[n]¡¢ShortString
2008-10-17 14:57:17
//×î³£ÓÃµÄ string
var
  str: string;   {¶¨Òå}
begin
  str := 'ÍòÒ»'; {¸³Öµ}
  ShowMessage(IntToStr(Length(str))); {³¤¶ÈÊÇ: 4}
end;
//³¤×Ö·û´® AnsiString; ÔÚµ±Ç°°æ± ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ