原创 快速合併兩個TList【delphi7】

procedure TfmPubClient.AddList(Source, Dest: TList);var  a1count_old: Integer;begin  a1count_old :=  Dest.Count;  Dest.

原创 sql存儲過程insert 後的錯誤檢查很重要。否則出錯前臺無法知道

 insert CBC_PRecvGoodsOutDetail(Porder, InPorder, Code, InType, OutQty,              Price, PurPrice, OutTotal, salePr

原创 如何將TParams類型轉爲Variant?[轉]

如何將TParams類型轉爲Variant? InParam :TParams; 提供的函數爲 function ExecProc(const ProcName: AnsiString; const InParam: Variant):

原创 深刻理解TNotifyEvent [轉]

function OnButton1Click(Instance, Sender: TObject);begin  showMessage(Instance.ClassName);  showMessage(Sender.ClassNam

原创 [DCC Error] E2161 Error: RLINK32: Error opening file "_____.drf"

關於這個問題:有兩種解決方法(本人用兩種方法都解決過這兩個問題,不過比較偏向於後一種解決問題本質) 1.修改build control 爲 Explicit rebuid 2.清除環境變量裏面的多餘的路徑:

原创 StarTeam client compare 設置

StarTeam supports integration with third-party Compare and Merge tools. To use Guiffy with StarTeam: 1) Select Tools\Wo

原创 我的雲設計

我開發的風控計算服務程序和高速行情服務中,無意中已經有了雲的雛形。   1.有了分片計算的概念。分片計算中,特殊點1是對訪問結束點的判斷,結束點判斷有兩種:一種是計數器判斷法,一種是複雜邏輯判斷法。2是隊列的使用,3是分片任務的優先級

原创 CxGrid使用小結(2)

激活內置編輯控件 1) <aView>.Controller.EditingController.ShowEdit(<aColumn>);  2) <aView>.Controller.EditingController.StartE

原创 cxGrid 部分使用方法

ExpressQuantumGrid4的cxGrid的一些使用方法和經驗   1.簡單介紹:cxGrid右下方的cxGrid1Level1是表示Grid表的層,cxGrid可以有多層,這相當於集合了PageControl的 功能,而

原创 關於string和pchar

Delphi 中字符串的操作很簡單,但幕後情況卻相當複雜。Pascal 傳統的字符串操作方法與Windows 不同,Windows吸取了C語言的字符

原创 cxgrid使用小結(3):分組

訂單號 商品名 單價 數量 金額 001 aa 11.00 2 22.00 001 bb 2.00 2 4.00 001 cc 3.00 3 9.00 ----------------------合計 7 35.00 002 ee

原创 Delphi中的INI文件編程 (轉)

Delphi中的INI文件編程  整理編輯:China ASP ---- INI文件在系統配置及應用程序參數保存與設置方面,具有很重要的作用,所以可視化的編程一族,如VB、VC、VFP、Delphi等都提供了讀寫INI文件的方法,其中De

原创 delphi xe7:Data.DBXMSSQL不能使用在android平臺

今天寫delphi xe7下的一個多平臺的安卓程序,本來好好的程序,突然有如下提示: ClientModuleUnit2.pas(8): F1026 File not found: 'F:\2.work\9031.DataSnapDemo

原创 FDMemTable讓虛字段變得可以讀寫

原文鏈接:https://blog.csdn.net/ozhy111/article/details/88255035 select  '' as temp,flag=0,sql返回的虛擬字段,

原创 FDMemtable中如何在已有的字段數據集上加入字段

//在原有數據集上是加不進去的。可以再做一個FDMemtable,然後     FDMemTable_新數據集.FieldDefs.Assign(DataSet_原數據集.FieldDefs);     FDMemTable_新數據集