将 ShortInt 数组转换为字符串,Delphi

2023-11-30

我正在按照我学到的方式做,那就是: 用FOR并一一获取索引数组,但它离开太慢了,否则会将其转换为字符串吗?离开得更快吗?

就我而言,它将是 ShortInt 的动态数组。

例如,给定以下输入:

[0,20,-15]

我想要以下输出:

0,20,-15

我怀疑您的代码很慢,因为它正在执行不必要的字符串重新分配。但是,如果没有看到您的代码,就很难确定。

编写算法的最简单方法可能是使用TStringBuilder。这是否能提供足够的性能,只有你自己才能说。

sb := TStringBuilder.Create;
try
  for i := 0 to high(buffer) do
  begin
    sb.Append(IntToStr(buffer[i]));
    if i<high(buffer) then
      sb.Append(',');
  end;
  str := sb.ToString;
finally
  sb.Free;
end;
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

将 ShortInt 数组转换为字符串,Delphi 的相关文章

  • 带位图的简单组合框

    如何将位图放入组合框中并将样式设置为简单 例如 Google Chrome 的右侧有星号 Firefox 的右侧有箭头 我尝试了这段代码 procedure TForm2 ComboBox1DrawItem Control TWinCont
  • 如何将 REST API 与 FireMonkey 结合使用?

    我需要在 FireMonkey 中实现 REST API 来获取一些信息 但我不确定如何做到这一点 REST API使用OAuth2 我可以访问两个代码 Consumer Key和Consumer Secret 之后 我需要获得一个临时的
  • TDictionary 上的 GetItem 由链接器消除

    我正在使用一个TDictionary of
  • 处理 TShellListView 后代中的文件放置

    我正在尝试创建 TShellListView 的后代 它接受从 Windows 资源管理器中删除的文件 我想在组件定义中处理拖 放操作 而不必在任何使用该组件的应用程序中实现它 我找到了接受从 Windows 资源管理器中拖放的文件的示例
  • 如何在 Delphi DBLookupComboBox 中选择正确的项目

    我有一个数据库查找组合框连接到数据库查询 那部分工作正常 当我运行程序时数据库查找组合框填充有查询的结果 我想看看数据库查找组合框填充第一项 请选择 当 的时候程序第一次运行或者当一个新项目行动已启动 见下图 另外 如果我正在加载以前保存的
  • TOpenDialog/NSOpenPanel 无法在沙盒 Delphi 应用程序中工作

    Firemonkey 应用程序中的 TOpenDialog 似乎存在问题 该应用程序已针对 Mac Appstore 进行沙箱处理 我使用XE3 但它也存在于XE2中 我其实在这里找到了一份QC报告 但仍然没有解决 http qc emba
  • 石和磅的格式正确吗?

    我有一个图表 用于显示重量 以英石和磅 lbs 为单位 该图表由记录中的数据填充 对于权重 数据类型为 Double 记录数据是在运行时编辑的 我需要知道一种正确格式化输入数据的方法 为了更好地理解 首先看一下这些示例值 它们表示为石和磅
  • TObjectList.Contains 导致 Delphi 2009 中的访问冲突

    在 Delphi 2009 中 到目前为止 我在泛型方面没有遇到大问题 使用 Generics Collections 列表 没有特殊的泛型功能 现在我发现这段代码会在访问的行中导致AVMyList Contains 如果我声明 TMyLi
  • 如何更改 TPageControl 上标签的方向?

    我是 Delphi 的新手 再次强调 我在 1994 年就使用过 Delphi 我现在有 Delphi 2009 Pro 来自Java 我发现对象继承非常晦涩 我的用户想要选项卡位于左侧的选项卡式页面 但是 TPageControl 不允许
  • 在 Delphi 中编程延迟的最佳方法是什么?

    我正在开发的 Delphi 应用程序必须延迟一秒 有时甚至两秒 我想使用最佳实践来对此延迟进行编程 在阅读 stackoverflow 上有关 Delphi Sleep 方法的条目时 我发现了以下两条评论 我遵循这样的格言 如果你觉得需要使
  • 如何检查注册表项是否存在

    我不知道我的错误在哪里 它总是跳到else分支 但是密钥存在 我检查了几次 var reg TRegistry begin with TRegistry Create do try RootKey HKEY CURRENT USER Ope
  • TListView 中的中心子项目图像

    Is it possible to fix the drawing of subitem images in a TListView so that they are not cut off on the left hand side as
  • 任意通用列表的通配符

    我有一个类 MyClass 它不是通用的 包含任意 TList 并对其执行某些操作 我希望用通用 TList 替换 TList 但 MyClass 必须保持非通用 由于 Delphi 是不变的 这样的事情是行不通的 list1 TList
  • 将delphi stringgrid导出到excel

    我正在尝试将数据从delphi 7 中的stringgrid 导出到microsoft excel 我一直在使用这段代码来做到这一点 objExcel TExcelApplication Create nil objExcel Visibl
  • TStream.Position 与 TStream.Seek 比较

    要移动 TStream 类中的 当前字节 指针 我们可以使用属性 Position 例如 MyStream Position 0 或使用 Seek 方法 例如 MyStream Seek 0 soFromBeginning 问题是 哪一个更
  • 从 C++ .dll 到 Delphi Forms 应用程序的 PostMessage 问题

    我有用 Delphi 7 编写的 Windows 窗体应用程序和使用 MFC 编写的 C dll 目前 我正在尝试实现从 dll 到主可执行文件的基本消息发布 以在进度条上显示用户计算过程 但遇到了几个问题 让我先描述一下我的方法 我在 D
  • 将数据从 DLL 传递到应用程序时出现问题

    我对如何在我的场景中正确使用指针感到有点困惑 我有一个 DLL 其中包含一些嵌入式资源 我在此 DLL 中公开了一个函数 该函数将这些资源之一的二进制数据传递回其调用应用程序 在本例中 我嵌入了 JPG 图像文件 我的 DLL 确实将文件正
  • 我如何淡入/淡出 TImage?

    我有一个简单的TForm命名为Form1 Image1 是一个TImage加载了一个 PNGImage 和一个 Button1TButton测试事物 成功实现了对图像1的Alpha Blend的方法 代码如下 procedure SetPN
  • 如何使用 DSPACK 将自定义音频缓冲区注入 DirectX 过滤器图表?

    我使用 Delphi 6 和 DSPACK 来执行一些涉及音频和 DirectX 的操作 我在 输入 方面找到了将枚举的音频输入设备之一分配给 TFilter 对象并将该过滤器连接到 TSampleGrabber 对象的位置 这为我提供了将
  • Delphi 生成的 Dylib 在 OSX 上的可靠部署

    我想在 OSX 上部署一个 dylib 它是用 Delphi 创建的 这个 dylib 应该是可由第三方应用程序加载 这看起来像是一个重复的问题 但经过大量搜索后 我找不到答案 这和这个是同一个问题 https forums embarca

