关键:Find要事先Sort排序,Indexof不用排序. TStringList内部查找相关的数据.待调试代码时才知道痛苦,浪费无数时间后,只得一步步跟踪,才发 现Find方法返回的Index总是错误的,当时一阵郁闷,随手按下F1键,Find的Help文档展现眼前,对于该 函数是这样描述的:Locates the index for a string in a sorted list and indicates whether a string with that value already
这是一个实例: 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
这是一个实例: 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