向 TList 和 TStringList 添加稳定排序的简单方法

2023-11-22

我将 TList/TObjectList 和 TStringList(带有关联对象)用于多种任务,或者按原样使用,或者作为更复杂结构的基础。虽然排序功能通常足够好,但有时我需要做一个stable排序,两个列表都使用快速排序。

为 TList 和/或 TStringList 实现稳定排序的最简单方法是什么?我是否必须编写自己的排序例程,或者可以通过使用 TStringListSortCompare/TListSortCompare 的一些巧妙技巧来完成吗?


您必须编写自己的排序例程。

您可以阅读当前的 QuickSort 实现,并编写自己的稳定版本(例如合并排序或任何其他稳定变体).

一些技巧:

  • 如果您确定索引是 Count,您可以使用快速指针数组(TList.List[])而不是更慢Items[] or GetItem():子方法调用和范围检查会减慢执行速度;
  • 比较函数大多数时候是搜索的速度瓶颈——所以要小心这部分;
  • 如果您需要速度,请在真实(例如随机)数据上使用真实的分析器 - 但在使其快速之前先使其正确;
  • 从现有的排序实现开始;
  • 为了最小化堆栈空间,您可以使用临时记录来存储并在递归调用之间共享变量。
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

向 TList 和 TStringList 添加稳定排序的简单方法 的相关文章

  • Delphi 7 - 处理表单中嵌入框架的 MouseWheel 事件?

    你好 我有一个表格 里面有几个框架 对于某些框架 我希望滚动内容 或至少处理鼠标滚轮事件 我已经尝试过以下方法 只需为每个帧分配一个 OnMouseWheel 事件处理程序 重写父窗体的 MouseWheel 事件 procedure TF
  • 使用 Delphi 读取 Excel 电子表格

    我需要使用 Delphi 2010 读取和写入 Excel 电子表格 没什么花哨的 只需读取和写入不同工作表上特定单元格和范围的值 需要在没有安装 Excel 的情况下工作并支持 Excel 2007 我看过的一些东西 我尝试过使用ADO
  • TXMLDocument.Active := False 导致 FastMM4 错误消息“FastMM 检测到块在释放后已被修改”

    我们在 FullDebugMode 下使用 Delphi XE8 和 FastMM4 版本 4 992 会产生奇怪的效果 要重现效果 只需创建一个新的 TForm 应用程序 将 FastMM4 放入 DPR 文件的第一行 在表单上放置一个按
  • 如何将枚举类型放入字符串列表中?

    这行代码 ShowMessage GetEnumName TypeInfo TAlign 1 返回 alTop 当我想使用字符串变量 TAlign 而不是TAlign时 如何将枚举类型的所有值放入字符串列表中 就像是 ShowMessage
  • 为什么 TImage 旋转我的图像?

    编写一个移动应用程序 它从安全网站提取图像 如下所示 第一个图像 提取不正确 注意网络版本与移动版本 第二个图像在网站上正确显示 但 Delphi TImage 由于某种原因正在旋转它我不明白为什么 旋转设置为 0 并且在 TImage 组
  • 对于大型简单数据库,SQLite 和 DISQLite 有何比较?

    两者有什么区别SQLite http www sqlite org and DISQLite http www yunqa de delphi doku php products sqlite3 index为什么我要选择其中一个而不是另一个
  • 返回列表的前 n 个

    如何返回第一个n列表的元素 这是我所拥有的 define returns lambda list n cond null list 0 n n 1 car list cons car list returns cdr list n else
  • 数据框中按行相关

    我正在尝试计算大型数据帧的所有行之间的相关性 到目前为止已经提出了一个有效的简单 for 循环 例如 name lt c a b c d col1 lt c 43 78 43 84 37 92 31 72 col2 lt c 43 80 4
  • 如何实现DataGridView的自动排序?

    我以编程方式将列添加到 DataGridView 然后绑定到列表 默认情况下 列的排序模式为自动 但是当我运行我的应用程序时 单击标题没有任何反应 向上 向下箭头未显示 从看MSDN来看 关于自动排序并没有太多说的 他们更详细地介绍了程序化
  • 如何从数据框中按降序获取前n家公司

    我正在尝试从数据框中获取排名前 n 的公司 下面是我的代码 data Forbes2000 package HSAUR sort Forbes2000 profits decreasing TRUE 现在我想从这个排序向量中获取前 50 个
  • 添加到列表时有没有办法避免循环?

    我想知道这样的代码 List
  • 给定一个排序数组,就地删除重复项,使每个元素仅出现一次并返回新长度

    完整的问题 我开始在线学习 python 但对这个标记为简单的问题有疑问 给定一个排序数组 就地删除重复项 使得每个 元素只出现一次并返回新的长度 不分配 另一个数组的额外空间 您必须通过修改输入来完成此操作 数组就地 具有 O 1 额外内
  • 如何使用foldr为列表创建显示实例?

    我想为我的数据类型 我的列表 编写自己的显示实例 到目前为止 我的方法是有效的 但我总是在末尾有一个逗号 我已经尝试用最后一个元素启动折叠并将其从列表中删除 但它很麻烦而且不起作用 有没有更简单的方法来获得正确的解决方案 实际 1 2 3
  • 识别 2D 列表是否包含 Dart/Flutter 中的列表

    如何在不使用嵌套 for 循环的情况下识别 2D 列表是否包含另一个列表 我正在寻找类似的方法in在Python中 我尝试使用list contains x 但它似乎没有识别列表 List a 1 2 1 1 2 2 List b 1 2
  • 如何在 python 3.x 中操作嵌套字典?

    我被这个问题困扰了 你能解决这个挑战吗 开始了 我们在二级字典中表示一系列比赛中球员的分数 如下所示 match1 player1 57 player2 38 match2 player3 9 player1 42 match3 playe
  • 面向 Delphi 开发人员的 Qt

    有人知道为 Delphi C Builder VCL 开发人员解释 Qt 的书籍或教程吗 对于具有该背景的开发人员来说 学习 Qt 的最佳方法是什么 我对如何使用 Qt 完成我知道如何在 Delphi 中完成的事情特别感兴趣 例如 Qt 相
  • 如何将列表中的每个项目转换为字符串,以便连接它们? [复制]

    这个问题在这里已经有答案了 我需要加入一个项目列表 列表中的许多项目都是从函数返回的整数值 IE myList append munfunc 我应该如何将返回的结果转换为字符串以便将其加入列表 我是否需要对每个整数值执行以下操作 myLis
  • 为什么Python中pop()的大O与pop(0)不同[重复]

    这个问题在这里已经有答案了 他们不应该都是O 1 因为从 Python 列表中的任何位置弹出一个元素涉及销毁该列表并在新的内存位置创建一个元素 蟒蛇的list实现使用动态调整大小的 Carray在引擎盖下 删除元素usually要求您移动后
  • 将元组列表转换为字符串 Python

    例如 我用 python 编写了一个返回列表的函数 1 1 2 2 3 3 但我希望输出为字符串 这样我就可以用另一个字符替换逗号 这样输出就是 1 1 2 2 3 3 有什么简单的方法可以解决这个问题吗 感谢您提前提供任何提示 这看起来像
  • Android中如何检测程序的终止?

    当 Windows 程序终止时 它会调用事件处理程序 例如 OnClose OnDestroy 和析构函数 Destroy 当我想保存一些 INI 设置时 这些地方就是我要保存的地方 我为所有这些事件编写了事件处理程序 但当我终止程序时它们

