如何在调试器中显示 TStringList 的内容？

Question

我想在调试应用程序时显示 TStringList 的全部内容。 相反，我只是得到指示。 Flist 仅显示地址。

Answer 1

如果您使用的是 Delphi 2010 或更高版本，调试器允许使用调试可视化工具来实现此目的。

对于旧版本，您可以在“监视”窗口中转储 Text 属性的内容或使用 OutputDebugString，但这很难阅读。您可以为列表中的每个元素设置监视，但这仅适用于非常短的列表。

我可能会使用外部日志记录应用程序，例如 CodeSite 或 SmartInspect 可让您在一次调用中转储 TStringList 的内容。

Answer 2

检查文本属性。它是字符串列表的串联版本。

Answer 3

由于我使用的是 BDS MMVI，因此我使用“超聪明”方法来解决此类问题，我将其用于大型 xml 文档。我启动上下文文件编辑器（顺便说一句，用 delphi 编写的功能非常强大的免费文本编辑器）。在调试器窗口上只需执行 FList.SaveToFile('contents.txt')，因为上下文可以监视文件修改，所以我可以看到 xml 文件中发生的情况。

抱歉这个“聪明”的笑话，但它确实对我有用。

和平

Answer 4

我现在有了 D2010，就开始使用可视化工具。我曾经使用一个名为 CArray 的函数，它会返回一个字符串数组。如果我将 CArray(MyStringList) 添加到监视窗口，我将能够检查字符串列表的内容。我曾经受雇编写 VB6 代码，我有点喜欢用于转换为有用类型的各种“C”函数。用于字符串列表的 CArray 和用于 ClientDataset 字段的 CArray 对于调试最有用。

  function  CArray(List: TStrings): TStrArray; Overload;
  var i,
      iCount: Integer;
  begin
    iCount := List.Count;
    SetLength(Result, iCount);
    for i := 0 to Pred(iCount) do Result[i] := List[i];
  end;

Answer 5

我的两分钱：

您可以评估表达式 list_instance_variable.SaveToFile('temp_file_name.txt')，然后在任何编辑器中检查文件的内容。

为此，您必须在代码中的任何位置使用此函数并关闭优化（至少在 Delphi 7 中），否则 SaveToFile 的目标代码将被链接器删除。