如何使用 TypInfo 单元中的 GetSetProp 和 SetSetProp

2023-12-28

我有一组枚举值,需要将其转换为文本,然后再转换回集合。

我相信 TypInfo 单元的 GetSetProp 和 SetSetProp 允许执行此操作,但我不知道如何让它工作。关于如何使用 GetSetProp 和 SetSetProp 来完成此任务有什么想法吗?

type
  TSomething = (sOne, sTwo, sThree, sFour, s Five);
  TSomethings = set of TSomething;

var
  Something: TSomethings;
  s: string;
...
  Something := [sOne, sThree];

  s := GetSetProp(????);

  Something := [];
  // then use SetSetProp to set Something back to [sOne, sThree]
  Something := ????

This 很棒的帖子设置到字符串,字符串到设置 http://tondrej.blogspot.com/2007/10/settostring-stringtoset.html by tondrej https://stackoverflow.com/users/11480/tondrej解决你的问题。

本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

如何使用 TypInfo 单元中的 GetSetProp 和 SetSetProp 的相关文章

  • Delphi (Indy) TIdTCPClient 在线程中

    在互联网上 我看到通常将 TIdTCPClient 放置在自定义 TThread 后代中 为什么要这样做 有时我也在这样的线程中看到服务器 为什么 干杯 阿德里安 Indy 使用阻塞 I O 最好在线程中处理 这是 Indy 整体设计的核心
  • 如何以编程方式安排任务

    如何使用 delphi 7 像 Google updater 一样安排任务 我没有使用注册表 因为它被卡巴斯基防病毒软件检测为误报 我在注册表中作为启动项添加的任何内容都会被检测为特洛伊木马 因此我决定使用任务计划 下面的代码展示了如何删除
  • 如何在Delphi XE中通过名称获取类类型引用?

    我实际上正在尝试使用 Rtti 来实现通用方法调用程序 它应该像这样工作 我将提供类名 方法名和参数 调用者将通过调用此类的指定方法来完成其工作 因此 我需要类引用才能获取其 Rtti 信息并寻找我想要调用的方法 有没有办法在不实现我想要使
  • 如何避免使用 WinApi.Windows 的 Delphi 应用程序中的 dll 劫持

    Delphi 最新版本使用各种系统 dll 的静态链接 例如 WinApi Windows 单元中的 version dll 这会导致在单元初始化之前加载 version dll 这会打开一个安全漏洞 可以通过将受感染的 version d
  • 我可以让我的 Delphi 应用程序在特定时间(例如上午 12:00)启动,而不运行应用程序吗?

    我看到一个已安装的应用程序 它从供应商的网站提供一些 XML 数据并将其显示在主窗体窗口中 我想这很简单 但我注意到 即使我关闭系统托盘中的应用程序 明天早上 上午 12 00 正好 它也会再次弹出 这太酷了 我不确定它是用 Delphi
  • Delphi 返回 TList 时出错

    我做了一个非常简单的应用程序 但我有一个我真的无法理解的问题 看一下这个基本代码 unit Unit1 interface uses Winapi Windows Winapi Messages System SysUtils System
  • 具有 csOwnerDrawFixed 样式的组合框如何表现得像 csDropDown 样式?

    我正在使用一个组合框 http docwiki embarcadero com Libraries en Vcl StdCtrls TComboBoxstyle 属性设置为的组件csOwnerDrawFixed 我实现了绘图项一切工作正常
  • delphi中如何实现多重继承?

    我正在对一个旧库进行完全重写 我不确定如何处理这种情况 为了便于理解 大家都欢呼自行车类比 我有以下课程 TBike 自行车本身 TBikeWheel 自行车的一个轮子 TBikeWheelFront and TBikeWheelBack
  • Delphi 5 中的 Oracle 数据库连接

    我正在使用 Delphi 5 版本 我想连接到 Oracle 数据库 我有 TDatabase 组件 我不知道如何通过 Delphi 连接到数据库 请提供连接数据库的步骤 谢谢 The TDatabase http docwiki emba
  • 查找字符串是否在列表中的最佳方法(没有泛型)

    我想做这样的事情 Result MyString in string1 string2 string3 string4 这不能与字符串一起使用 我不想做这样的事情 Result MyString string1 or MyString st
  • Delphi - 获取和设置 ListView 的滚动条位置

    这似乎是一个愚蠢而简单的问题 然而 我一直无法找到令人满意的答案 基本上 我有一个列表视图 样式 vsReport 与数据 有时 我必须更新它 因此 我必须清除列表视图并用更新的数据再次填充它 但是 当我这样做时 滚动条位置将重置为 0 我
  • 供所有 Win32 程序员在 Windows Aero Glass(DWM、GDI、GDI+)上绘图的文档和 API 示例

    我正在寻找良好的资源来学习使用 Win32 GDI API 或任何替代它的内容 以便使用 Win32 API 直接在玻璃窗体上进行绘制和绘制 当我使用 Delphi 时 我将其标记为 Delphi 或 Visual C 您能找到的任何代码示
  • 为什么 Delphi 变体不能保存对象?

    为什么 Delphi 变体不能保存对象 更重要的是 这种限制背后的原因是什么 你绝对可以storeVariant 变量中的对象 只需将其转换为 NativeUInt 无论如何 对象只是一个指针 obj TObject Create v Na
  • 任意通用列表的通配符

    我有一个类 MyClass 它不是通用的 包含任意 TList 并对其执行某些操作 我希望用通用 TList 替换 TList 但 MyClass 必须保持非通用 由于 Delphi 是不变的 这样的事情是行不通的 list1 TList
  • 可以在滚动条上绘画吗?

    是否可以在 TMemo TListbox 等标准控件的滚动条上进行绘制 我所需要的只是在滚动条上绘制一些基本形状 并且我试图避免从 stratch 实现整个滚动内容 有什么指点吗 蒂亚 确实有可能 你可能想看一下WM NCPAINT消息 这
  • 将delphi stringgrid导出到excel

    我正在尝试将数据从delphi 7 中的stringgrid 导出到microsoft excel 我一直在使用这段代码来做到这一点 objExcel TExcelApplication Create nil objExcel Visibl
  • 在比较 Delphi 表单文件的版本时,如何使 Beyond Compare 忽略某些差异

    我使用Beyond Compare 版本3 1 10 来比较不同版本的Delphi Form Files 但我不想看到有关ExplicitTop ExplicitLeft ExplicitHeight 和ExplicitWidth 的差异
  • TStream.Position 与 TStream.Seek 比较

    要移动 TStream 类中的 当前字节 指针 我们可以使用属性 Position 例如 MyStream Position 0 或使用 Seek 方法 例如 MyStream Seek 0 soFromBeginning 问题是 哪一个更
  • delphi THashSHA2 在大文件上返回错误的 SHA256

    Data Cloud CloudAPI pas has class function TCloudSHA256Authentication GetStreamToHashSHA256Hex const Content TStream str
  • Delphi XE2,vcl样式重新创建窗口句柄

    在运行时应用新样式后 我的应用程序的 MainForm 创建一个新的窗口句柄 有什么方法可以阻止此操作或重新分配句柄 因为我收到了大量以下错误 系统错误 代码 1400 无效的窗口句柄 有什么方法可以操纵强制分配新句柄的进程吗 我通过执行以

