¹ØÓÚ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;
ÉùÃ÷Ò»¸ö¶þάÊý×éµÄ·½·¨ÊÇÓà array of array of ÀàÐÍ ÕâºÜÌù½üÈËÃǵÄ˼ά·½Ê½¡£Í¬Àí¿ÉÍÆ³öÈýάÊý×éµÄÉùÃ÷·½·¨Îª array of array of array of ÀàÐÍ
¶Ô¶þάÊý×é´óСµÄµ÷ÕûÈÔȻʹÓÃSetLengthº¯Êý£¬µÚÒ»¸ö²ÎÊýÊÇÊý×éÃû³Æ£¬µÚ¶þ¸ö²ÎÊýÊÇ×î¿¿½üÊý×éÃû³ÆÄǸöά¶ÈµÄ´óС£¬µÚÈý¸ö²ÎÊýÊÇÔ¶ÀëÊý×éÃû³ÆµÄά¶ÈµÄ´óС£¬ÒÔ´ËÀàÍÆ¡£
ÔÚÒÔÉϵÄÀý×ÓÖл¹ÓÐÒ»¸öÌØ±ðÖ®´¦¡£¾ÍÊÇÉùÃ÷ÁËÒ»¸ö´óÒ»µã·¶Î§µÄ¶þάÊý×éÒÔºó£¬Èç¹û¶ÔÊý×éÖØÐ·ÖÅä´óС£¬²¢ÇÒÕâ¸öеĴóСÊÇСÓÚÔÀ´Êý×éµÄ£¬ÄÇô£¬´óµÄ¶þάÊý×éÓëСµÄ¶þάÊý×éÖ®¼äÏà²îµÄ²¿·Ö½«»á±»Çå³ý¡£¼´±ãÊÇÂíÉϽ«Êý×é´óСµ÷Õû»ØÀ´ÉõÖÁ¸ü´ó£¬¶¼²»ÄÜʹÕâЩÊý¾Ý»ØÀ´¡£Õâ¸öºÍDelphiÖÐÌṩµÄTStringGrid¿Ø¼þ²»Ò»Ñù¡£¶ÔTStringGridµÄÐÐÁÐÊýÁ¿½øÐе÷Õûºó£¬ÔÀ´µÄÊý¾Ý¶¼²»»á¶ªÊ§£¬³ý·ÇʹÓÃTStringGrid.Rows.Clear;
ÁíÍ⣬DelphiÖл¹ÔÊÐíÉèÖ÷ǾØÕóÐ͵Ķ¯Ì¬Êý×é¡£ÒÔÏÂÊÇÒ»¸öÀý×Ó
procedure TMainForm.Button1Click(Sender: TObject);
var
arr:array of array of string;
begin
setlength(arr,10);
setlength(arr[2],5);
arr[2,4]:='this is a test';
showmessage(arr[2,4]);
showmessage(arr[3,1]);
end;
ÕâÀïÃæÉùÃ÷ÁËÒ»¸ö¶þά×Ö·û´®Êý×éarr£¬Ê×ÏȶÔÕâ¸öÊý×éµÄµÚһά¶È£¨°´ÕÕϰ¹ß£¬³ÆÖ®Îª“ÁД£©½øÐÐÉèÖ㬴óСΪ10¸ö¡£È»ºó½«Õâ¸öÊý×éµÄµÚÈýÁУ¨Ï±êÊÇ2£¬µ«Êµ¼ÊÈ´ÊǵÚÈýÁУ©µÄÐÐÊý½øÐе¥¶ÀÉèÖ㬴óСΪ5¸ö¡£ÕâÑù¾Í¹¹³ÉÁËÏÂͼÕâÑùµÄ¾ØÕó
N N X N N N N N N N
N N X N N N N N N N
N N X N N N N N N N
N N X N N N N N N N
N N * N N N N N N N
(“X” ´ú±í¿ÉÓà “N”´ú±í²»¿ÉÓà “*”´ú±íarr[2,4]ÔªËØ)
È»ºó¶Ôarr[2,4]½øÐи³Öµ“this is a test”¡£ÏÈÒªÇóÏÔʾarr[2,4]µÄÖµ£¬OK£¬ÍêȫûÓÐÎÊÌ⣬µ«µ½ÁËarr[3,1]µÄʱºòÈ´±¨´í£¬ÔÒò¾ÍÊÇÕâ¸ö¶þάÊý×é²»ÊǾØÕóÐÎʽ£¬³ýÁ˵ÚÈýÁУ¬ÆäËûµØ·½¶¼ÊDz»´æÔڵ쬾¡¹ÜÒѾÉùÃ÷ÁË¡£
Ïà¹ØÎĵµ£º
DelphiÓÃWebBrowser±à³Ì-×Ô¶¯µÇ¼²Ù×÷
2009Äê08ÔÂ18ÈÕ ÐÇÆÚ¶þ 00:39
ÀûÓÃDelphiµÄOlevariantÀàÐÍ
--------------------------------------------------------------------------------
µ¥¸öframesµÄÊäÈë
var
o : Olevariant;
begin
o := WebBrowser.OleObject.document.all.item('LoginUserID',0); &nbs ......
¶¨Ò壺
CbName: TComboBox;
width: Integer; //ʵ¼ÊËùÐèµÄ¿í¶È
ÔÚÖ´ÐдúÂëÖа´ÈçÏ·½·¨Ð´£º
width := CbName.Canvas.TextWidth(CbName.Items[I]); //¿ÉÓô˷½·¨Í¨¹ý±éÀú»ñµÃijѡÏîµÄ×î´ó¿í¶È£¬Ò²¿ÉÒÔ°´×Ô¼ºµÄÐ ......
ÎÒһֱʹÓÃDelphi6¿ª·¢Èí¼þ£¬¿´µ½CSDNÉϵÄOPhoneÊÖ»ú¿ª·¢£¬ÓÖÈ¥GoogleÒ»·¬£¬Ìý˵±àдÊÖ»úÈí¼þ
ÄÜ׬Ǯ£¬ËùÒÔҪѧϰJava ME£¬¶ÁÁ˼¸Ì첩ÎÄ£¬´ó¶àÊý¸ÅÄî¸ãÇå³þÁË¡£
ҪѧJavaME¾ÍµÃÏÈѧJavaSE£¬ËùÒÔ×°Á˺ܶàÈí¼þ(²»×°ÄÇô¶à£¬OPhone¾Í×°²»ÉÏÈ¥)¡£
ÍÆ¼öһƪÓÅÐãµÄÎÄÕ£º
ÔÚ NetBeans IDE ÖÐÉè¼Æ Swing GUI
¶ÁÍêÕâÆªÎÄÕ£¬³õ ......
procedure mc_SplitStr(sourStr:String;splitChar:String;desLst:TStringList);
var
tmpStr:String;
sValue:String;
iStart,iPos:Integer;
begin
try
desLst.Clear; //ºÜÖØÒª£¬·ñÔò£¬»áÒ» ......