随机推荐

  • Play 框架如何运作?

    我喜欢玩 与其他企业 Java 框架相比 它对于开发人员来说使用起来非常简单 但是 它是如何做到的呢 是什么让像 Java 这样的编译语言能够实现编辑 刷新循环 是什么让 Play 按其工作方式工作 Play 使用 Eclipse 编译器在
  • 在 PL/SQL 中打印记录字段

    如何在 PL SQL 中打印记录变量的所有字段 记录变量有很多字段 那么有没有比打印每个字段更好的方法呢 也尝试过动态sql但没有帮助 基于 Ollies 使用 dbms output 构建 但用于动态遍历光标 设置用于测试 create
  • ASP.NET MVC 3 - 在 jquery 对话框中编辑动态添加到模型集合的项目

    我是 MVC 新手 所以我不确定这里最好的方法是什么 我有一个视图模型 其中包含几个像这样的集合 public class MainViewModel public List
  • iPhone Web 应用程序可以使用相机吗?

    我有一个网络应用程序 我想拍照然后将它们上传到服务器 这可以通过网络应用程序完成吗 编辑 现在可以了 请参阅下面的答案 不可以 webapp 无法访问内部设备 尝试使用 PhoneGap 来缩小您的应用程序和内部设备之间的差距 但这将编译一
  • 通过列表和数组中的索引获取结构体项目

    当我使用数组时structs 例如 System Drawing Point 我可以通过索引获取项目并更改它 例如 此代码工作正常 Point points new Point new Point 0 0 new Point 1 1 new
  • 寻找曲线上的最佳权衡点

    假设我有一些数据 我想为其拟合参数化模型 我的目标是找到该模型参数的最佳值 我正在使用AIC BIC MDL奖励低误差模型的标准类型 但也会惩罚高复杂性的模型 可以说 我们正在为这些数据寻找最简单但最令人信服的解释 a la奥卡姆剃刀 根据
  • 如何在不删除 R 中存在 NA 的行的情况下执行聚类

    我有一个数据 其元素中包含一些 NA 值 我想做的是执行聚类而不删除行NA 存在的地方 我明白那个gower距离测量单位daisy允许这种情况 但为什么我下面的代码不起作用 我欢迎 雏菊 以外的其他选择 plot heat map with
  • Flutter Workmanager 插件在运行任务时无法与任何其他插件一起使用

    初始化工作管理器并创建任一任务后 如果我们在任务执行中使用任何插件 它将无法被识别并抛出如下错误 MissingPluginException 在通道 lyokone location 上找不到方法 getLocation 的实现 实际代码
  • 为什么 stdafx.h 会这样工作?

    像往常一样 当我的大脑搞乱了我自己无法弄清楚的事情时 我会向你们寻求帮助 这次我一直想知道为什么 stdafx h 会这样工作 据我了解 它做了两件事 包括我们的标准标头might 使用并且很少改变 作为编译器书签 代码不再预编译 现在 这
  • BOOST_CHECK_EQUAL 带有pair 和自定义运算符<<

    当尝试执行 BOOST CHECK EQUAL pair pair 时 尽管声明了它 但 gcc 找不到pair的流运算符 有趣的是 std out 找到了运算符 ostream operator lt lt ostream s const
  • 检测类型是否是主模板的专业化或用户提供的专业化

    假设我有这个 template
  • Tensorflow 数据集 API 中的过采样功能

    我想问一下目前的数据集API是否允许实现过采样算法 我处理高度不平衡的阶级问题 我认为在数据集解析 即在线生成 过程中对特定类进行过采样会很好 我已经看到了rejection resample函数的实现 但是这会删除样本而不是复制它们 并且
  • Google 应用引擎 JRE 类“黑名单”

    有一个 JRE 类白名单 对于 Google 应用程序引擎 我真正想要的是一个 黑名单 换句话说 Java API 不能在 GAE 上运行 这样的列表存在吗 开发人员是否在 GAE 上的 Java API 方面遇到过问题 他们似乎更多地采取
  • 使 SimpleDateFormat.parse() 在无效日期上失败(例如月份大于 12)

    我在用着java text SimpleDateFormat解析以下形式的字符串 yyyyMMdd 如果我尝试解析月份大于 12 的字符串 它不会失败 而是会滚动到下一年 完整的可运行重现 import java text ParseExc
  • 颜色的十六进制透明度[重复]

    这个问题在这里已经有答案了 我正在努力为我的应用程序小部件实现小部件透明度选项 尽管我在获取正确的十六进制颜色值时遇到了一些麻烦 作为十六进制颜色透明度的新手 我进行了一些搜索 尽管我找不到我的问题的具体答案 我想通过十六进制颜色设置透明度
  • 如果 Maven 中的传递依赖项来自我父级的其他子模块,我是否应该依赖它们?

    假设我们正在研究mortgage子模块 我们直接使用Google Guava模块代码中的类 但依赖项guava在同一父模块下的其他子模块中定义 我们只能通过对 investment 模块的传递依赖来访问 Guava 类 banking sy
  • UIScrollView 上的边界会随着内容插入而自动更改

    我使用 UIScrollView 作为我的分页滚动视图 pagesScrollView 在其中 我放置了专门用于缩放的单独的 UIScrollView 在每个视图中 我都有一个视图 该视图是应该可缩放的页面项目 所有这些都位于带有半透明导航
  • System.DirectoryServices 很慢?

    当用户登录网站时 我使用下面的代码在活动目录中查找信息 针对本地域运行速度非常快 但通过 VPN 运行到远程受信任域时 速度非常慢 大约需要 7 或 8 秒 从同一个机器到远程域运行 dsa msc 几乎与在本地运行它一样快 我正在使用属性
  • JavaScript 有类吗?

    上周我和一个朋友发生了争执 他说 JavaScript 中不存在类这样的东西 我说有你可以说的var object new Object 他说 因为没有文字class用过的 这不是一个班级 谁是对的 编辑 2017 年 7 月 ECMASc
  • 向 TList 和 TStringList 添加稳定排序的简单方法

    我将 TList TObjectList 和 TStringList 带有关联对象 用于多种任务 或者按原样使用 或者作为更复杂结构的基础 虽然排序功能通常足够好 但有时我需要做一个stable排序 两个列表都使用快速排序 为 TList