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

ExpressQuantumGrid.Suite.v6.30 ÔÚDelphi 7Öеݲװ

ExpressQuantumGrid.Suite.v6.30 ÔÚDelphi 7Öеݲװ
´óÃû¶¦¶¦µÄGrid¿Ø¼þ£¬Ã»ÓÐÕÒµ½´òºÃ°üµÄ£¬ÒÔÏÂÊÇÊÖ¶¯°²×°²½Öè
=====================
1¡¢±ØÐëÅäÌ×°²×°ÈçÏÂ7×é¿Ø¼þ£¬ÒѾ­°²×°¹ýµÄÔòÌø¹ý
XP Theme Manager
ExpressGDI+ Library
ExpressLibrary
ExpressExport Library
ExpressDataController
ExpressEditors Library 5
ExpressPageControl 2
2¡¢ÔÚDelphi 7ÖУ¬Ñ¡Ôñ²Ëµ¥File | Close All£¨×îºÃÕâÑù£©£»
3¡¢£¨¿ÉÑ¡²½Ö裩ѡÔñ²Ëµ¥Tools | Environment Options...£¬ÔÚEnvironment VariablesÒ³ÖУ¬µã»÷"New..."°´Å¥£¬ÔÚVariable NameÓÒ±ßÊäÈë¿òÖÐÊäÈëcxQGrid£¨»òÈÎÒâÆäËûÃû×Ö£¬µ«ºóÃæµÄÉèÖÃÒªÓë´ËÒ»Ö£©£¬ÔÚVariable ValueÓÒ±ßÊäÈë¿òÖÐÊäÈë¿Ø¼þµÄ¾ø¶Ô·¾¶£¨È磺C:\Program Files\Borland\Delphi7\Projects\ExpressQuantumGrid.Suite.v6.30\£©£¬°´"OK"£»
4¡¢µã»÷"Library"Çл»µ½LibraryÒ³£¬ÔÚLibrary pathºóÃæ¼ÓÉÏ£º
$(cxQGrid)\XP Theme Manager\Sources;
$(cxQGrid)\ExpressGDI+ Library\Sources;
$(cxQGrid)\ExpressLibrary\Sources;
$(cxQGrid)\ExpressExport Library\Sources;
$(cxQGrid)\ExpressDataController\Sources;
$(cxQGrid)\ExpressEditors Library 5\Sources;
$(cxQGrid)\ExpressPageControl 2\Sources;
$(cxQGrid)\ExpressQuantumGrid 5\Sources;
Èç¹ûûÓÐÖ´ÐеÚ3²½£¬¼´Ã»ÓÐÔÚDelphiÖÐÉèÖÃcxQGrid»·¾³±äÁ¿£¬Ôò°ÑÉÏÃæµÄ$(cxQGrid)¸ÄΪ¾ø¶Ô·¾¶£¬È磺C:\Program Files\Borland\Delphi7\Projects\ExpressQuantumGrid.Suite.v6.30
5¡¢ÒÀ´Î±àÒëºÍ°²×°ÏÂÃæ¸÷°ü£º
---°²×°XP Theme Manager---
\XP Theme Manager\Packages\dxThemeD7.dpk ½ö±àÒë
---°²×°ExpressGDI+ Library---
\ExpressGDI+ Library\Packages\dxGDIPlusD7.dpk ½ö±àÒë
---°²×°ExpressLibrary---
\ExpressLibrary\Packages\cxLibraryVCLD7.dpk ½ö±àÒë
\ExpressLibrary\Packages\dclcxLibraryVCLD7.dpk ±àÒëºÍ°²×°
---°²×°ExpressExport Library---
\ExpressExport Library\Packages\cxExportVCLD7.dpk ½ö±àÒë
---°²×°ExpressDataController---
\ExpressDataController\Packages\cxDataD7.dpk ½ö±àÒë
\ExpressDataController\Packages\cxADOAdaptersD7.dpk ½ö±àÒë
\ExpressDataController\Packages\cxBDEAdaptersD7.dpk ½ö±àÒë
\ExpressDataController\Packages\cxIBXAdaptersD7.dpk ½ö±àÒë
---°²×°ExpressEditors Library 5---
\ExpressEdi


Ïà¹ØÎĵµ£º

Delphiµ÷ÓÃoutlook

 //¶¨ÒåÈ«¾Ö±äÁ¿
public
{ Public declarations }
outlook,MailItem,Recipient:variant;
OutlookNameSpace:variant;
OutlookFolder:variant;
OutlookAttachment:variant;
//´´½¨´ò¿ªoutlook
procedure TForm1.CreateOutLook;
begin
try
outlook:=CreateOleObject('OutLook.app ......

delphi×¢²á±í²Ù×÷ÍêÈ«ÊÖ²á

32λDelphi³ÌÐòÖпÉÀûÓÃTRegistry¶ÔÏóÀ´´æÈ¡×¢²á±íÎļþÖеÄÐÅÏ¢¡£
¡¡¡¡Ò»¡¢´´½¨ºÍÊÍ·ÅTRegistry¶ÔÏó
¡¡¡¡1.´´½¨TRegistry¶ÔÏó¡£ÎªÁ˲Ù×÷×¢²á±í£¬Òª´´½¨Ò»¸öTRegistry¶ÔÏó£ºARegistry := TRegistry.Create£»
¡¡¡¡2.ÊÍ·ÅTRegistry¶ÔÏó¡£¶Ô×¢²á±í²Ù×÷½áÊøºó£¬Ó¦ÊÍ·ÅTRegistry¶ÔÏóËùÕ¼Äڴ棺ARegistry.Destroy¡£
¡¡¡¡¶þ ......

Delphi ÖÐÈçºÎ°²×°×é¼þ?


Delphi ÖÐÈçºÎ°²×°×é¼þ?
delphiÖÐÈçºÎ°²×°×é¼þÓÐÎåÖÖÇé¿ö£º
1¡¢Ö»ÓÐÒ»¸öDCUÎļþµÄ×é¼þ¡£DCUÎļþÊDZàÒëºÃµÄµ¥ÔªÎļþ£¬ÕâÑùµÄ×é¼þÊÇ×÷Õß²»Ïë°ÑÔ´Â빫²¼¡£Ò»°ãÀ´Ëµ£¬×÷Õß±ØÐë˵Ã÷´Ë×é¼þÊʺÏDelphiµÄÄÄÖÖ°æ±¾£¬Èç¹û°æ±¾²»¶Ô£¬ÔÚ°²×°Ê±¾Í»á³öÏÖ´íÎó¡£Ò²ÕýÊÇÒòΪûÓÐÔ´Â룬¸øÊ¹ÓÃÕß´øÀ´Á˲»±ã£¬ÄǾÍÊÇÒ»µ©Delphi°æ±¾Éý¼¶£¬´Ë× ......

Delphi ÁгöĿ¼ÏµÄÎļþ

function ListFiles(Dir: String):TStrings;
var
FSearchRec: TSearchRec;
FileList: TStrings;
FindResult: Integer;
begin
if Dir[length(Dir)]<>'\' then Dir:=Dir+'\';
FileList :=TStringList.Create;
FindResult:=FindFirst(Dir+'*.*,faAnyFile+faDirectory,FSearchRec);
while FindRes ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