var
  name_buf:pchar;
begin  getprivateprofilesectionnames(@name_buf,1024,pchar('ykt.ini'));
  form1.Memo1.Lines.Add(strpas(name_buf));
  result:=true;在MDMO1中显示出来的取得的节名是乱马,您知道是怎么回事吗?

解决方案 »

  1.   

    没有给name_buf分配内存,它是一个指针。
    GetMem(name_buf, MAXBYTE);
    getprivateprofilesectionnames(@name_buf,1024,pchar('ykt.ini'));
      form1.Memo1.Lines.Add(strpas(name_buf));
    FreeMem(name_buf);
      result:=true;
    —————————————————————————————————
    宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
    —————————————————————————————————