- 博客(7)
- 资源 (3)
- 收藏
- 关注
原创 server2016升域控后,Defender 提示无法访问指定设备路径
如题,打开桌面图标设置也是这提示。新装server2016的时候是可以的,一旦提升到域控,再点击就会有此提示。网上搜到的,更改用户账户控制,\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System下的EnableLUA改为0。...
2022-07-11 17:23:14 316
原创 访问共享提示0x80070043错误。
首先,本机系统正常。其次,可以Ping通服务器。访问服务器共享时提示0x80070043,。网上找了很久没找到,自己去把两台服务器的组策略对照 了一下,发现问题在这里:限制NTLM:传入NTLM流量 不知道是哪天设置的,后来忘掉了。将其改为允许所有。...
2022-07-10 17:21:02 12536 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 895
原创 保存表格列宽度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 437
转载 cxGridTableView 设置行号
procedure SetRowNumber(var Sender: TcxGridTableView; var AViewInfo: TcxCustomGridIndicatorItemViewInfo; ACanvas: TcxCanvas; var ADone: boolean);var AIndicatorViewInfo: TcxGridIndicatorRowItemView...
2019-04-16 08:11:13 341
原创 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 1032
原创 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 632
TopGrid3 for Delphi XE10.1.2(修改)
2019-04-22
读MSSQL表生成 insert脚本
2019-04-16
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人