最新发布第9页
排序
如何在 Delphi 12.1 中使用 Skia 加载 SVG 文件到 TBitmap 并保留透明度
在 Delphi 12.1 的 32 位 VCL 应用程序中,如何通过 Skia 将 SVG 文件加载到 TBitmap 并保留透明度?Skia 是 Delphi 12 自带的图形库,但在加载 SVG 文件时可能会遇到问题。 通过 TBitmap.Sk...
ImageEn 给图片添加水印
//在图像的左下角以30%的不透明度添加水印bmpImg := TIEBitmap.create; bmpWM := TIEBitmap.create; bmpImg.Read('D:\image.jpeg'); bmpWM.Read('D:\Watermark.png'); wmOpacity := 0.30; bmpW...
如何在RAD Studio中禁用不必要的Java库
在使用Delphi 11 开发Android应用时,您可能会遇到一些自动添加到项目中的过时Google Admob库,这些库导致您的应用无法通过Google Play Store的审核。尽管Embarcadero建议通过右键点击并选择...
如何在设计时获取自定义控件 TComponent 所在的 DFM 文件路径
在 Delphi 中,设计时获取自定义 TComponent 所在的 .dfm 或 .pas 文件路径是一个常见的需求。以下是实现这一功能的简要步骤和代码示例。 在自定义 TComponent 中,需要在设计时获取其...
Delphi 中接收 Sunmi 和 Unitech 设备广播的实现
在 Delphi 中开发 Android 应用时,接收来自 Zebra 设备的广播是可行的,但同样的方法在 Sunmi 和 Unitech 设备上却无法正常工作。以下是解决这一问题的核心方法。 Zebra 设备的广播可以正常接...
如何手动生成 R.java 文件
在 Delphi 项目中,需要为每个包含的库手动生成 R.java 文件。通常,我们会将所有资源放在一个 .res 目录中,并使用 aapt.exe 为每个包生成 R.java 文件。然而,生成的 R.java 文件包含了整...
如何确定cxGrid网格数据的高度
procedure SetGridHeight(AGrid: TcxGrid; ARowsNumber: Integer); var I: Integer; AHeight: Integer; begin if (AGrid = nil) or (AGrid.FocusedView = nil) then Exit; AHeight := 0; with A...
FMX 做一个带动画的虚线边框
效果如图所示: Rectangle1.Stroke.Kind := TBrushKind.Solid; Rectangle1.Stroke.Dash := TStrokeDash.Dash; Rectangle1.Stroke.Color := TAlphaColors.Red; Rectangle1.Stroke.Thickness := ...
TListView 判断是否是鼠标左击,点击了Item
1. 使用 OnMouseDown 事件在 OnMouseDown 事件中,Button 参数会告诉你当前按下的是哪个鼠标键(左键、右键或中键)。我们可以在代码中检查 Button 是否为 mbLeft(左键)。procedure T...
IconWorkshop 6.3.3.0 汉化破解绿色版
修改制作图片的好工具 ico图标制作软件特色支持多种图形格式自动生成图标。Axialis IconWorkshop 配备强大的编辑器,支持从多种图像格式中创建图标,如 PSD、PNG、BMP、JPEG、GIF、JPEG2000 等...
kbmMemTable Pro 7.74 Delphi 12 Athens
kbmMemTable Pro 具有SQL支持的高性能内存数据集。kbmMemTable具有超级快速的完整TDataset内存表兼容功能。如果您想要在使用RAD Studio,Delphi,C ++ Builder或FPC创建的Win 32/64,MacOS, Li...
使用Delphi列出蓝牙设备
在使用Delphi进行蓝牙开发时,列出所有连接到特定蓝牙适配器(主机设备)的蓝牙设备是一项基本任务。以下是如何实现这一功能的核心步骤和代码片段。实现方法通过JEDI API JwaBluetoothAPIs库可...
如何将 Chrome 的 Cookie 时间戳转换为 Delphi 的 TDateTime
Chrome 的 Cookie 时间戳是一个整数,表示从 Unix 纪元(1970 年 1 月 1 日 00:00:00 UTC)开始的秒数。例如,时间戳 1765064691 对应的实际时间是 2025 年 12 月 6 日 20:44:51。如何将其转...
判断服务器文件夹是否存在
--判断服务器文件夹是否存在, declare @retval intexec @retval = master..xp_cmdshell 'dir 'C:\DataBak\' /a', no_outputif @retval = 0print ' 存在。'elseprint ' 不存在。
DevExpress-SpreadSheet 如何获得单元格显示的值
DevExpress-SpreadSheet 如何获得单元格显示的值 可以使用Cell.IsFormula方法检查单元格是否包含公式。如果单元格包含公式,则可以使用Cell.AsFormula.ActualValue属性获取单元格的值。
HMAC-SHA1 算法 加密字符串函数
function EncryptHMACSha1(Input, AKey: AnsiString): TIdBytes; var Key: TIdBytes; begin with TIdHMACSHA1.Create do try Key := ToBytes(AKey); Result := HashValue(ToBytes(Input)); fina...
CEF4Delphi 常用设置
CEF4Delphi 是由 SalvadorDíazFau 创建的一个开源项目,用于在基于Delphi的应用程序中嵌入基于Chromium的浏览器。CEF4Delphi 基于Henri Gourvest 的 DCEF3。DCEF3的原始许可证仍适用于CEF4De...