我在做hsv的量化,量化之后为了以后能逆量化我定义了一个数组,能在逆量化时把量化后产生的数组当参数传递吗?

解决方案 »

  1.   

    当然可以啦!
    用Variant就可以。Delphi的Source中很多地方用到的。(COM相关)
      

  2.   

    具体怎么用呢?我象底下那样传了数组参数,出错显示“array type required”procedure procedure TForm1.Button2Click(hsvdata:byte);
    var
      a,d,c,t,z:byte;
      k,i,j:integer;
      bmp:Tbitmap;
      h:Thue;
      m,n,m1,n1:double;
      scanline:PRGBline;
      r,g,b:byte;
    begin
      for k:=0 to (imgsize div 3)-1 do
      begin
        a:=(hsvdata[k]) div 32;//这里出错
        d:=(hsvdata[k] mod 32)div 4;//
        c:= (hsvdata[k] mod 128) ;//
    .......
            
      

  3.   

    TForm1.Button2Click过程的参数是不能变的。
      

  4.   


    TForm1.Button2Click过程的参数是不能变的。
    你应另外自定义一个函数procedure procedurename(hsvdata:array[1..100]of byte)数组长度不定的话可用变长数组hsvdata:array of byte;yongyo用的时候再用setlength(hsvdata,100)来设定长度