- 博客(7)
- 资源 (3)
- 收藏
- 关注
RSS订阅原创 server2016升域控后，Defender 提示无法访问指定设备路径
如题，打开桌面图标设置也是这提示。新装server2016的时候是可以的，一旦提升到域控，再点击就会有此提示。网上搜到的，更改用户账户控制，\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System下的EnableLUA改为0。...
2022-07-11 17:23:14
308
原创 访问共享提示0x80070043错误。
首先，本机系统正常。其次，可以Ping通服务器。访问服务器共享时提示0x80070043，。网上找了很久没找到，自己去把两台服务器的组策略对照 了一下，发现问题在这里：限制NTLM:传入NTLM流量 不知道是哪天设置的，后来忘掉了。将其改为允许所有。...
2022-07-10 17:21:02
12300
1
原创 HexToInt
function hextoint(s:string):integer;var i,k,a,len:integer;begin k:=0; len:=length(s); for i:=1 to len do begin case s[i] of '0':a:=0; '1':a:=1; '2':a:=2; '3':a:=...
2019-04-16 08:23:28
889
原创 保存表格列宽度cxgrid
procedure cxGridColWidth(t:tcxgridtableview;name:string;mode:string);var f:Tinifile; sl:Tstringlist; i:integer; s:string;begin sl:=Tstringlist.Create; sl.Delimiter:=','; f:=Tinifile.Cre...
2019-04-16 08:17:41
435
转载 cxGridTableView 设置行号
procedure SetRowNumber(var Sender: TcxGridTableView; var AViewInfo: TcxCustomGridIndicatorItemViewInfo; ACanvas: TcxCanvas; var ADone: boolean);var AIndicatorViewInfo: TcxGridIndicatorRowItemView...
2019-04-16 08:11:13
340
原创 Delphi 不打开Main窗口，先打开登录窗
program Project1;uses Vcl.Forms, Unit1 in 'Unit1.pas' {Form1}, Unit2 in 'Unit2.pas' {Form2};{$R *.res}begin Application.Initialize; Application.MainFormOnTaskbar := True; if a then...
2019-04-13 23:01:11
1029
原创 AC Report 在Delphi XE10中应用
ACReport 设置方便，比较适合软件使用中自定义报表。最新的3.2版本，是通过注册DLL来使用的里面包含的注册控件，在D7中直接可以使用，在D10中，无法注册。在Demo中的Delphi文件夹下，有个AcUtils文件夹，里面的文件复制到D10工程文件夹下面。就可以直接在D10中使用ACReport了。不过要安装BDE。自定义 fac: TAcRptEngine;...
2019-04-13 22:52:25
624
TopGrid3 for Delphi XE10.1.2(修改)
2019-04-22
读MSSQL表生成 insert脚本
2019-04-16
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人