如何将我的 Delphi Android 应用程序更改为“深色模式”？
我在Delphi 10.3的Android中有我的应用程序，并且我试图将其转换为“暗模式”，但是许多控件都缺少颜色属性，因此有些仍然是明亮的白色。我不知道如何…
在Delphi中调用Winapi功能
我在 Delphi 中迈出了第一步，我创建了一个小程序，它使用 GetSystemPowerStatus 函数来获取电池状态信息。 为了加载该函数，我使用了 Winapi.Windows…
为什么此代码不发送或接收？
我正在尝试使用 ttcpblocksocket 在GUI程序中发送和接收消息。 我的程序编译，但没有收到或发送任何消息。 也许我的 ttcpblocksocket 对象在我使用它…
如何在 optset 中拥有相对路径？
我们有一些相关项目，这些项目位于一个公共文件夹中，但在不同的嵌套级别中 - 例如： c：\ myProject \ mainapp \ mainapp \ mainapp.dproj c：\ mypr…
Delphi风格的VCL TTrackBar：跟踪时隐藏焦点虚线矩形
使用 VCL 样式时，如何在选择/跟踪时隐藏 VCL TTrackBar 周围的焦点？使用 Delphi 11.1 这不起作用： SendMessage(tb1.Handle, WM_UPDATEUISTATE, UIS…
如何将信息传递到使用Winapi创建的窗口Proc
我需要创建一个用于处理消息的窗口（WM_HOTKEY），因此我在以下方面的水平较低，并使用setWindowlong将实例信息传递到WindowProc中。 fWindow:=Create…
从 MimeType application/pdf 的 TNetHttpClient 获取响应
我在Delphi中调用API，其响应是PDF文件。我正在使用Mimetype Application-PDF获得IHTTPRESPONSE。如何从此响应中创建一个PDF文件？ 代码： response :…
TWebUpdate E2003 未声明的标识符 _WIN32_FIND_DATA
我正在尝试使用我拥有的最新版本在 Delphi 11.1 中安装 TMS TWebUpdate，该版本在柏林和东京安装得很好。唉，亚历山大它给出了一个错误 [dcc32 错误] …
我想使用for loop创建一个斐波那契序列，但整数没有汇总
procedure TForm1.Button1Click(Sender: TObject); var term1: integer; term2: integer; term3: integer; j: integer; begin term1 := (0); term2 :=…
Microsoft Office 12.0访问数据库引擎未显示为提供商
当我尝试建立连接时，Microsoft Office 12.0 Access 数据库引擎未显示为提供程序。我尝试再次安装引擎，但没有解决问题。 可能出现什么问题 我从 http…
如何从 StringList 中解析多行
我想从 StringList 复制特定行， 我想将所有具有“域状态：”的行复制到 memo.lines.text 中 我使用了下面的代码，但问题是它只复制第一行，我想复制…
当我使用 TJson.ObjectToJsonString 将对象序列化为 json 时，如何动态忽略属性
我有这个类： unit untPerson; interface type TPerson = class private fName : string; fEmail : string; fAge : integer; published property Name…
无法在Rad Studio 11.1中修改桌面
我正在运行Windows 11，并且安装了Rad Studio 11.1。由于11.1我无法保存桌面。还有其他人看到过这一点吗？在我看来，该应用程序没有读取或写入.DST文…
