Ë˵DelphiûÓйþÏ£
	
    
    
	Ë˵DelphiûÓйþÏ££¿££DelphiÖУ¬TStringListºÍTHashedStringListµÄÐÔÄܶԱÈ
Ôø¾¿´µ½ºÜ¶àÈËÔÚÈÂÈÂDelphiûÓйþÏ£±í£¬ÕâЩÈ˵͝ÊÖÒâʶ¹ÃÇÒ²»ÂÛ£¬È´»¹ÓкܶàÈËÒÔ´ËÀ´Ö¤Ã÷Delphi±È±ðµÄÓïÑÔÀ¬»ø£¬ÊµÔÚÊÇ...
ºÃ£¬ÀÎɧ´òס£¬×ª½ÓÕýÌâ¡£
TStringListÊÇÎÒÃdz£ÓõÄ×Ö·û´®ÁбíÀàÐÍ£¬Ó÷¨¾Í²»ÔÚÕâÀï׸Êö£¬µ«ÊÇ£¬ÔÚÊý¾ÝÆäÏîÊýÔö¶àʱ£¬ÆäËÑË÷£¨Ö÷ÒªÊÇname/keyËÑË÷ºÍindexofËÑË÷£©ÐÔÄܻἱ¾çϽµ£¬ÔÒòÊÇTStringListµÄÄÚ²¿´æ´¢Ê¹ÓÃÁËÁ´±íÐÎʽ£¬¶øËÑË÷²Ù×÷ʹÓÃÁËÑ»·±éÀú·½Ê½¡£
ÖµµÃ¸ßÐ˵ÄÊÇ£¬ÔÚiniFilesµ¥Ôª£¬DelphiΪÎÒÃÇÌṩÁËTHashedStringListÀàÐÍ£¬¼´£¬¾¹ý¹þÏ£´¦ÀíµÄTStringList£¬Ëü¼Ì³Ð×ÔTStringList£¬Ö»ÊǶÔËÑË÷·½·¨½øÐÐÁËÓÅ»¯£¬Òò´Ë£¬ÎÒÃÇÍêÈ«¿ÉÒÔ·ÅÐĵÄÔÚ´óÁ¿×Ö·û´®ËÑË÷µÄʱºòʹÓÃËüÀ´´úÌæTStringList£¬¶øÐèÒª¸Ä±äµÄÖ»ÊÇÔÚ:=µÄºóÃæÓÃTHashedStringList.createÀ´´úÌæTStringList.create£¬µ«ÆäËÙ¶ÈÈ´Ìá¸ßÁËÒ»¸öÊýÁ¿¼¶¡£
ΪÁËÏÔʾÁ½Õß¼äÐÔÄܵIJî¾à£¬ÎÒдÁ˼¸¸ö¼òµ¥µÄÓï¾äÀ´²âÊÔËûÃǸ÷×ÔµÄÌØÐÔ¡£
unit ufrmMainForm;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, StrUtils,IniFiles;
type
  TForm1 = class(TForm)
    btn1: TButton;
    mmo1: TMemo;
    procedure btn1Click(Sender: TObject);
  private
    ...{ Private declarations }
  public
    procedure testTHashStringList;
    procedure testTStringList;
    ...{ Public declarations }
  end;
var
  Form1: TForm1;
implementation
uses DateUtils;
...{$R *.dfm}
procedure TForm1.btn1Click(Sender: TObject);
begin
    testTStringList;
    mmo1.Lines.Add('--------------------');
    testTHashStringList;
end;
procedure TForm1.testTHashStringList; 
var
    hsl: THashedStrin
    
     
	
	
    
    
	Ïà¹ØÎĵµ£º
        
    
    ´ó¼Ò¶¼ÈÏΪ£¬CÓïÑÔÖ®ËùÒÔÇ¿´ó£¬ÒÔ¼°Æä×ÔÓÉÐÔ£¬ºÜ´ó²¿·ÖÌåÏÖÔÚÆäÁé»îµÄÖ¸ÕëÔËÓÃÉÏ¡£Òò´Ë£¬ËµÖ¸ÕëÊÇCÓïÑÔµÄÁé»ê£¬Ò»µã¶¼²»Îª¹ý¡£Í¬Ê±£¬ÕâÖÖ˵·¨Ò²ÈúܶàÈ˲úÉúÎó½â£¬ËƺõÖ»ÓÐCÓïÑÔµÄÖ¸Õë²ÅÄÜËãÖ¸Õë¡£Basic²»Ö§³ÖÖ¸Õ룬Ôڴ˲»ÂÛ¡£Æäʵ£¬PascalÓïÑÔ±¾ÉíÒ²ÊÇÖ§³ÖÖ¸ÕëµÄ¡£´Ó×î³õµÄPascal·¢Õ¹ÖÁ½ñµÄObject Pascal£¬¿ÉÒÔ˵ÔÚÖ¸ÕëÔËÓ ......
	
    
        
    
     ¸ñʽ£º²Ù×÷Êý Shl/Shr ÒÆ¶¯Î»Êý 
˵Ã÷£º²Ù×÷ÊýÓë·µ»ØÖµ¶¼ÊÇÕûÊý
Àý×Ó£º16(10) = 10000(2)
     16(10) Shr 1 = 10000(2) Shr 1 = 1000(2) = 8(10)
     16(10) Shr 2 = 10000(2) Shr 2 = 100(2) = 4(10)
˵Ã÷£ºÒ»¸öÕûÊý(I)°´Î»×óÒÆÒ»Î»£¬Ï൱ÓÚ°ÑËü³ËÒÔ2£¬¼´ I * 2
&n ......
	
    
        
    
     Ò»Äêǰ¿ª·¢ÁËÒ»¸öMIDASµÄ³ÌÐò,×î½üÐ޸ķþÎñ¶Ë,¿ÉÊÇÕâ¸ö·þÎñÎÞ·¨×¢²á,×îºóÖÕÓÚÕÒµ½Á˽â¾ö°ì·¨,Õâ¸öÏà¹ØÎÄÕÂÈçÏÂ:(ËãÊDZ¸·Ý°É)
£¨Ò»£©MIDASÊÇʲô£¿ 
DelphiÖÐMIDASµ½µ×ÊÇÊ²Ã´ÄØ?ºÍËûÏà¹Ø×é¼þÊÇÊ²Ã´ÄØ?  
MIDAS(Multitiered Distributed Application Services)¶à²ã·Ö²¼Ê½Ó¦Ó÷þÎñ¡£
   DelphiËùÌá³ö ......
	
    
        
    
     ÒÔǰ¿´ÁË Í¨¹ý±ÀÀ£µØÖ·ÕÒ´íÎóÐÐÊýÖ®VC°æ ÄÇʱºò»¹Ã»ÓÃDELPHI 
×òÍí¸ÕºÃÓÖ¿´µ½ÁË ËùÒÔ¾ÍÊÔÁËÒ»ÏÂDELPHIµÄ£¬Óë´ó¼Ò¹²Ïí ^_^
ʲôÊÇ MAP Îļþ£¿¼òµ¥µØ½²£¬ MAP ÎļþÊdzÌÐòµÄÈ«¾Ö·ûºÅ¡¢Ô´ÎļþºÍ´úÂëÐкÅÐÅÏ¢µÄΨһµÄÎı¾±íʾ·½·¨£¬Ëü¿ÉÒÔÔÚÈκεط½¡¢ÈκÎʱºòʹÓ㬲»ÐèÒªÓжîÍâµÄ³ÌÐò½øÐÐÖ§³Ö¡£¶øÇÒ£¬ÕâÊÇΨһÄÜÕÒ³ö³Ì ......