Mở rộng macro thành mã Pascal trong phần Inno Setup [Mã]

In lại 作者：行者123 更新时间：2023-12-04 03:24:28 30 4

#define GrowOnPage(any Page, any Component) Component.Width := Page.SurfaceWidth; Component.Anchors := [akLeft, akRight, akTop];

GrowOnPage(configPage, configTextField);

#define GrowOnPage(str Page, str Component) \
    Component + ".Width := " + Page + ".SurfaceWidth; " + \
    Component + ".Anchors := [akLeft, akRight, akTop];"

#emit GrowOnPage("configPage", "configTextField")

30 4 0

• pascal - Pascal-两个不同文件之间的类继承？

  说我有两个文件，characters.pas和ogre.pas。食人魔是一个角色，但为了干净起见，我试图将两个文件分开。在characters.pas中，我有 unit Characters; {$m

• pascal - Pascal 编程中的步长值

  我想要一个编程代码来打印范围之间的奇数来教学生。这里我取的范围是 1 到 10。所以我想打印 1 到 10 之间的奇数。 我写了这个代码来打印 1 到 10 之间的奇数 program printOd

• pascal - Free Pascal 本身是一种编程语言吗？或者，只是一个支持 Pascal 开发的编译器？

  đóng cửa. Câu hỏi này dựa trên ý kiến. Hiện tại không chấp nhận câu trả lời. Bạn có muốn cải thiện câu hỏi này không? Cập nhật câu hỏi để bạn có thể trả lời bằng thông tin thực tế và trích dẫn bằng cách chỉnh sửa bài đăng này. Đã đóng 4 năm trước. Cải thiện điều này

• pascal - 如何在 Pascal 中使用具有不同数据类型的多个参数制作函数？

  我创建了一个函数，其中包含 2 个具有相同数据类型的参数，对此我没有问题。 但是我在处理不同的数据类型时遇到了问题 这是我的代码: uses crt; function inputscore(name

• pascal - 在 Pascal 中类型检查

  我只是想知道如何在 pascal 中进行类型检查？我已经搜索了几个小时，但我找不到任何有用的东西。 例子: var number: Integer; begin write('Enter a nu

• pascal - Turbo Pascal 叠加层是如何工作的？

  我正在实现 an assemblinker for the 16-bit DCPU来自游戏 0x10c。 有人向我建议的一种技术是使用“覆盖，就像过去在 Turbo Pascal 中一样”，以便在运行

• pascal - Pascal 中 # 的用法

  Q1:这是什么意思:WriteLn (#$0b) ? $0b应该是十六进制，如 0x0b ，但是 # 呢？标志？ 问题 2: x:=readkey; if ( x = #5) do... 是否#5意思

• pascal - 我可以使用什么语言来代替 Turbo Pascal？

  关闭。这个问题是opinion-based .它目前不接受答案。 想改善这个问题吗？更新问题，以便可以通过 editing this post 用事实和引文回答问题. 7年前关闭。 Improve t

• pascal - 在 Pascal 中返回一个值

  对于在 Pascal 中返回值的函数，赋值 FunctionName := SomeVal;用来。我认为它不会像 return 那样在那个确切的地方停止函数执行在 C 中。有没有类似C的东西retur

• pascal - 在 Pascal 中创建一个类

  我正在尝试在 Pascal 中创建一个类，我对声明和语法有点困惑。主要的事情是一个错误，我收到“前向声明未解决 Tetromino.Rotate(LongInt)”，我读到我需要在实现部分声明我的过程

• pascal - Turbo Pascal 中的动态数组

  我正在开展我的学校项目，我想使用动态(而不是静态)数组。我使用 ObjectPascal，所以我习惯了一些语法。但现在我在旧的 TurboPascal 中编程(我使用的是 Windows 版 Turb

• pascal - 有没有办法确定对对象过程的引用是否对应于 Pascal 中的对象实例？

  对于这项任务，我有一个不太好的解决方案，但有人可以告诉我如何使用标准库或更优雅的方法。当前的解决方案基于这样的事实:对对象的过程的引用在内存中存储两个指针，一个指向过程代码的指针和一个指向对象的指针。

• pascal - 1991 Pascal 中的随机数

  我正在运行一个 Fenuc Karel 机器人进行类作业，它使用 Pascal 的变体，但我们的机器人是在 1991-1993 年添加 random() 之前的。有谁知道如何在 Pascal 的旧 d

• pascal - 在 Pascal 中创建一个类

  我正在尝试在 Pascal 中创建一个类，我对声明和语法有点困惑。主要的事情是一个错误，我收到“前向声明未解决 Tetromino.Rotate(LongInt)”，我读到我需要在实现部分声明我的过程

• pascal - OpenVMS Pascal 常量用作大小初始值设定项时不是常量

  我认为展示问题的最简单方法是举个例子。编码: PROGRAM CONSTANTSTRING(OUTPUT); CONST C_MaxLength = 30; VAR small_str

• pascal - Lazarus Pascal 蜂鸣命令

  我在 Windows 上运行 Lazarus。我真的很想制作“Beep”程序。看来你可以在 Pascal 中使用: windows.beep(300,500); 但不是在拉撒路!我可以使用另一个命令吗

• pascal - turbo pascal 程序的调用图

  我正在对一个 18 岁的 pascal 程序进行维护。为了帮助我理解一切是如何组合在一起的，我想绘制一个调用图。但是我找不到任何可以为 pascal 源绘制调用图的软件。我目前正在使用 Turbo P

• pascal - 在 Pascal 中读取整数

  我正在使用帕斯卡。我在处理读取文件时遇到问题。 我有一个带有整数的文件。我读取文件的 pascal 是: read(input, arr[i]); 如果我的文件内容是 1 2 3那么它很好，但如果它是

• pascal - 重载 Object Pascal 的赋值运算符

  当分配运算符 := 时会发生什么？在 Object Pascal 中重载？我主要是指首先评估什么，更重要的是如何(如果可能)更改此顺序。这是一个让我烦恼的例子: 我声明TMyClass因此: TMyC

• pascal - 在 writeln 函数中写撇号 - Pascal

  如何使用 writeln 在 Pascal 中打印撇号符号功能？ 例子: writeln('My brother's book'); 无法工作，因为 s book没有“写”函数，所以编译器返回一个错误