问题标签 [fpc]

For questions regarding programming in ECMAScript (JavaScript/JS) and its various dialects/implementations (excluding ActionScript). Note JavaScript is NOT the same as Java! Please include all relevant tags on your question; e.g., [node.js], [jquery], [json], [reactjs], [angular], [ember.js], [vue.js], [typescript], [svelte], etc.

0 投票
1 回答
687 浏览

cross-platform - Free Pascal/Lazarus下如何跨平台获取config文件夹/文件?

是否有一组函数可以为您提供放置应用程序配置的文件和/或文件夹?

我希望它仅在每个系统的适当位置返回文件夹和/或文件。

0 投票
1 回答
1523 浏览

delphi - 如何创建自定义 MAPI dll 以捕获扩展的 MAPI api 调用

我有一个遗留应用程序,它使用扩展的 MAPI 调用 Outlook 来发送电子邮件。Outlook 非常不稳定,不作为服务运行并且无法处理大量电子邮件,因此我正在寻找一种替换 Outlook 的方法。如果没有第三方解决方案,我想我将不得不弄清楚如何创建一个模拟 Outlook 的 MAPI dll 的 MAPI dll。我做了一些谷歌搜索,找到了导出 12 个简单 MAPI 函数的代码,但扩展 MAPI 的信息很少。尽可能地,我更喜欢使用 Delphi 或 Lazarus(支持 64 位?)来创建 dll。有什么方法可以用来捕获扩展的 MAPI 调用。同时,我在 WINE 文档上找到了一些信息 - http://source.winehq.org/WineAPI/mapi32.html

将不胜感激任何指针。:)

0 投票
0 回答
235 浏览

lazarus - 在 Lazarus 下注册将组件添加到表单时所需的单元失败

拉撒路 0.9.30.4

我正在开发一个组件,该组件需要uses在将组件拖放到表单上时将多个单元添加到 unit 子句中。

这篇文章中,我发现了设置设计器挂钩并将所需文件添加到项目中的方法,并且可以将单元添加到uses子句中。

代码示例:

在调试时,我确保调用了处理程序,AddonUnit向项目中添加了一个单元(我遍历了oProj对象内的所有文件),但这导致结果为零:实际上没有向项目或uses子句添加任何内容。

此外,我发现项目文件集合oProj.Files[index]返回当前打开的编辑器文件,而不是项目中包含的文件。

我是否遗漏了某些内容,或者是否有另一种方法可以将所需的单位包含在uses条款或项目中?

0 投票
0 回答
292 浏览

ios - 如何使用 Delphi/Freepascal 从 iOS 应用程序中读取捆绑文件

我的 iOS 应用程序中捆绑了一个 *.txt 文件,需要阅读其内容。我已经找到了这个 Objective-C 代码:

NSString *myFilePath = [[NSBundle mainBundle] pathForResource:@"MyFile" ofType:@"txt"];

是否有有效的德尔福解决方案?

0 投票
1 回答
859 浏览

delphi - 无法修改 EnumWindows 回调中的参数

我尝试在 Lazarus (Free Pascal) 中使用以下代码获取主窗口句柄:

问题是Params.Test运行回调后仍然为 1。我想修改函数Params中的_FindMainWindow

注意:我无法直接访问Params_FindMainWindow因为我收到“访问冲突”错误。

0 投票
2 回答
3163 浏览

g++ - Freepascal 真的比 gcc 使用 *far* 更少的内存吗

http://benchmarksgame.alioth.debian.org/上的语言测试基准表明 FPC 程序使用的内存大约是使用 g++ 的同类程序使用的内存的 1/50 这些基准测试是否无意中偏向 fpc,或者 FPC是否真的比 g++ 好得多?我一直认为这些基准是一系列体面的微基准,所以我对这些结果感到惊讶,因为 50 倍是非常重要的恕我直言。

参考:

http://benchmarksgame.alioth.debian.org/u32/pascal.php http://benchmarksgame.alioth.debian.org/u64q/pascal.html

编辑: 这变得更加有趣,因为这个页面声称帕斯卡在某些程序中只使用了 8KB,这看起来非常低

0 投票
2 回答
1069 浏览

delphi - 挂在 SomeObject.Free 上。检查 FPC 中的对象是否已经空闲?

如果有一个对象(在我的情况下是 TJSONData)并且我想释放这个对象,程序流有时会挂在这个位置。我的代码中已经有如下构造,但有时它似乎不适合这种情况:

如果我尝试释放一个对象两次,我可以在测试中重现这种行为。在我的程序中,这通常不应该发生,但现在我真正的问题是:

有没有办法检查对象是否已经空闲?还是我还需要使用 FreeAndNil();?

0 投票
2 回答
984 浏览

delphi - 检查内存是否可读或为什么它没有捕获异常?

我有从外部进程注入的 DLL 调用的这段代码。它可以读取一些内存范围,但我有时会在这一行遇到分段错误DataBuffer := TCharPointer(Address + CharOffset)^;。那么有没有办法检查内存是否可读?

我也试图捕捉异常,但由于某种原因这不起作用。主机程序仍然崩溃。

0 投票
1 回答
492 浏览

iphone - (Lua+iOS) 使用 lua_pushstring 时出错

代码:

问题:当我使用变体“B”和“C”并在 iPad 上启动项目时,应用程序在启动时闪烁并关闭并出现下一个错误:

(iPad) 控制台日志中的错误:

对于变体“A”,一切正常,应用程序启动正常。

有趣的是,当我在模拟器上编译和启动时,所有变体(“A”、“B”、“C”)都可以正常工作,而不会崩溃。

谁能知道为什么,lua_pushstring 设备上的应用程序崩溃?

可能有人在没有 freepascal 的情况下处理了这个问题,可能是在 c++ 上。请帮帮我。

0 投票
1 回答
281 浏览

frameworks - mvframework 中 FPC 中的 GetTypeData().FloatType 无法编译

http://leonardorame.blogspot.com.ar/2009_11_01_archive.html链接中讨论了如何实现兼容FPC的框架,但是单元 MvFrameworkSrvProvider.pas 的第 54 行,我无法解决以下问题:

case GetTypeData(PropInfo^.PropType).FloatType of

有人可以帮我吗?

提前致谢。加布里埃尔

完整代码在这里: PS:对不起,我尝试正确标记代码,但我不知道如何操作。