我定义了TRGBLine1这个数组,用来指向每一个象素的r,g,b值
type
   TRGB1=record
          R1,G1,B1:byte;
          end;
    TRGBLine1=array[0..65535]of TRGB1;
    for k:=0 to ((image2.Width)*(image2.height)-1) do
    begin
        ......
        hsvtorgb(h,t,z,r,g,b);//调用自定义函数进行转换
        TRGBLine1[k].R1:=r;//这里出错显示"("expected,but"["found.
        TRGBLine1[k].G1:=g;//同上
        TRGBLine1[k].B1:=b;//同上
    end;
    l:=0;
    for i:=0 to image2.Height-1 do
    begin
      scanline:=image2.picture.bitmap.Scanline[i];
      for j:=0 to image2.Width-1 do
      begin
        scanline[j].r:=TRGBLine1[l].R1;
        scanline[j].G:=TRGBLine1[l].G1;
        scanline[j].b:=TRGBLine1[l].B1;
        inc(l);
      end;
    end;
    Image2.Refresh;
end;