Delphi Base

WindSon

导航

2020年3月16日 #

MD5加密BASE64加解密

摘要: MD5需要引入system.Hash,BASE64需要引入System.NetEncoding,这两个单元应该只有高版本的DELPHI IDE才有 (貌似XE5以上版本才有)。如果是D7的话,找第三方的库。 procedure TForm19.Button8Click(Sender: TObject 阅读全文

posted @ 2020-03-16 17:16 windsonvip 阅读(1362) 评论(0) 推荐(0)

cxDBTreeList:最简单的节点图标添加方法

摘要: 先在窗体上放ImageList关联到cxDBTreeList,在cxDBTreeList的GetNodeImageIndex事件中写如下: procedure cxDBTreeList1GetNodeImageIndex(Sender: TcxCustomTreeList; ANode: TcxTr 阅读全文

posted @ 2020-03-16 17:13 windsonvip 阅读(484) 评论(0) 推荐(0)

dxTabbedMDIManager1关闭窗体

摘要: procedure TfrmJianKongXinXi.FormClose(Sender: TObject; var Action: TCloseAction);begin Action:=caFree;end; procedure TfrmJianKongXinXi.FormCloseQuery( 阅读全文

posted @ 2020-03-16 17:12 windsonvip 阅读(658) 评论(0) 推荐(0)

DEV插件--Spreadsheet1电子表格

摘要: 常用操作Spreadsheet常用属性标题栏是否可见 Spreadsheet1.TitleBar.Visible=true标题栏背景颜色 Spreadsheet1.TitleBar.Interior.Color="Green"标题栏标题内容 Spreadsheet1.TitleBar.Caption 阅读全文

posted @ 2020-03-16 17:11 windsonvip 阅读(893) 评论(0) 推荐(0)

如何让tcxGrid左边显示序号

摘要: 第一步: 设置cxgrid的属性, OptionsView.Indicator = True 第二步: 写OnCustomDrawIndicatorCell方法 procedure TForm1.cxGrid1DBTableView1CustomDrawIndicatorCell(Sender: T 阅读全文

posted @ 2020-03-16 17:09 windsonvip 阅读(675) 评论(1) 推荐(2)

批处理脚本自动以管理员权限运行

摘要: :::::::::::::::::::::::::::::::::::::::::::: :: Elevate.cmd - Version 4 :: Automatically check & get admin rights :::::::::::::::::::::::::::::::::::: 阅读全文

posted @ 2020-03-16 17:06 windsonvip 阅读(1142) 评论(0) 推荐(0)

Delphi编写的一款锁屏小工具

摘要: Delphi编写的一款锁屏小工具,双击程序立即锁屏,木有界面的。解除锁屏密码:alt+空格。 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, D 阅读全文

posted @ 2020-03-16 16:21 windsonvip 阅读(634) 评论(0) 推荐(0)

Delphi字符串加密解密函数

摘要: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Bu 阅读全文

posted @ 2020-03-16 16:08 windsonvip 阅读(1100) 评论(0) 推荐(0)

Delphi 增加/获得windows用户帐号

摘要: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls; typeUSER_INFO_1 = r 阅读全文

posted @ 2020-03-16 15:52 windsonvip 阅读(362) 评论(0) 推荐(0)

WIN2012域用户添加和批量添加工具

摘要: WIN2012域用户添加和批量添加,不需要进行复杂的进电脑管理去添加 直接在软件上就可单个用户添加,可批量添加,并把指定的用户加入组 可以自定义组织单位,使用起来比较简单方便。 链接:https://pan.baidu.com/s/1MtgZfSBi0Op6TQLEEFw-Pw 提取码:bgcw 阅读全文

posted @ 2020-03-16 15:43 windsonvip 阅读(887) 评论(1) 推荐(0)