DelphiÖеÄÈÝÆ÷Àà
DelphiÖеÄÈÝÆ÷Àà
×÷Õß ³ÂÊ¡
´ÓDelphi 5¿ªÊ¼VCLÖÐÔö¼ÓÁËÒ»¸öеÄContnrsµ¥Ôª£¬µ¥ÔªÖж¨ÒåÁË£¸¸öеÄÀ࣬ȫ²¿¶¼ÊÇ»ùÓÚ±ê×¼µÄTList Àà¡£
TList Àà
TList Ààʵ¼ÊÉϾÍÊÇÒ»¸ö¿ÉÒÔ´æ´¢Ö¸ÕëµÄÈÝÆ÷À࣬ÌṩÁËһϵÁеķ½·¨ºÍÊôÐÔÀ´Ìí¼Ó£¬É¾³ý£¬ÖØÅÅ£¬¶¨Î»£¬´æÈ¡ºÍÅÅÐòÈÝÆ÷ÖеÄÀ࣬ËüÊÇ»ùÓÚÊý×éµÄ»úÖÆÀ´ÊµÏÖµÄÈÝÆ÷£¬±È½ÏÀàËÆÓÚC++ÖеÄVectorºÍJavaÖеÄArrayList£¬TList ¾³£ÓÃÀ´±£´æÒ»×é¶ÔÏóÁÐ±í£¬»ùÓÚÊý×éʵÏֵĻúÖÆʹµÃÓÃϱê´æÈ¡ÈÝÆ÷ÖеĶÔÏó·Ç³£¿ì£¬µ«ÊÇËæ×ÅÈÝÆ÷ÖеĶÔÏóµÄÔö¶à£¬²åÈëºÍɾ³ý¶ÔÏóËٶȻáÖ±ÏßϽµ£¬Òò´Ë²»ÊʺÏƵ·±Ìí¼ÓºÍɾ³ý¶ÔÏóµÄÓ¦Óó¡¾°¡£ÏÂÃæÊÇTListÀàµÄÊôÐԺͷ½·¨ËµÃ÷£º
ÊôÐÔ
ÃèÊö
Count: Integer;
·µ»ØÁбíÖеÄÏîÄ¿Êý
Items[Index: Integer]: Pointer; default
ͨ¹ýÒÔ£°Îªµ×µÄË÷ÒýϱêÖ±½Ó´æÈ¡ÁбíÖеÄÏîÄ¿
·½·¨
ÀàÐÍ
ÃèÊö
Add(Item: Pointer): Integer;
º¯Êý
ÓÃÀ´ÏòÁбíÖÐÌí¼ÓÖ¸Õë
Clear;
¹ý³Ì
Çå¿ÕÁбíÖеÄÏîÄ¿
Delete(Index: Integer);
¹ý³Ì
ɾ³ýÁбíÖжÔÓ¦Ë÷ÒýµÄÏîÄ¿
IndexOf(Item: Pointer): Integer;
º¯Êý
·µ»ØÖ¸ÕëÔÚÁбíÖеÄË÷Òý
Insert(Index: Integer; Item: Pointer);
¹ý³Ì
½«Ò»¸öÏîÄ¿²åÈëµ½ÁбíÖеÄÖ¸¶¨Î»ÖÃ
Remove(Item: Pointer): Integer;
º¯Êý
´ÓÁбíÖÐɾ³ýÖ¸Õë
Ãû³Æ
ÀàÐÍ
ÃèÊö
Capacity: Integer;
property
¿ÉÒÔÓÃÀ´»ñÈ¡»òÉ趨Áбí¿ÉÒÔÈÝÄɵÄÖ¸ÕëÊýÄ¿
Extract(Item: Pointer): Pointer;
function
Extract ÀàËÆÓÚRemove ¿ÉÒÔ½«Ö¸Õë´ÓÁбíÖÐɾ³ý£¬²»Í¬µÄÊÇ·µ»Ø±»É¾³ýµÄÖ¸Õë¡£¡¡
Exchange(Index1, Index2: Integer);
procedure
½»»»ÁбíÖÐÁ½¸öÖ¸Õë
First: Pointer;
function
·µ»ØÁ´±íÖеĵÚÒ»¸öÖ¸Õë
Last: Pointer;
function
·µ»ØÁ´±íÖÐ×îºóÒ»¸öÖ¸Õë
Move(CurIndex NewIndex: Integer);
procedure
½«Ö¸Õë´Óµ±Ç°Î»ÖÃÒƶ¯µ½ÐµÄλÖÃ
Pack;
procedure
´ÓÁбíÖÐɾ³ýËùÓÐnilÖ¸Õë
Sort(Compare: TListSortCompare);
procedure
ÓÃÀ´¶ÔÁ´±íÖеÄÏ
Ïà¹ØÎĵµ£º
Ë˵DelphiûÓйþÏ££¿££DelphiÖУ¬TStringListºÍTHashedStringListµÄÐÔÄܶԱÈ
Ôø¾¿´µ½ºÜ¶àÈËÔÚÈÂÈÂDelphiûÓйþÏ£±í£¬ÕâЩÈ˵Ķ¯ÊÖÒâʶ¹ÃÇÒ²»ÂÛ£¬È´»¹ÓкܶàÈËÒÔ´ËÀ´Ö¤Ã÷Delphi±È±ðµÄÓïÑÔÀ¬»ø£¬ÊµÔÚÊÇ...
ºÃ£¬ÀÎɧ´òס£¬×ª½ÓÕýÌâ¡£
TStringListÊÇÎÒÃdz£ÓõÄ×Ö·û´®ÁбíÀàÐÍ£¬Ó÷¨¾Í²»ÔÚÕâÀï׸Êö£¬µ«ÊÇ£¬ÔÚÊý¾ÝÆäÏîÊýÔö ......
¡¶DelphiÏÂÉîÈëWindowsºËÐıà³Ì¡·£¨¸½Â¼A Delphi±àÒëÖ¸Áî˵Ã÷£©
Õª³ÈË£ºÂé×Ó qq:71892967
Delphi¿ìËÙ¸ßСµÄ±àÒëÆ÷Ö÷ÒªÀ´×ÔObject PASCALµÄÑϽ÷£¬Ê¹ÓÃDelphiËæʱ¶¼ÔÚÓë±àÒëÆ÷½»Á÷£¬´ó²¿·ÖÇé¿öϲ»ÐèÒª¸ÉÉæ±àÒëÆ÷µÄÔËÐУ¬µ«ÊÇÓÐʱҲÐèÒª¶Ô±àÒëÆ÷½øÐбØÒªµÄÉèÖá£
*************************************************** ......
Borland³öÆ·µÄDelphi£¬ÓÐ×ÅÉÁµç°ãµÄ±àÒëËٶȣ¬µ«ÊÇÔÚ½çÃæ¿Ø¼þʹÓý϶ࡢ¹¤³ÌÏîÄ¿½Ï´óµÄʱºò£¬±àÒëÒ»¸ö¹¤³ÌÈÔÐèÒªÒ»¶Îʱ¼ä£¬´ò¿ªÅÓ´óµÄDelphi IDE£¬Ò²ÐèҪʱ¼ä¡£Æäʵ£¬ÔÚÒ»¸ö¹¤³Ì¿ª·¢½áÊø£¬µ÷ÊÔÍê³ÉÖ®ºóµÄRelease±àÒ룬ÍêÈ«¿ÉÒÔÓÃÃüÁîÐÐÀ´Ö´ÐУ¬ÒòΪDelphiµÄ±àÒëÆ÷²ÎÊý²»ÏñC++±àÒëÆ÷ÄÇÑù¸´ÔÓ¡£
±ÊÕß°ÑDelphiÁª»úÊÖ²á ......
Ctrl+PageUp ½«¹â±êÒÆÖÁ±¾ÆÁµÄµÚÒ»ÐУ¬ÆÁÄ»²»¹ö¶¯¡£
Ctrl+PageDown ½«¹â±êÒÆÖÁ±¾ÆÁµÄ×îºóÒ»ÐУ¬ÆÁÄ»²»¹ö¶¯¡£
Ctrl+↓ ÏòϹö¶¯ÆÁÄ»£¬¹â±ê¸úËæ¹ö¶¯²»³ö±¾ÆÁ¡£
Ctrl+↑ &nb ......
Rem Delete Delphi temporary file
Rem ****************************
@echo Delete Delphi temporary file
@dir/w/s *.~*
@echo ÒÔÉÏΪµ±Ç°Ä¿Â¼¼°×ÓĿ¼ÁÙʱÎļþ,Çë°´ÈÎÒâ¼üÈ·ÈÏɾ³ý!
@pause
@for /r . %%a in (.) do @if exist "%%a\*.~*" del "%%a\*.~*"
@echo ɾ³ý³É¹¦!
@pause
Rem ************************* ......