原创 隱藏UISearchBar中的clearButton
隨着iOS13的發佈，老APP中的一些代碼無法正常運行，遇到一個正常模式下的UISearchBart，隱藏clearButton的方法無法運行，方法如下： //SearchBar only have one subview (UI
2020-07-06 05:04:18
原创 子軒最近很鬱悶
子軒最近很不聽話，國慶放假，我們都讓他在家休息，可是老是和弟弟打架，也不懂讓着弟弟，結果只能是招來我們的打罵，打過罵過又心疼兒子，實在是太累了，沒時間和精力照顧老大，老大又比較調皮，挨的打就多些。今天帶兒子去交取暖費，還沒出小區，兒子左腳
2020-07-06 04:23:12
原创 二進制DFM文件轉爲文本格式
最近幾天遇到這麼一個問題，Delphi5下的一個工程，其中幾個DFM無法在IDE中打開，經實驗（直接在notepad中打開DFM文件，然後修改）確定是第三方控件中有個ControlData屬性的值引起的；我懷疑這個值存的是
2020-07-06 04:23:12
原创 C#資源文件刪除後，菜單項和工具欄按鈕消失
1.在資源管理界面，無意中新建了兩個圖標文件，覺得沒用，就從文件夾和資源管理器中把他們刪除了。2.再次打開使用了資源圖標、圖像的窗口，發現原來的菜單項和工具欄中的按鈕都不顯示了，編譯運行，窗口中任然沒有。解決方法：經過一系列的折騰，通過和
2020-07-06 04:23:02
2
原创 XCode10編譯舊項目狂喫內存的解決辦法
打開File---workspace setting...---Build System：選擇Legacy Build System。 老項目還是用老的編譯系統吧。
2020-07-06 04:23:02
原创 delphi編程獲取本地IP地址
試了好幾個網上的函數，都得不到正確的結果，最終找到一個能用的。環境：delphi5&win7function LocalIP : string;type TaPInAddr = array [0..1
2020-02-20 19:09:48
原创 獲取文件版本信息的方法
方法一，取回來的都是字符串：procedure TForm1.ShowVersion;const InfoNum = 9; InfoStr: array[1..InfoNum] of string = ( 'ProductName'
2020-02-20 19:09:48
原创 MS SQL Server 2008R2 Express:重命名數據庫
需要修改數據庫屬性爲單用戶：1.打開要改名的數據庫的屬性窗口；2.在選項籤裏修改限制訪問的值爲SINGLE_USER；3.確定後修改數據庫的名稱；4.改完了再把屬性改回去；如果相關程序或者ODBC使用sa用戶名連接數據庫，需要重新修改sa
2020-02-20 19:09:48
原创 TQuery.RecordCount有時不靈呀
我用的是delphi5，版本低可能是一個原因。不過在另外一個過程中使用的是同一個TQuery，查詢的是另外一個表，人家沒問題。在這個表裏，SQL語句放到數據庫管理工具裏執行，明明是有一條記錄的，在程序裏RecordCount非要返
2020-02-20 19:09:48
原创 delphi5下卸載quick report4
安裝qr4以後，會覆蓋lib目錄裏的原有文件，卸載後會出現原有程序無法編譯通過的問題。解決辦法：如果不想重裝IDE（想想就頭疼，還要安裝很多控件和輔助工具以及進行設置）的話，那就從其他裝有delphi5的機器上把qr開頭的原有文件複製回來
2020-02-20 19:09:48
原创 代碼調用需要權限的程序（win7）並帶參數
程序a，普通權限，程序b，需要管理員權限；a調用b的正確方法： shellExecute(application.handle, 'runas', '包含絕對路徑的目標程序名', '程序參數', '默認路徑或者nil', SW_SHOWN
2020-02-20 19:09:48
原创 MS SQL 2008R2 Express創建及連接
SQL Server安裝完後默認安裝了個SQLExpress實例，直接在裏面創建數據庫就能用。 使用安裝程序可以安裝多個實例，使用SQL Server 2008R2卸載程序，可以卸載實例，除非是要完全卸載，否則記得去除選擇卸載SQL B
2020-02-20 19:09:48
原创 TigerInstaller打包BDE和ODBC
項目介紹：1.使用的BDE控件；2.使用了ODBC連接數據庫；3.有多個ocx和dll文件，且多個需要註冊；4.Win7環境，用管理員權限運行tiger，在virtual PC裏的XP系統下測試安裝包。遇到的問題：1.註冊ocx時遇到缺其
2020-02-20 19:09:48
2
原创 在加載了jpg圖片的image上畫圖
實現方法：由於不能直接在加載了jpg圖片的image上用canvas畫線，所以在一個新的image對象上用canvas.StretchDraw先把目標圖像畫出來，然後再用canvas畫線。如果原圖比較大，是使用stretch方式顯示的話，
2020-02-20 19:09:47
原创 獲取系統特殊文件夾路徑
代碼文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCt
2020-02-20 19:09:47