摘要： 跟着万一老师学习笔记 TQueue 和 TStack, 一个是队列列表, 一个是堆栈列表; 一个是先进先出, 一个是先进后出.TStack 主要有三个方法、一个属性:Push(压栈)、Pop(出栈)、Peek(查看下一个要出栈的元素);Count(元素总数). unit Unit1; interfa 阅读全文

摘要： TQueue 和 TStack, 一个是队列列表, 一个是堆栈列表; 一个是先进先出, 一个是先进后出.TQueue 主要有三个方法、一个属性:Enqueue(入列)、Dequeue(出列)、Peek(查看下一个要出列的元素);Count(元素总数). 1 unit Unit1; 2 3 inter 阅读全文

摘要： unit Unit1; interface uses System.NetEncoding, IdGlobal, IdSSLOpenSSL, IdSSLOpenSSLHeaders, EncdDecd, Winapi.Windows, Winapi.Messages, System.SysUtils 阅读全文

摘要： str:string; Pchar(str)等于PAnsiChar(AnsiString(str)); 阅读全文

摘要： 开发钉钉审批流时，需要用到钉钉表单的Processcode，有两种方法 ： 一、手动获取： 管理员后台——审批——找到对应的表单：如图： ProcessCode后面就是了！ 二、接口获取：今天的重点，不说了，直接上代码。 function TDingtalkNew.GetProcessCode(Pr 阅读全文

摘要： <?xml version="1.0" encoding="utf-8"?> <ConString> <Item> <Name/> <Type>C</Type> <Value> <Option>3301</Option> </Value> </Item> <Item> <Name/> <Type>C 阅读全文

摘要： 在开发Datasnap三层中，使用FireDac 连接 MSSQL数据库。 实现过程如下： 1、在ServerMethods 单元中放入 FDManager、FDPhysMSSQLDriverLink1、FDGUIxWaitCursor1等控件。 2、自定义过程： private var oPara 阅读全文

摘要： MORMOT是免费开源的SDK，它封装了HTTP.SYS，这是许多人使用它的原因，让人难以想像的是它居然支持DELPHI6及以上版本。 只需要复制MORMOT的以下几个单元文件： SynCommons.pas，SynCrtSock.pas，SynLZ.pas，SynZip.pas，SynCrtSoc 阅读全文

摘要： procedure TForm1.btn1Click(Sender: TObject); var D:TDateTime; s:string; begin D:=VarToDateTime('20-01-01 04:35PM'); S:=FormatDatetime('YYYY-MM-DD HH:M 阅读全文

摘要： 主要用到 DELPHI XE 10.2新增HASH函数 class function TUtils.GetStringMD5(const AInPut: string): string; begin Result := THashMD5.GetHashString(AInPut).ToLower; 阅读全文