red_eye-优快云博客

原创 delph Xe 11 如何让程序以管理员身份运行

Project->Options-> 如下图，Execution Level 改为 Require Administrator 及可。网上以前的方式很麻烦，需要UAC.RES 文件，XE11 可以直接在项目设置中提高程序运行的等级。

2024-01-02 18:26:28 829

原创 delphi 如何操作windows 防火墙并添加自己的规则

需要 import Component-> NetFwTypeLib 引入到项目中，才可以控制windows防火墙;

2023-12-22 11:16:08 639

原创 Windows 使用 Chocolatey 来为用户提供自动升级功能

使用包管理器：如果你的命令行程序已经被打包成了一个可通过包管理器安装的软件包，那么你可以考虑使用该包管理器的自动升级功能。发布你的 Chocolatey 包：最后，你需要将你的 Chocolatey 包发布到一个公共的 Chocolatey 软件包仓库，例如 chocolatey.org。发布你的程序：你需要将你的程序发布到一个可以被访问的位置，例如，一个公共的 URL 或者一个本地文件夹。测试你的程序：在发布你的程序之前，你需要测试你的程序，确保它能够正确地被安装和卸载，并且能够升级到最新版本。

2023-05-09 11:57:47 549

原创使用Delphi XE HttpClientComponent 发起HTTP请求

需要注意的是，System.Net.HttpClientComponent默认是异步请求，如果需要使用同步请求，可以设置HttpClient的SynchronizedEvents属性为True，然后在OnRequestCompleted事件中获取响应内容。System.Net.HttpClientComponent是Delphi XE8及更高版本中引入的一个网络库组件，它提供了简单易用的HTTP请求和响应功能。

2023-04-25 20:16:15 904

原创 Moromot TWinHttpAPI 类的一些常见用法

这段代码创建了一个TWinHttpAPI对象，设置请求头和请求参数，使用Post方法发送HTTP POST请求，并在处理完响应后释放对象。这段代码创建了一个TWinHttpAPI对象，并设置了代理服务器信息，使用Get方法发送HTTP GET请求，并在处理完响应后释放对象。这段代码创建了一个TWinHttpAPI对象，使用Get方法发送HTTP GET请求获取响应数据，并在处理完响应后释放对象。这些只是TWinHttpAPI类的一些基本用法，更多详细的用法可以参考Moromot框架的文档和示例代码。

2023-04-25 11:59:54 222 2

原创 python爬取网页数据定义字体的处理

在爬取网页数据时，有些网站使用了特殊的字符编码或自定义的字体来显示文本，这可能会导致爬取到的文本出现乱码或无法正确显示。在这个示例中，我们首先下载了字体文件并解析了字体映射表。然后，我们从包含编码的文本中提取编码，并将其转换为Unicode编码。对于自定义字体，我们需要先获取到字体文件，并解析出字体映射表。然后，我们可以通过解析字体映射表，将字体编码转换为Unicode编码，再使用。函数来还原HTML实体，其中包括HTML实体字符和数字实体字符。但是，对于自定义字体，函数将HTML实体还原为文本。

2023-04-04 10:16:38 554

原创 [delphi] EXE程序实现 DOS 命令行输入 -h 输出帮助信息

我想在一个delphi编译的EXE程序实现 DOS 命令行输入 XXX -h 然后在提示一些命令行的参数使用信息。注意这个exe文件是带form窗口的，我并不想进入他的窗口中。使用ParamCount和ParamStr函数来判断命令行参数是否为-h，如果是，则在控制台输出帮助信息，否则启动带有form的程序。同时，需要使用AllocConsole函数来创建一个控制台窗口，以便在控制台输出信息。注意：上述代码中需要在使用Windows单元之前先使用Forms单元，否则会报错。

2023-04-01 10:11:53 451

原创我delphi程序只有一个Datamodule,如何在运行时在任务栏显示图标？

在这个示例代码中，我们在DataModule的OnCreate事件中设置Application.ShowMainForm为False，以便隐藏主窗口，并将Application.MainFormOnTaskbar设置为True，以便在任务栏中显示主窗口的图标。如果您的Delphi程序只有一个DataModule，您可以将Application.MainFormOnTaskbar属性设置为False，并在DataModule的OnCreate事件中创建一个空白的主窗口，以便在任务栏中显示图标。

2023-03-30 20:26:03 376

原创 delphi Mormot 2.0 代码升级注意事项

需要注意的是，在进行升级之前，建议先阅读 V2.0 的文档和变更日志，了解新版本的特性和变化，以便更好地进行升级。ORM 单元：Mormot V2.0 对 ORM 的实现进行了改进，包括更好的支持 JSON 数据、更好的错误处理和调试支持等，需要对现有的 ORM 单元进行修改，以适应新的 API 和功能。Web 服务单元：Mormot V2.0 引入了新的 SynDBExplorer UI 框架和更好的错误处理和调试支持，需要对现有的 Web 服务单元进行修改，以适应新的 API 和功能。

2023-03-29 14:24:46 1086

原创 umi 框架如何实现跨域请求？

这个配置将会把所有以 `/api` 开头的请求转发到 `http://example.com` 主机上。`changeOrigin` 选项表示是否改变请求的源地址，以便服务器收到的请求头中的 `Host` 字段正确。在组件中使用 `umi-request` 发起跨域请求时，只需要将请求的地址设置为相对于代理地址的路径即可。在这个示例中，`/api/users` 会被转发到 `http://example.com/api/users`。在 umi 中，你可以通过配置 `proxy` 来实现跨域请求。

2023-03-29 12:32:37 3258 1

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

red_eye的博客