随笔分类 -  delphi

金蝶物料数据时间轴
摘要：procedure TDocumentStatus_Frame.loginKingdee; var RESTClient: TRESTClient; RESTRequest: TRESTRequest; RESTResponse: TRESTResponse; JSONArr, JSONArr1: 阅读全文
posted @ 2024-07-15 15:42 左边江湖右边庙 阅读(124) 评论(0) 推荐(0)
Delphi LDAP对象管理（用户登录认证、组、组织）
摘要：unit login; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, uniGUITypes, uniGUIAbstractClasses, uniGUIClasse 阅读全文
posted @ 2024-07-08 12:55 左边江湖右边庙 阅读(91) 评论(0) 推荐(0)
转换UTC时间格式
摘要：uses SysUtils, DateUtils; LocalDateTime:=now; memo1.Lines.Add(formatdatetime('yyyy-MM-dd"T"hh:nn:ss".702Z"',(TTimeZone.Local.ToUniversalTime(LocalDate 阅读全文
posted @ 2024-07-08 12:49 左边江湖右边庙 阅读(50) 评论(0) 推荐(0)
数据集转换JSON
摘要：procedure TForm1.DataSetToJSON(DataSet:TDataSet); var JSONObject: TJSONObject; JSONArray: TJSONArray; JSONItem: TJSONObject; i:integer; begin JSONArra 阅读全文
posted @ 2024-07-04 21:19 左边江湖右边庙 阅读(41) 评论(0) 推荐(0)
delphi LDAP ActiveDs_TLB单元代码
摘要：unit ActiveDs_TLB; // ************************************************************************ // // WARNING // // The types declared in this file wer 阅读全文
posted @ 2024-07-04 16:08 左边江湖右边庙 阅读(71) 评论(0) 推荐(0)