+ -
当前位置:首页 → 问答吧 → 关于array的问题

关于array的问题

时间:2011-11-03

来源:互联网

procedure TForm1.Button4Click(Sender: TObject);
var
f:array[0..128]of char;
m:TshfileOpstruct;

begin
illchar(f,sizeof(f),0);
strpcopy(f,pchar(edit1.Text));

 with m do
begin
 wnd:=handle;
 wfunc:=fo_delete;
 pfrom:=@f;
 pto:=nil;
 fFlags:= fof_NoConfirmation;
 lpszprogresstitle:='正在删除';
 end;
 if shfileoperation(m)=0 then
 messagebox(handle,'删除成功','删除信息',MB_ok +mb_iconinformation)

end;

想问下,为什么array[0..128]改成[1..128]就报错?!

作者: totoro_1018   发布时间: 2011-11-03

对于 f 这样直接使用数组,编译器会认为默认下标是0,和你的定义冲突

作者: funxu   发布时间: 2011-11-03

引用 1 楼 funxu 的回复:

对于 f 这样直接使用数组,编译器会认为默认下标是0,和你的定义冲突


如果我不想从0开始··要怎么做呢··一般不从0开始不报错是什么情况···

作者: totoro_1018   发布时间: 2011-11-03