Pascal是1969年创建的Wirthian家族的必修语言。它在20世纪70年代和80年代被广泛用于工程和教学。它以Free Pascal和Delphi的编译器为生。
我有一个传入的 URL,我需要捕获一些参数,我们的项目在 Delphi 中。这是 URL 的样子: 我需要在“状态”之后和“代码”之前立即获取值。 我是
在 Delphi 2010 中通过 TCP/IP 连接到外部设备
亲爱的 StackOverflow 社区, 我目前正在从事一个项目,需要帮助使用 Delphi 2010 通过 TCP/IP 将外部设备 (POS) 连接到我的计算机。我有必要的 ...
以下是我在下面显示的代码,但是,我似乎无法运行第二个 if 语句。我该如何解决这个问题? 程序 HelloUser(输入,输出); 变量 用户名:字符串;
在 JavaScript 中适配 Pascal 函数 AnsiChar() 和 AnsiString()?
我需要将 Pascal 脚本改编成 JavaScript。 除了这两个函数,我几乎可以翻译所有代码。 帕斯卡代码行: 结果:= AnsiChar(b + ord('0')); s:= AnsiString(复制(ReNr,...
所以我正在尝试在 Delphi 10.4 中编写一个函数,该函数从 SQL 表中取出一个 JSON 文件并在网格中显示所有项目。 其中之一是导致应用程序崩溃的日期格式,所以
如何修复“;”的语法错误预期但找到了 Pascal 的“标识符 USER”?
我对 Pascal 很陌生,虽然它已经过时了,但我的老师目前正在让我们学习它,因为它是伪代码的构建块。然而,我们只尝试了一次练习程序......
Delphi - Pascal:在拖放到表单之前检测拖动文件事件
我正在尝试为 Windows 创建一个应用程序。 在我的应用程序中,当将项目文件从 Windows 资源管理器拖动到 FormOne,然后 FormOne 将调用 FormSecond show 和 Drop Items on FormSecond。 我的
我正在使用 Pascal 编写一个 connect4 游戏来完成作业。默认情况下,它会创建一个大小为 6x7 且获胜长度等于 4 的棋盘,但是它也可以传递参数,例如 ./connec...
在 Pascal 中使用 setLength 时出现访问冲突
我正在使用 Pascal 编写一个 connect4 游戏来完成作业。默认情况下,它会创建一个大小为 6x7 且获胜长度等于 4 的棋盘,但是它也可以传递参数,例如 ./connec...
如何在 Delphi 10.3/7 中正确使用可视化表单继承?
我有一个基本表单,我想一次将其用于屏幕上的多个表单。我以为我正确设置了继承,但是当我创建 2 个表单时,只有最后一个创建的表单出现在屏幕上......
我是编程新手,我的老师要求我们用 Pascal 编写一个程序来接收这些输入(学号----学生姓名-----),并以用户可以使用的方式编写程序...
我使用 INNO JSON Config(就像在这篇文章中)来读取一个简单的 JSON 文件: { “项目_0”:{ "Key_1": "字符串 1", "Key_2": "1&...
变种 matrix,usdmatrix:char数组的数组; // 动态矩阵 cchar : 实数数组; occurrencePercentages:实数数组; numRows,numCols:整数; // 行数和列数 ...
Delphi 2010 如何在Classes.pas中添加断点
我想在 TThread 类中添加一个断点,函数 ThreadProc 在 Classes.pas 中。 但是我单击并运行断点上有一个叉号,它不起作用。 我有一个类有一个 TThread 成员,它
我正在学习 FreePascal,我正在使用在线编译器。但我想在 VSCode 中编译它。 我在 Internet & Stack Overflow 中找到了一些解决方案。一个是这个。但我不知道 JSON 是如何工作的。 有没有...
我目前正在研究 InnoSetup 安装程序,它检查给定服务的依赖服务。根据 MSDN 文档,我需要函数 EnumDependentServices()。 然而,当我通过
拜托,任何人都可以帮助我解决我的问题“我可以用 Pascal 语言获取图像数据”,我的意思是我可以用 Pascal 语言读取或显示图像
我使用 Inno Setup 创建了一个简单的代码,我只想在安装新文件和程序之前自动删除“SPMPET”目录中的原始文件。但是我写的代码...
假设我有一些变量,例如 x:=1、y:=2 和 z:=3 有没有办法只输入 x , y 或 z 并获取变量的值作为输出? 前任: 用户输入:y 输出:2 我尝试使用 if