FindKey()的查询参数能否用变量代替？

如下两个代码块，只有FindKey()的查询参数不同，
能否把[ID1]和[ID1,ID2]用一个变量代替？
if i>0 then
begin
  while ClientDataSet1.FindKey([ID1]) do
  begin
    //代码块A
  end;
end
else
begin
  while ClientDataSet1.FindKey([ID1,ID2]) do
  begin
    //代码块A
  end;
end;
简化成类似
if i>0 then x:=[ID1] else x:=[ID1,ID2];
while ClientDataSet1.FindKey([ID1,ID2]) do
begin
  //代码块A
end;