查找数组中的元素的函数

Question

我定义了一个RECORD类型Tcell_p = record
        Sql_id: integer; //  整型     （关键字）
        Cell_id: integer;
        C_Row: integer; // 整型      行号
        C_Col: integer;
end;var  TMP_a :array of  Tcell_p;我给数组TMP_a中赋了好多值后，我现在想找数组元素（record型）中的 
C_Row＝10    C_Col=20的元素的下标，有函数吗

Answer 1

循环呀
for i:=low(TMP_a) to High(TMP_a) do
begin
  if (TMP_a[i].C_Row=10) and (TMP_a[i].C_Row=20) then 
  begin
    Result:=i
    break;
  end;
end;

Answer 2

for i:=low(TMP_a) to High(TMP_a) do
begin
  if (TMP_a[i].C_Row=10) and (TMP_a[i].C_Row=20) then 
  begin
    Result:=i
    break;
  end;
end;

Answer 3

速度不是问题！如果想更快就要将C_Row、C_Col和数组下标联系起来！