2024年7月15日
金蝶物料数据时间轴
摘要： procedure TDocumentStatus_Frame.loginKingdee; var RESTClient: TRESTClient; RESTRequest: TRESTRequest; RESTResponse: TRESTResponse; JSONArr, JSONArr1: 阅读全文
posted @ 2024-07-15 15:42 左边江湖右边庙 阅读(99) 评论(0) 推荐(0)
2024年7月8日
Delphi LDAP对象管理（用户登录认证、组、组织）
摘要： unit login; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, uniGUITypes, uniGUIAbstractClasses, uniGUIClasse 阅读全文
posted @ 2024-07-08 12:55 左边江湖右边庙 阅读(78) 评论(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 左边江湖右边庙 阅读(42) 评论(0) 推荐(0)
2024年7月4日
数据集转换JSON
摘要： procedure TForm1.DataSetToJSON(DataSet:TDataSet); var JSONObject: TJSONObject; JSONArray: TJSONArray; JSONItem: TJSONObject; i:integer; begin JSONArra 阅读全文
posted @ 2024-07-04 21:19 左边江湖右边庙 阅读(24) 评论(0) 推荐(0)
delphi LDAP ActiveDs_TLB单元代码
摘要： unit ActiveDs_TLB; // ************************************************************************ // // WARNING // // The types declared in this file wer 阅读全文
posted @ 2024-07-04 16:08 左边江湖右边庙 阅读(57) 评论(0) 推荐(0)