摘要: 创建表 CREATE TABLE [dbo].[Products]( [Code] [nvarchar](20) NOT NULL, [Name] [nvarchar](100) NULL, [Price] [decimal](5, 2) NULL, [Quantity] [int] NULL, [ 阅读全文
posted @ 2024-06-28 19:55 liessay 阅读(1) 评论(0) 推荐(0) 编辑
摘要: 创建 Menu 表 CREATE TABLE Menu ( MenuID INT PRIMARY KEY, ParentMenuID INT NULL, Title NVARCHAR(100) NOT NULL, URL NVARCHAR(255), OrderNumber INT, IsActiv 阅读全文
posted @ 2024-06-28 17:27 liessay 阅读(2) 评论(0) 推荐(0) 编辑
摘要: 服务端用的是 mosquitto ,下载地址https://mosquitto.org/download/ 安装完成后需要配置 找到安装目录:mosquitto.conf,打开后修改 allow_anonymous false(禁止匿名登录),password_file D:\Program Fil 阅读全文
posted @ 2024-05-19 00:44 liessay 阅读(74) 评论(0) 推荐(0) 编辑
摘要: 空了再写 最终效果 阅读全文
posted @ 2024-03-22 09:22 liessay 阅读(17) 评论(0) 推荐(0) 编辑
摘要: 界面放上dxGaugeControl控件,点右键添加比例->圆 选择一个自己喜欢的样子,a56爆大奖在线娱乐这只是为了要指针 打开视图选项 AngleStart和AngleEnd主要是调整0-100位置的 MinValue,MaxValue是刻度最大、最小值 MinorTickCount设置次刻度数量 ShowBac 阅读全文
posted @ 2024-03-22 09:18 liessay 阅读(22) 评论(0) 推荐(0) 编辑
摘要: 官方示例效果 一、图表和数据多标签效果 二、自定义图表和选择图表类型(Border是否显示边线) 三、图表标题(Alignment文字对齐方式,Position标题相对图表的位置,上方、左方、右方、下方) 四、是否透明标注边框,选择透明后没有边框和白色底色 五、鼠标移动上去聚焦选中 六、右侧图例相关 阅读全文
posted @ 2024-03-11 10:35 liessay 阅读(28) 评论(0) 推荐(0) 编辑
摘要: bpl unit Unit2; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Form 阅读全文
posted @ 2024-02-28 15:06 liessay 阅读(121) 评论(0) 推荐(0) 编辑
摘要: 设计数据库结构及内容格式如下 设计界面如下,打开、保存、打印这三列Properties改为CheckBox方式显示 加载菜单代码如下 procedure TForm1.Button1Click(Sender: TObject); var pNode: TcxTreeListNode; // 父节点 阅读全文
posted @ 2024-01-22 21:18 liessay 阅读(73) 评论(0) 推荐(0) 编辑
摘要: AnimateFloat 是 Delphi 中用于创建简单动画效果的一个函数,它可以让你平滑地改变控件的属性值,例如位置、大小、透明度等。通过指定起始值和目标值,以及动画持续时间,AnimateFloat 函数可以实现属性值的过渡动画效果。 下面是 AnimateFloat 函数的语法: proce 阅读全文
posted @ 2024-01-17 19:21 liessay 阅读(101) 评论(0) 推荐(0) 编辑
摘要: 设计界面如下 把ListView的Item的 Appearance为DynamicAppearance,并且把Item改为高度100 添加Item代码 procedure TForm1.Button1Click(Sender: TObject); var img: TListItemImage; t 阅读全文
posted @ 2024-01-16 13:39 liessay 阅读(73) 评论(0) 推荐(0) 编辑