原创 淘寶助理的sqlite3數據庫解密
新版本的淘寶助理使用了sqlite3數據庫，不過卻是加密了的。採用了淘寶自己寫的加密過程，用常用的sqlite3管理程序無法打開。 經過幾天研究，發現了其加密算法，分析如下： 淘寶助理使用的 sqlitedll.dll 內包含有一個 sq
2020-07-07 19:52:11
2
原创 delphi 二維碼示例，支持d7，d2010及更高版本
根據fastreport的二維碼組件，修改了一下可在程序中直接引用。並修改了幾個地方使其支持unicode版的delphi，經在d2010下測試掃描，正常。 示例代碼和所需庫文件下載： http://pan.baidu.com/s/1o
2020-07-07 19:52:11
2
原创 delphi2007 Tstringlist的新增屬性 StrictDelimiter
經常會用到stringlist類的字符串分割功能，簡單易用。如下代碼，把用tab鍵分隔的string轉爲stringlist var t: tstringlist;begin t.Delimiter:= #9; t.Delimit
2020-07-07 19:52:10
13
原创 六爻預測，前沿科學？僞科學？
對於周易六爻預測，一直被斥之爲封建迷信，歷史糟粕。 不過在實踐當中，六爻預測又能有諸多靈驗。占卜者又往往對此解釋爲心靈感應，心誠則靈，鬼神指引等，現代的一些周易學者則給其穿上全息論，信息場等等似是而非的外衣。 六爻預測到底如何，前些日子學
2020-07-07 19:52:09
3
原创 六爻預測等各種預測術的本質探討之隨機數猜想
對於各類預測術，比如六爻術，源於周易八卦。大家對預測術的觀點涇渭分明，要麼很相信，要麼很不屑。或者有些人認爲信則有不信則無。 當然我本人是信奉現代科學的，不過預測術確實有不可思議的地方，對過去和未來的分析不是簡單的一句”巧合，概率論“能說
2020-07-07 19:52:09
1
原创 delphi xe10 TNetHTTPClient 中文亂碼 utf-8的解碼
delphi新版本里增加了 TNetHTTPClient 組件，在https的ssl使用上比indy控件方便。然後獲取的如果是utf-8編碼的網頁，需要解碼後顯示，不然中文會亂碼。 不需解碼時可以直接獲取網頁內容： ss:= NetHTT
2020-07-07 19:52:07
23
原创 asphyre pxl canvas的常用函數介紹
asphyre pxl是一個可用於 delphi和freePascal的跨平臺2d 3D引擎，但介紹資料很少。其中的canvas是畫布，這上面的圖形會渲染到屏幕上。 canvas有很多實用的函數，簡介如下 function Initial
2020-07-07 19:52:07
2
原创 delphi用indy實現php後臺的文件上傳下載
indy控件使用方便，用indy來下載的資料網上很好找。因業務需要使用了indy上傳，php後臺來接收文件。主要代碼如下： delphi： uses IdMultipartFormData 單元 PostData := TIdMultip
2020-07-07 19:52:05
19
原创 一個快速批量查詢快遞物流數據的小工具，可同時多種快遞物流信息跟蹤查件
前幾天寫了一個用於快遞批量查詢並分類的小工具，適合快遞網點或者商家用於物流或者問題件的狀態跟蹤。 支持批量查詢，支持不同快遞單號混合一起查詢。方便物流跟蹤查件，本程序僅一個程序文件綠色免安裝下載解壓即可運行。 下載地址1：本地下載 快遞批
2020-05-31 10:28:05
1
原创 淘寶平臺開發 delphi 示例
淘寶開放平臺的開發例子大多都是c#，php，java等，缺少Pascal的例子。 現用delphi寫了一個示例， 關鍵點是簽名的生成，簽名需按key字母順序排序，並去掉等於號後首尾相連。 關鍵代碼： memstr:= TMemory
2020-02-25 13:18:37
原创 interbase 大小寫導致的問題一例
今天在調試程序時候，報“列”不存在錯誤。但經檢查，列是存在的 IBconsole內也能修改數據。但在sql語句內不管是select 還是 insert，都報錯。很是奇怪。於是試着給表增加一個同名字段，竟然加進去了。查看元文件，發現存在兩個
2020-02-25 13:18:37
原创 Intel 第三代CPU酷睿處理器內置硬件隨機數的獲取方法
Intel在IVB架構的第三代CPU酷睿處理器（2012年開始生產）內置了一個利用電阻熱噪聲取得硬件真隨機數的功能。 關於真隨機數和僞隨機數的區別，以及世上是否存在真隨機數等哲學爭論不在本文討論範圍。 下面給出delphi代碼，一共4個函
2020-02-25 13:18:37
原创 梅森旋轉法僞隨機數在delphi下實現
梅森旋轉法（也有翻譯爲馬特賽特旋轉算法）產生的僞隨機數比線性同餘法要好。產生隨機數的速度快、週期長，可達到2^19937-1，且具有623維均勻分佈的性質，對於一般的應用來說，足夠大了，序列關聯比較小，能通過很多隨機性測試。現在很多編程語
2019-08-23 09:09:09
3
原创 解決nethttpclient下post與get的urlencode問題一個
在delphi xe下調用百度的翻譯api，百度支持get與post兩種方法。想着get效率更高，於是打算數據量小的時候用get，要翻譯的數據量大時用post提交。 要提交的數據 q=httpEncode(UTF8Encode(memo1
2019-08-15 08:29:57
7