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

delphiÖеÄTCollection

TCollection ÊÇTCollectionItenm¶ÔÏóµÄÒ»¸öÈÝÆ÷¡£
Àà¹ØÏµTObject→TPersistent
¡¡¡¡Ã¿Ò»¸öTCollection¶¼ÓµÓÐÒ»×éTCollectionItem¶ÔÏó¡£
¡¡¡¡ÔÚÆäItemsÊôÐÔÊý×éÖУ¬TCcllection±£´æ¼¯ºÏÏîÄ¿µÄÒ»¸öϱꡣCount ÊôÐÔ°üº¬Á˼¯ºÏµÄÏîÄ¿ÊýÁ¿¡£Ê¹ÓÃAddºÍClear·½·¨¿ÉÒÔÏò¼¯ºÏÖмÓÈëÏîÄ¿ºÍ´Ó¼¯ºÏÖÐɾ³ýÏîÄ¿¡£
¡¡¡¡´ÓTCollection¼Ì³ÐµÄ¶ÔÏóÄܹ»°üº¬´ÓTCollectionItem¼Ì³ÐµÄ¶ÔÏó¡£ÀýÈ磬һ¸öTDBGridColumns¶ÔÏó°üº¬TColumn¶ÔÏó£¬ÕâÁ½¸öÀà±»TDBGrid¶ÔÏóÓÃÓÚ±íÊ¾Íø¸ñ¡£Ï±íÁгöÁËÿһ¸öTCollection¶ÔÏóµÄ×ÓÀàÓëÏàÓ¦µÄTCollectionltem¶ÔÏóµÄ×ÓÀàÒÔ¼°Ê¹ÓÿØÖÆ×é¼þ¡£ÆäÖУ¬TQuryTableProducerºÍTWehDispetcherʹÓõĿؼþ¼Ì³Ð×ÔTWinContril¶ÔÏó¡£
TCollection×ÓÀà TCollectionItem×ÓÀà ¿Ø¼þ×é¼þ
TCheckConstraints TCheckConstraint ʹÓÃTfield¶ÔÏóµÄ¿Ø¼þ
TCookieCollection TCookie HTTPÏìÓ¦¶ÔÏó
TCoolBands TCoolBand TCoolBar
TDBGridColumns TColumn TDBGrid
TDependencies TDependency TService
TDisplayDims TDisplayDim TDecisionGrid
TFieldDefs TfieldDef TDatsSet
THeaderSections THeaderSection THeaderControl
TIndexDefs TIndexDef TTable
THTMLTableColumns THTMLTableColumn TQueryTableProducer
TListColumns TListColumn TListView
TSuatusPanels TSuatuspanel TStatusBar
TWebActionItems TwebActionitem TwebDispatcher
¡¡¡¡Ê¹ÓÃTCollectionºÍTCollectionitem×ÓÀàµÄ¿Ø¼þ£¬¶¼ÓÐÒ»¸öÓµÓÐÒ»¸ö¼¯ºÏ5µÄ¹«¿ªÊôÐÔ£¨ÀýÈ磬TStatusBarµÄPanelsÊôÐÔÓµÓÐÒ»¸öTStatusPanels)¡£Ò»¸ö±ê×¼µÄÊôÐԱ༭Æ÷£¬´ÓÖÖÊôÉÏ˵±»ÈÏΪÊǼ¯ºÏ±à¼­Æ÷£¬Ëü±»ÊÚÒý×ÔObject Inspector£¬ÒԱ༭¼¯ºÏÖеÄÏîÄ¿¡£
ÊôÐÔÁбí
Count ·µ»Ø¼¯ºÏÖеÄÏîÄ¿ÊýÁ¿
ItemClass ±íʾ¼¯ºÏÏîÄ¿ÓÐÖÖÀà
Items Ìṩ¶Ô¼¯ºÏÖÐÏîÄ¿µÄ±äÖ··ÃÎÊ
·½·¨Áбí
~TCollection ɾ³ý¼¯ºÏ¼°ÆäÄÚµÄÿһÏîÄ¿
Add ´´½¨Ò»Ð¶ÔÏóʵÀý²¢¼Ó Èëµ½ItemsÊôÐÔÊý×éÖÐ
Assign ½«ÁíÒ»¼¯ºÏÓÐÄÚÈݸ´ÖƵ½Ö´Ðи÷½·¨µÄ¶ÔÏóÖÐ
Bcginupdate ʹÆÁÄ»¸üÐÂÔÝÍ£
Clear ´Ó¼¯ºÏÖÐɾ³ýËùÓÐÏîÄ¿
EndUpdate ʹÆÁÄ»Äܹ»ÖØÐ½øÐиüÐÂ
FindItemID ·µ»ØID²ÎÊýÖ¸¶¨µÄÏîÄ¿
Insert ´´½¨TCollectionItem¶ÔÏó²¢¼ÓÈëµ½ItemsÊôÐÔÊý×éÖÐ
TCollection ´´½¨²¢³õʼ»¯Ò»¸ö¼¯ºÏ
ÊôÐÔ
TCollection::Count
¡¡¡¡ÓÃÓÚ·µ»Ø¼¯ºÏÖеÄÏîÄ¿ÊýÁ¿¡£
¡¡__property int Count = {read=getCount,nodefanlt};
¡¡¡¡CountÊôÐÔ°üº¬ÁËItemsÊôÐÔÊý×éÖе


