比较两个二维数组是否相等
生活随笔
收集整理的這篇文章主要介紹了
比较两个二维数组是否相等
小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
?用 CompareMem 對比內存即可.
?
{對比靜態數組} procedure TForm1.Button1Click(Sender: TObject); vararr1: array[0..3] of AnsiChar;arr2: array[0..3] of Byte; beginarr1[0] := 'A'; arr1[1] := 'B'; arr1[2] := 'C'; arr1[3] := 'D';arr2[0] := 65; arr2[1] := 66; arr2[2] := 67; arr2[3] := 68;if CompareMem(@arr1, @arr2, SizeOf(arr1)) thenShowMessage('arr1 與 arr2 中的數據相同'); end;{對比動態數組} procedure TForm1.Button2Click(Sender: TObject); vararr1: array of AnsiChar;arr2: array of Byte; beginSetLength(arr1, 4);SetLength(arr2, 4);arr1[0] := 'A'; arr1[1] := 'B'; arr1[2] := 'C'; arr1[3] := 'D';arr2[0] := 65; arr2[1] := 66; arr2[2] := 67; arr2[3] := 68;if CompareMem(arr1, arr2, SizeOf(arr1)) thenShowMessage('arr1 與 arr2 中的數據相同'); end;{多維數組也一樣} procedure TForm1.Button3Click(Sender: TObject); vararr1: array[0..1, 0..1] of AnsiChar;arr2: array[0..1, 0..1] of Byte; beginarr1[0,0] := 'A'; arr1[0,1] := 'B'; arr1[1,0] := 'C'; arr1[1,1] := 'D';arr2[0,0] := 65; arr2[0,1] := 66; arr2[1,0] := 67; arr2[1,1] := 68;if CompareMem(@arr1, @arr2, SizeOf(arr1)) thenShowMessage('arr1 與 arr2 中的數據相同'); end; 靜態數組與動態數組的不同之處在于:動態數組為動態指針,運行時動態生成,而靜態數組編譯時生成。總結
以上是生活随笔為你收集整理的比较两个二维数组是否相等的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: 【2015年第4期】大数据引领教育未来:
- 下一篇: 【软件质量】对this或字符串加锁的弊病