delphi 字符数组处理,该怎么解决

delphi 字符数组处理
var
  buf: array[0..MAX_PATH - 1] of Char;
 然后给buf赋一字符串，现在我要判断这个字符串最后一个字符是否为\，如果是的话，则把\删除，我用if copy(buf,length(buf),1)=\
不能判断出，因为length(buf)会指到MAX_PATH - 1位置

哪位大侠知道要怎么才能定位到最后一个字符

[解决办法]

Delphi(Pascal) code

  if buf[length(PChar(@buf[0]))-1]='\' then      buf[length(PChar(@buf[0]))-1]:=#0;