liessay - 博客园

2021年7月8日

摘要：效果比较简单,直接贴代码 //打印第一份报表 procedure TForm1.Button2Click(Sender: TObject); begin frxReport1.LoadFromFile('1.fr3'); TfrxMemoView(frxReport1.FindObject('Me 阅读全文

posted @ 2021-07-08 10:34 liessay 阅读(773) 评论(2) 推荐(0) 编辑

Delphi使用AcroPDF ActiveX显示PDF文件

摘要：效果展示调用方式放入窗体即可使用，不想安装太多组件，可使用纯代码方式调用 interface ..... var AcroPDF: TAcroPDF; .... implementation ..... procedure TForm1.FormClose(Sender: TObject; va 阅读全文

posted @ 2021-07-08 09:32 liessay 阅读(1939) 评论(0) 推荐(0) 编辑

Delphi使用Zxing创建二维码

摘要：效果 DelphiZXingQRCode下载地址:https://www.debenu.com/open-source/delphizxingqrcode/ 为了调用方便unit DelphiZXIngQRCode增加了一个过程 procedure EncodeToImage(const text: 阅读全文

posted @ 2021-07-08 08:35 liessay 阅读(1593) 评论(0) 推荐(0) 编辑

2021年6月30日

TreeView和ListView数据库查询数据联动操作

摘要：好久不用了，重新整理下放这里以备需要使用，功能见图数据库表结构定义TreeView addObject中data存储的记录集 type PNode = ^TNode; TNode = record id: Integer; tcmc: string; mxid: string; end; 填充T 阅读全文

posted @ 2021-06-30 13:55 liessay 阅读(523) 评论(0) 推荐(0) 编辑

2021年6月24日

根据数据库查询结果动态创建控件(仿看板模式显示)

摘要：工作遇到一个需求，主表、明细表需要用看板的模式显示，主表显示内容，从表显示表明细，如下图所示，需要每个表右键菜单独立选择当前明细内容 Pas程序 unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, 阅读全文

posted @ 2021-06-24 15:38 liessay 阅读(240) 评论(0) 推荐(0) 编辑

2021年3月29日

GridView控件使用

摘要：增加显示列gridView.Columns.AddVisible("AgentName", "姓名");设置是否为只读gridView1.OptionsBehavior.ReadOnly = true;设置是否可编辑gridView1.OptionsBehavior.Editable = false 阅读全文

posted @ 2021-03-29 11:34 liessay 阅读(237) 评论(0) 推荐(0) 编辑

LayoutControl控件使用

摘要：因默认外边距过大需要将外边距缩小用以下代码实现layoutControlGroup1.Padding = DevExpress.XtraLayout.Utils.Padding.Empty;是否允许只读控件获得焦点layoutControl1.OptionsFocus.AllowFocusReado 阅读全文

posted @ 2021-03-29 11:31 liessay 阅读(148) 评论(0) 推荐(0) 编辑

TreeListLookUpEdit控件使用

摘要：绑定数据 treeListLookUpEdit1.Properties.DataSource=list;增加列treeListLookUpEdit1.Properties.TreeList.Columns.AddVisible("DepartmentCode");设置IDtreeListLookUp 阅读全文

posted @ 2021-03-29 11:29 liessay 阅读(594) 评论(0) 推荐(0) 编辑

Devexpress TreeList控件使用

摘要：增加显示列treeList1.Columns.Add(new TreeListColumn {Caption = "城市", FieldName = "Name", VisibleIndex = 0});设置是否为只读treeList1.OptionsBehavior.ReadOnly = true 阅读全文

posted @ 2021-03-29 11:28 liessay 阅读(1181) 评论(0) 推荐(0) 编辑

2021年1月23日

Asp.Net 5上传文件 (Core API方式)

摘要：参考文档首先在控制器中注入IWebHostEnvironment IWebHostEnvironment提供有关正在运行应用程序的Web托管环境的信息。属于命名空间Microsoft.AspNetCore.Hosting IWebHostEnvironment接口需要注入为控制器依赖性再后来整个阅读全文

posted @ 2021-01-23 17:08 liessay 阅读(1350) 评论(2) 推荐(1) 编辑

Li Essay

公告