将长字符串转换为 Tstringlist
我有以下字符串 A 类型字符串。 A = 'flagA=0,flagB=0,flagC=1' 我还想 B:TStringList. 将其转换为 TStringList，以便通过检查 B.Values['flagC'] 来…
Delphi中使用TFDQuery删除记录
帮我解决这个问题，用 TFDQuery 删除记录。 当我使用 Edit.Text 或 DBEdit.Text 选择此记录值时，我尝试这样做，但它不起作用： FDQuery.SQL.Text := …
为什么我的相机光线在视口边缘附近单击时会出现偏移？
我正在使用 OpenGL 开发 3D 项目。挑选物体是我要担心的事情，但现在我无法让主要的事情工作。这是使用鼠标从我的相机投射光线。我已经挖掘了太多的例…
Delphi TBitMap 从 ImageList 到按钮的透明度
我正在尝试在代码下方创建一个带有透明位图图像的自定义图标按钮。 图标存储在连接到 ActionList 的 ImageList 中。 bitmap := TBitmap.Create; BmpOb…
Pascal - 分配给函数调用
我正在查看 CodeGear C++ Builder 头文件的源代码。在 Source/vcl/forms.pas 中，我找到以下代码行： procedure TApplication.CreateForm(InstanceCla…
Free Pascal 找不到 dll 的入口点
我对帕斯卡完全陌生。 我想在 free pascal 中调用 .dll 文件中的函数，但运行项目时出现以下错误： 无法在动态链接库 HNLib.dll 中找到过程入口点 Get…
C 到德尔福/帕斯卡
我需要将一段 C 代码翻译成 Delphi/Pascal 代码，但是我无法理解几行代码。 C 代码： static char* get_boundary(apr_pool_t* p, const char* ctype) …
指向同一个数组的指针数组
我读过一段像这样的Delphi代码： sample1 = ARRAY[1..80] OF INTEGER; psample =^sample1; VAR function :ARRAY[1..70] OF psample; 根据我的理解，程…
A*/Dijkstra算法简单实现（Pascal）
我正在尝试使用这篇文章链接。但我无法弄清楚我的代码出了什么问题（它找到了不正确的路径）。 而不是空的 begin ... end；应该是这一步： 如果它已经…
使用 Inno Setup 中格式化（部分粗体）的文本制作安装程序？
有人看过 GOG.com 游戏安装程序吗？如何制作像这样的欢迎文本字符串，包括单个标题中的路径和需要大小？其中部分内容加粗。 以下是修改安装路径后如何…
GetActiveOleObject - 异常：操作不可用
我的 Inno Setup 遇到问题，它给出了异常 Operation Unavailable。 我什至尝试使用 Inno Setup 提供的示例代码 CodeAutomation.iss ，但它仍然给我同…
Pascal read 函数奇怪的行为
假设我想从终端读取同一行的三个变量，并且我想使用 read 函数。我会使用示例输入编写类似下一个代码的内容： 10 929.1 x var a:integer; var b:real;…