随机推荐

  • js 异步/等待返回承诺

    只做一个简单的功能 async function doAsync return await test console log doAsync 输出 承诺 PromiseStatus pending PromiseValue undefine
  • Delphi Chromium - 迭代 DOM

    我正在尝试使用 TChromium 迭代 DOM 并且因为我使用 Delphi 2007 所以我无法使用匿名方法 所以我创建了一个继承 TCEFDomVisitorOwn 的类 我的代码如下 但由于某种原因 访问 过程从未被调用 所以什么也
  • 使用bunyan logger登录nodejs

    我正在我的nodejs代码中初始化bunyan记录器 如下所示 var log bunyan createLogger name myapp stream process stdout level info 这是来自 Bunyan 文档ht
  • 将嵌套字典转换为 IReadOnlyDictionary

    我正在尝试给出一个IReadOnly 内部参考Collection对象 这在大多数情况下效果很好 但如果我想将包含集合的字典转换为IReadOnlyDictionary含有一个IReadOnlyCollection 这是一个代码示例 var
  • Python Outlook 获取来自发件人的所有电子邮件

    我正在尝试使用 python 来浏览 Outlook 并获取发件人的所有电子邮件 我已经看过但不知道如何做到这一点 我可以按主题获取电子邮件并返回发件人 但我希望获取所有发件人然后返回主题 这就是我用来按主题获取发件人的方法 import
  • 如何从浏览器保存 .pdf?

    我尝试使用在 stackoverflow 上找到的不同方法来保存 pdf 文件 包括FileUtils IO然而 我总是会把它弄坏 当我使用记事本打开损坏的文件时 我得到以下内容
  • 将gridview转换为图像

    我想将 gridview 转换为图像并将其保存到 asp net 3 5 中的本地磁盘 我不知道该怎么做 任何人都可以建议一些东西 提前致谢 以下链接可能对您有帮助 将 DataGridView 转换为位图 使用 Reporting Ser
  • 点击时设置 PHP cookie

    所以我宁愿不使用 JS jQuery 但我似乎无法让它工作 我有一个链接 a href hideupdates hide Hide Updates a 我正在尝试用它来设置 cookie if GET hideupdates hide se
  • 将新值写入数组

    这是我的代码片段 typedef float point2 2 point2 a 90 90 point2 b 90 90 point2 c 90 90 point2 d 90 90 glBegin GL POLYGON glVertex2
  • SQL Developer 不显示 dbms_output

    我正在尝试在 SQL Developer 中编写 PL SQL 代码 但它没有显示输出 我的程序编译成功 这是代码 set serveroutput on declare begin dbms output put line Hi end
  • 使用条件 ?:(三元)运算符的好处

    与标准 if else 语句相比 运算符有哪些优点和缺点 显而易见的是 条件 运算符 处理直接值比较和赋值时更短 更简洁 似乎不像 if else 结构那么灵活 标准如果 否则 可以应用到更多的情况 比如函数调用 通常是不必要的长 每个语句
  • 如何使用 DotNetOpenAuth 检索 google 个人资料?

    我正在尝试使用 DNOA 为我的应用程序提供 OpenId 支持 以便离开我迄今为止一直使用的 Janrain 解决方案 问题是 到目前为止 我拥有的用户拥有基于个人资料的标识符 https www google com profiles
  • 从互联网下载 HTML 后字符串中的字符发生变化

    使用以下代码 我可以从互联网下载文件的 HTML WebClient wc new WebClient string downloadedFile wc DownloadString http www myurl com 但是 有时该文件包
  • Web API 版本控制配置

    我是Mvc新手 尝试编写restful api 我使用Web api类型的应用程序 并尝试创建版本控制 最后我想要像 api v1 values get api v2 values get 这样的链接类型 我尝试在控制器文件夹中创建文件夹
  • 如何获取网站的加载时间和访问量?

    我正在开发一个程序 该程序应该测量我作为输入提供的网站的加载时间和容量 这里我有一些代码只返回网站的响应时间 但我想要总加载时间和项目的总体积 图片 JavaScript HTML 等 public string Loading Time
  • 通过另一个字段选择具有最大日期顺序的数据[重复]

    这个问题在这里已经有答案了 我已经在 SQL 数据库中创建了这个表 index Reg No Payment Payday 1 S001 100 2017 01 01 2 S001 500 2017 02 01 3 S002 400 201
  • 从字母数字字符中删除数字

    我有一个字母数字字符列表 如下所示 x lt c ACO2 BCKDHB456 CD444 我想要以下输出 x lt c ACO BCKDHB CD 您可以使用gsub为了这 gsub digit x or gsub 0 9 x 1 ACO
  • 按自定义顺序对 Laravel Collection 进行排序,而不是 asc 或 desc

    我有这个数组作为 Laravel Collection data id 863368 reference Ref 1 status 1 id 863391 reference Ref 2 status 2 id 863390 referen
  • 当请求是文本时,如何在 wso2 esb foreach 中介器上添加表达式

    我使用了 wso2 foreach 调解器 当我的请求是 Json 时 我添加 data 作为表达式 foreach表达式 数据 我的json请求是这样的 data id 1 name abc id 2 name efg 这个场景效果很好
  • 将 ShortInt 数组转换为字符串,Delphi

    我正在按照我学到的方式做 那就是 用FOR并一一获取索引数组 但它离开太慢了 否则会将其转换为字符串吗 离开得更快吗 就我而言 它将是 ShortInt 的动态数组 例如 给定以下输入 0 20 15 我想要以下输出 0 20 15 我怀疑