关于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]就报错?!
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,和你的定义冲突
对于 f 这样直接使用数组,编译器会认为默认下标是0,和你的定义冲突
如果我不想从0开始··要怎么做呢··一般不从0开始不报错是什么情况···
作者: totoro_1018 发布时间: 2011-11-03
相关阅读 更多
热门阅读
-
office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐 附激活工具
阅读:74
-
如何安装mysql8.0
阅读:31
-
Word快速设置标题样式步骤详解
阅读:28
-
20+道必知必会的Vue面试题(附答案解析)
阅读:37
-
HTML如何制作表单
阅读:22
-
百词斩可以改天数吗?当然可以,4个步骤轻松修改天数!
阅读:31
-
ET文件格式和XLS格式文件之间如何转化?
阅读:24
-
react和vue的区别及优缺点是什么
阅读:121
-
支付宝人脸识别如何关闭?
阅读:21
-
腾讯微云怎么修改照片或视频备份路径?
阅读:28