filename:string;
filename:=filename;
name:=@filename;
for n:=0 to namelen-1 do
begin
bmp[p]:=((bmp[p] and $f0) or (byte(name[n]) and $0f));
bmp[p+2]:=((bmp[p+2] and $f0) or (byte(name[n])and $f0));
end;
为何会出现Array type required 错误???是什么原因??该如何解决??
P.S:bmp是一个字节数组/
filename:=filename;
name:=@filename;
for n:=0 to namelen-1 do
begin
bmp[p]:=((bmp[p] and $f0) or (byte(name[n]) and $0f));
bmp[p+2]:=((bmp[p+2] and $f0) or (byte(name[n])and $f0));
end;
为何会出现Array type required 错误???是什么原因??该如何解决??
P.S:bmp是一个字节数组/
pascal非常严谨,不能直接用指针加数字的
事实上delphi的字符串本身可以被当成字符数组来看,但是记住下标从1开始var
s: string;
begin
s := 'asdf';
showmessage(s[1]);
end;得到字符'a'