关于声明函数中var 参数的使用(0分)

1、函数无法使用
//函数声明
function GetBlackList( var BlackListChar): Longint;
var
buf:array[1..10] of char;
i:Integer;
begin
//参数赋值
for i:=1 to 10 do
buf:='F';
HexToBin(Pchar(buf),@BlackList,10);
//BlackList的值$ffffffffff
end;
函数调用
procedure TMainForm.Button2Click(Sender: TObject);
var
ret:Integer;
buf:array[1..20] of char;
begin
ret:=GetData(@buf); 这种方法调用编译提示声明不一致
//如去掉函数参数中的var,可调用，但无法得到$ffffffffff
end;

把var该为const（在函数声明的时候）试一下。