Ïà¹ØÎĵµ£º

delphi_·Ö¸ô×Ö·û´®_¶à¼ä¸ô×Ö·û

procedure mc_SplitStr(sourStr:String;splitChar:String;desLst:TStringList);
var
  tmpStr:String;
  sValue:String;
  iStart,iPos:Integer;
begin
  try
    desLst.Clear;             //ºÜÖØÒª£¬·ñÔò£¬»áÒ» ......

¹ØÓÚDelphiÖжþάÊý×éµÄÉùÃ÷ºÍ´óСµ÷Õû

ÕâÊÇÒ»¸öʵÀý£º
procedure TMainForm.Button1Click(Sender: TObject);
var
  arr:array of array of string;
begin
  setlength(arr,2,3);
  arr[1,2]:='this is a test';
  setlength(arr,0,0);
  setlength(arr,4,5);
  showmessage(arr[1,2]);
end;
ÉùÃ÷Ò»¸ö¶þάÊý×éµÄ·½·¨ÊÇÓ ......

Delphi ¹Ø¼ü×ÖÏê½â


 ÒýÓÃ×Ô£ºhttp://www.delphifans.com/infoview/Article_6445.html
Delphi ¹Ø¼ü×ÖÏê½â
absolute
//ËüʹµÃÄãÄܹ»´´½¨Ò»¸öбäÁ¿, ²¢ÇҸñäÁ¿µÄÆðʼµØÖ·ÓëÁíÒ»¸ö±äÁ¿Ïàͬ.
var
  Str: string[32];
  StrLen: Byte absolute Str;
//Õâ¸öÉùÃ÷Ö¸¶¨Á˱äÁ¿StrLenÆðʼµØÖ·ÓëStrÏàͬ.
//ÓÉÓÚ×Ö·û´®µÄµÚ0¸öλ ......

DelphiµÄOFFICE¿ª·¢[ת]

1£®ÒýÑÔ
ÔÚÀûÓÃdelphi¿ª·¢Ó¦ÓóÌÐòµÄʱºò£¬Í¨³£ÎÒÃÇÒªÉè¼Æ³öºÜ¶à¸÷ÖÖ¸ñʽµÄÎĵµ¡¢±¨±í£¬¾­³£Òª½øÐÐÎļþµÄ´´½¨¡¢±à¼­¼°Ð޸ģ¬ËäÈ»delphi±¾ÉíÌṩÁ˺ܶàÉè¼Æ±¨±íµÄ¿Ø¼þ»ò·½·¨£¬µ«ÊÇ´æÔÚÃ÷ÏԵIJ»×㣬±ÈÈçÖÐÎÄÊäÈ룬Êý¾Ý¸ñʽµÄ¿ØÖƵȲÙ×÷ÆðÀ´±È½ÏÂé·³¡£ÀûÓôó¼Ò¶¼ºÜÊìϤµÄoffice¹¤¾ß½áºÏ¿ª·¢£¬Äܹ»ºÜºÃµÄ½â¾öÕâ·½ÃæµÄÎÊÌâ¡£ÒÔÏ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