一个简单的问题

Question

PChar buf;
GetMem(buf,100);buf[0];//delphi  数组从1开始    这个算数组吧  是不是不能这样用 如果这个用会有什么效果

Answer 1

var
buf:Pchar;
begin
    getmem(buf,100);
    strpcopy(buf,'0123456') ;//存入字符串0123456
    edit1.Text := buf[0];  //输出0，Pchar比较特殊，是从0开始的；
    dispose(buf);
end；

Answer 2

我错了，不是dispose(buf); 应该用Freemem释放

Answer 3

delphi中定义数组时可以定义起始下标。Pchar是指向char的指针。当用到指针时，下标从0开始。
buf[0]是buf中第一个字符。