首页 > 其他分享 >Delphi中TJSONObject使用问题

Delphi中TJSONObject使用问题

时间:2024-10-31 20:59:00浏览次数:1  
标签:end AddPair jsonObject Delphi tempListItem processForms TJSONObject 使用 jsonProce

jsonProcess:= TJSONArray.Create;
for var i := 0 to processForms.ListView_Processes.Items.
  Count - 1 do
begin
  tempListItem := processForms.ListView_Processes.Items[i];
  var
  jsonObject := TJSONObject.Create;
  try
    jsonObject.AddPair('pid', tempListItem.Caption);
    jsonObject.AddPair('processName', tempListItem.SubItems[0]);
    jsonProcess.AddElement(jsonObject);
  finally
    jsonObject.Free;
  end;
end;
jsonProcess:= TJSONArray.Create;
for var i := 0 to processForms.ListView_Processes.Items.Count - 1 do
begin
  tempListItem := processForms.ListView_Processes.Items[i];
  var
  jsonObject := TJSONObject.Create;
  try
    jsonObject.AddPair('pid', tempListItem.Caption);
    jsonObject.AddPair('processName', tempListItem.SubItems[0]);
    jsonProcess.AddElement(jsonObject);
  except
    jsonObject.Free;
  end;
end;

重点关注finally和except,第二个可以执行成功拿到jsonProcess,而第一个不行

标签:end,AddPair,jsonObject,Delphi,tempListItem,processForms,TJSONObject,使用,jsonProce
From: https://www.cnblogs.com/jishaling/p/18518870

相关文章

  • 在深度学习上使用Quadro GV100与Titan V有何区别
    ​在深度学习上使用QuadroGV100与TitanV的区别:1.技术规格差异;2.计算性能比较;3.内存配置对比;4.功耗与成本效益;5.软件与驱动支持。QuadroGV100与TitanV作为NVIDIA公司旗下的高性能计算图形处理器,它们在深度学习应用上各有优劣。1.技术规格差异QuadroGV100和TitanV基于NVID......
  • 区间和---使用离散化
    假定有一个无限长的数轴,数轴上每个坐标上的数都是0。现在,我们首先进行n次操作,每次操作将某一位置x上的数加c。接下来,进行m次询问,每个询问包含两个整数l和r,你需要求出在区间[l,r]之间的所有数的和。#include<iostream>#include<vector>#include<algorithm>usingn......
  • Linux (11) 使用ATOP工具
    《WindowsAzurePlatform系列文章目录》 1.问题描述:之前遇到了部分MySQL虚拟机,操作系统盘和数据盘的磁盘读取(DiskRead)突增,同时虚拟机可用内存突然减少,最后发生OOM(OutofMemory)。如下图: 2.通过安装LinuxATOP工具,监控虚拟,具体的部署脚本#!......
  • 如何在 Ubuntu 18.04 上使用 Gunicorn 和 Nginx 提供 Flask 应用程序
    前些天发现了一个巨牛的人工智能学习网站,通俗易懂,风趣幽默,忍不住分享一下给大家。点击跳转到网站。简介在本指南中,您将在Ubuntu18.04上使用Flask微框架构建一个Python应用程序。本文的大部分内容将介绍如何设置Gunicorn应用服务器,以及如何启动应用程序并配置Ngi......
  • 如何在 Ubuntu 20.04 上使用 Let‘s Encrypt 保护 Nginx
    前些天发现了一个巨牛的人工智能学习网站,通俗易懂,风趣幽默,忍不住分享一下给大家。点击跳转到网站。简介Let’sEncrypt是一个证书颁发机构(CA),提供了一种简单的方式来获取和安装免费的TLS/SSL证书,从而在Web服务器上启用加密的HTTPS。它通过提供一个软件客户端Certbot......
  • linux使用者须知!Ls命令输出的颜色究竟由什么含义?教你轻松区分~(带私活源码)
     在linux中我们经常会用到Ls命令,我们发现Ls的输出中有各种各样的颜色,今天和大家共同了解一下Ls背后的故事。简介Linux ls(英文全拼:listdirectorycontents)命令用于显示指定工作目录下之内容(列出目前工作目录所含的文件及子目录)。我们可以看到ls的输出中有着不同的颜色......
  • 如何在 Ubuntu 18.04 上使用 Gunicorn 和 Nginx 提供 Flask 应用程序
    前些天发现了一个巨牛的人工智能学习网站,通俗易懂,风趣幽默,忍不住分享一下给大家。点击跳转到网站。简介在本指南中,您将在Ubuntu18.04上使用Flask微框架构建一个Python应用程序。本文的大部分内容将介绍如何设置Gunicorn应用服务器,以及如何启动应用程序并配置Ngi......
  • 《使用Gin框架构建分布式应用》阅读笔记:p272-p306
    《用Gin框架构建分布式应用》学习第15天,p272-p306总结,总35页。一、技术总结1.TDD(test-drivendevelopment)虽然经常看到TDD这个属于,从本人的工作经历看,实际开发中用得相对较少。2.unitest(单元测试)go语言开发中,使用testify进行单元测试开发。(1)创建测试文件测试文件以xx......
  • 3. 使用Docker部署MQTT平台mosquitto到云服务器
    3.使用Docker部署MQTT平台mosquitto到云服务器1.拉取MosquittoDocker镜像(这里选择拉取1.6.14版本,因为最新版本报错Addressnotavailable)dockerpulleclipse-mosquitto#或者拉取1.6.14版本dockerpulleclipse-mosquitto:1.6.142.创建mosquitto配置文件在运......
  • 大学 C 语言在线 PTA 平台编译提示警告未使用 scanf 返回值的问题
    最近在知乎发现有不少大学生在使用PTA平台在线编写C语言代码,编译时提示警告未使用scanf返回值的问题。具体现象是编译器输出显示为类似于这样的提示。a.c:Infunction‘main’:a.c:9:5:warning:ignoringreturnvalueof‘scanf’declaredwithattribute‘warn_u......