TStringListポインタを削除すると例外がスローされるのはなぜですか？

Question

私はEmbarcadero C++ Builderを使用しています。

私はTStringListを宣言し、関数全体でそれを使用する関数を持っています。そして、関数の最後にオブジェクトdeleteがあります。

このコードを幸せに32ビットアプリケーションとして使用していて、これを64ビットアプリケーションに変換しましたが、TStringListを削除しようとすると「無効なポインタ操作」例外が発生します。何か案は？

私は文字ポインタ（ヒープメモリ空間を作成するためにnewを使用）と操作deleteを使用する別の関数で同じ問題を抱えていました。私は、その関数のスタックスペースを持つローカルバッファを作成してしまったが、私はTStringListオブジェクトを使用したいので、この1つに固執している。あなたのコードは、二回deleteListにあなたを引き起こし、それにロジックのバグを持っている、またはそれを完全に漏れて、コメントで述べたように

String ReadUserConfig(String ConfigString) { 
    String UserConfigPath = AppDrive + "\\DC\\userconfig.csv"; 

    TStringList *List = new TStringList; 


    if (FileExists(UserConfigPath)) { // file present, parse it 
     try { 
      List->LoadFromFile(UserConfigPath); 
      delete List; 
     } 
     catch(...) { 
      ShowMessage("Exception in ReadUserConfig()"); 
      return ReturnString; 
     } 
     for (int i = 0; i < List->Count; ++i) { 
      String thisLine = List->Strings[i]; 

      /* search for ConfigString in this line */ 
      if ((thisLine.Pos(ConfigString) != 0) && 
       (thisLine.Pos("USER_CONFIG") != 0)) { 
       /* grab everything right of ConfigString */ 
       thisLine = thisLine.SubString 
        (thisLine.Pos(ConfigString) + ConfigString.Length() + 1, 
        thisLine.Length()); 
       ReturnString = thisLine.Trim(); 

       i = List->Count; 
      } 
     } 

    } 

    delete List; /* CAUSES INVALID POINTER EXCEPTION */ 
    return ReturnString; 
} 

Answer 1

：ここ

はコードです。

より代わりにこのような何か試してみてください：

String ReadUserConfig(String ConfigString) { 
    String UserConfigPath = AppDrive + "\\DC\\userconfig.csv"; 

    try { 
     TStringList *List = new TStringList; 
     try { 
      if (FileExists(UserConfigPath)) { // file present, parse it 
       List->LoadFromFile(UserConfigPath); 

       for (int i = 0; i < List->Count; ++i) { 
        String thisLine = List->Strings[i]; 

        /* search for ConfigString in this line */ 
        if ((thisLine.Pos(ConfigString) != 0) && 
         (thisLine.Pos("USER_CONFIG") != 0)) { 
         /* grab everything right of ConfigString */ 
         thisLine = thisLine.SubString(thisLine.Pos(ConfigString) + ConfigString.Length() + 1, thisLine.Length()); 
         ReturnString = thisLine.Trim();  
         break; 
        } 
       } 
      } 
     } 
     __finally { 
      delete List; 
     } 
    } 
    catch(const Exception &e) { 
     ShowMessage("Exception in ReadUserConfig()\n" + e.Message); 
    } 
    catch(...) { 
     ShowMessage("Exception in ReadUserConfig()"); 
    } 

    return ReturnString; 
} 

または、代わりにtry/finallyブロックのstd::auto_ptr（事前C++ 11）またはstd::unique_ptr（C++ 11以降）を使用します。

#include <memory> 

String ReadUserConfig(String ConfigString) { 
    String UserConfigPath = AppDrive + "\\DC\\userconfig.csv"; 

    try { 
     //std::auto_ptr<TStringList> List(new TStringList); 
     std::unique_ptr<TStringList> List(new TStringList); 

     if (FileExists(UserConfigPath)) { // file present, parse it 
      List->LoadFromFile(UserConfigPath); 

      for (int i = 0; i < List->Count; ++i) { 
       String thisLine = List->Strings[i]; 

       /* search for ConfigString in this line */ 
       if ((thisLine.Pos(ConfigString) != 0) && 
        (thisLine.Pos("USER_CONFIG") != 0)) { 
        /* grab everything right of ConfigString */ 
        thisLine = thisLine.SubString(thisLine.Pos(ConfigString) + ConfigString.Length() + 1, thisLine.Length()); 
        ReturnString = thisLine.Trim();  
        break; 
       } 
      } 
     } 
    } 
    catch(const Exception &e) { 
     ShowMessage("Exception in ReadUserConfig()\n" + e.Message); 
    } 
    catch(...) { 
     ShowMessage("Exception in ReadUserConfig()"); 
    } 

    return ReturnString; 
} 

を