随机推荐

  • 单击按钮时显示/隐藏元素

    我有两个按钮 显示 和 隐藏 我有一个图像 所以我想知道当我单击 隐藏 按钮时 该图像会消失 当我单击 显示 按钮时 它会再次出现 我不想只使用 CSS 或 JQUERY Javascript 来完成此操作 如果有人可以提供帮助 非常感谢
  • Thrift HBase 客户端 - 支持过滤器和协处理器

    遗憾的是 我的 hbase 客户端语言是 Python 我现在使用 happybase 它基于 thrift AFAIK 我知道到目前为止 thrift 仍然不支持过滤器 协处理器 如果我错了 请纠正我 有人可以给我指出任何可以跟踪计划 进
  • 算法选择建议

    我必须做一个项目 尝试扫描车辆的形状并检测它是什么类型的车辆 扫描将使用称为 车辆扫描仪 的传感器进行 它们只有 50 束光 每束都有接收器和发射器如图所示 我从传感器获得每个光束的原始状态 阻挡或解锁 通过连续扫描 我们可以创建可能非常低
  • VIM textwidth 没有效果

    这感觉像是一个愚蠢的问题 但我在互联网上 或在 VIM 帮助中 找不到答案 我在 Mac OS X 上使用 VIM 7 2 我想做的就是将行换行为 72 个字符 但是这样做 set textwidth 72 没有影响 文本宽度设置正确 我可
  • 使用 MySQL Fulltext(或 sphinx?)进行模糊街道地址搜索[关闭]

    Closed 这个问题需要多问focused help closed questions 目前不接受答案 我有一个数据库表 其中包含来自 Google 地图地理编码响应的地址 Google 缩写了所有方向 西 gt W 东 gt E 等 因
  • AngularJS - 有条件地应用属性?

    有条件地应用一个元素很容易 只需使用 ng show 即可 但是属性呢 IE div div 需要仅对管理员进行排序 因此请执行以下操作 div div 创建自定义指令或模板 并在附加可排序的版本和不附加可排序的版本之间切换
  • IIS 7.5 / WCF - net.tcp 状态未知

    我正在尝试让我的 WCF 服务与netTcpBinding代替wsHttpBinding 但我似乎无法让它工作 我添加了net tcp绑定到 IIS7 5 但状态为未知 当我还删除 http 绑定时 它会在网站上放置一个大红色 X 我必须添
  • Jetpack Compose:对角分割卡片并将内容放入其中

    我试图实现这样的目标 其中 A 是图像 B 也是图像 目前 这是我能做的最好的事情 Card modifier Modifier fillMaxWidth constrainAs image top linkTo parent top st
  • 如何写入管道叉?

    我有以下通过 fork 和 execvp 执行命令的函数 我在 fork 中启动的脚本正在监听输入数据 我如何将数据发送到 myscript int external command int pfds 2 if pipe pfds lt 0
  • 向客户端广播数据包在java中不起作用

    我有多个发射器 配置为当它们收到从服务器通过本地端口 5255 远程端口 5252 发送的广播数据包时发回响应 其中包含字符串 AST show me 0 如发射器手册中所述 这应该可以帮助我扫描本地网络内的所有发射器 我已经实现了一个服务
  • 使用 LINQ to XML 生成动态 sitemap.xml 时如何正确生成 xsi:schemalocation 属性?

    我正在生成动态 sitemap xml 根据站点地图 org http www sitemaps org protocol php这是 sitemap xml 的标头
  • Excel VBA 中的公共与私有/暗淡

    我可以使用一些帮助来理解在 Excel 2013 VBA 的模块中使用 Public 与 Dim 首先 我想说我确实找到了这篇很棒的文章 它具有出色的定义 请参阅下面的链接 但没有示例 我可以使用一些示例来说明如何将公共变量应用到我的项目中
  • 矢量分段故障的矢量

    当我尝试为这个向量向量赋值时 我不断遇到分段错误 我基本上是从图像中读取像素 然后尝试创建一个向量向量 您可以访问该行 然后访问该行上的像素以获取该点的像素 但是当我尝试将特定像素分配给像素值时 它会给我一个分割错误 我使用占位符 255
  • 如何将一个Makefile中的两个不同的源目录输出到一个bin目录?

    我有以下 Makefile 来构建我的 erlang 项目 SUFFIXES erl beam yrl ERL SRC wildcard src erl ERL OBJ patsubst src erl ebin beam ERL SRC
  • Apache Spark:处理 RDD 中的 Option/Some/None

    我正在映射一张 HBase 表 为每个 HBase 行生成一个 RDD 元素 然而 有时该行有坏数据 在解析代码中抛出 NullPointerException 在这种情况下我只想跳过它 我的初始映射器返回一个Option指示它返回 0 或
  • 在android.java中读取Excel文件

    我编写此代码来读取 Excel 文件 并将其粘贴到资产文件夹 我的文件名 book xls 中以读取它 但是当我按下按钮显示文件时它不起作用并且不显示任何内容 请帮助我解决我的问题 多谢 这是我的代码 package com example
  • 关于ImageIcons的方法不起作用

    import java awt import java awt event import javax swing public class Cards extends JFrame private GridLayout grid1 JBut
  • Python:获取默认网关的MAC地址

    Python 有没有什么快速的方法来获取MAC地址 of the 默认网关 我什么也做不了ARP 请求来自Linux我正在运行代码的机器 所以它必须直接来自ARP表 以下 DevFS 文件将提供此信息 proc net arp proc n
  • 与黎曼求和 Python 集成

    我一直在尝试用黎曼和求解积分 我的函数有 3 个参数 a b d 因此 a 是下限 b 是上限 d 是其中的部分a n 1 d lt b 到目前为止 这是我的代码 我的输出是28 652667999999572我应该得到的是28 66665
  • 如何使用 TypInfo 单元中的 GetSetProp 和 SetSetProp

    我有一组枚举值 需要将其转换为文本 然后再转换回集合 我相信 TypInfo 单元的 GetSetProp 和 SetSetProp 允许执行此操作 但我不知道如何让它工作 关于如何使用 GetSetProp 和 SetSetProp 来完