原创 一個功能齊全的Delphi DES類(含3DES)[更新:增加示例]

//包含DES加/解密和3DES加/解密 //--------------------------------------------------------------------------- unit u3DES; interf

原创 從大華科技SDK的C頭文件轉換來的Delphi版 DHNetSDK.pas和DHConfigSDK.pas

     大華科技的SDK不支持Delphi,如果想用Delphi調用大華科技SDK裏面的接口,需要先把其中C頭文件轉換成Delphi的pas文件。文件壓縮包裏面的兩個文件(DHNetSDK.pas和DHConfigSDK.pas)是我用

原创 解決Delphi的TIdFtp組件在使用壓縮方式下載有時會報錯的問題 [更新:Delphi 10.3又有新Bug]

本人在使用Delphi TIdFtp進行壓縮方式下載時,發現有時會報一個EIdReplyRFCError類型的錯誤,錯誤信息爲Data connection closed abnormally。經分析發現是由於IdCompressorZL

原创 解決Delphi XE3及以上版本中的ClientDataSet的長中文字段名出現亂碼的問題【此問題從Delphi 10.3.3開始已解決】

       這個問題起碼從Delphi XE3開始就存在,一直到目前最新版本都是這樣,而且預計還會長期存在下去。導致這個問題的原因是這個組件和DataSetProvider組件的一些變量從AnsiString改成了utf8String,

原创 一個可以不斷執行命令、能讀取命令輸出而且隱藏的Delphi Console類[更新:允許實時輸出]

                unit uConsole; interface uses {$IF CompilerVersion <= 22} Classes, Windows, Messages, SysUtils,