其他

class procedure TFWaitForm.Execute(const AMsg: string);begin01.  with TFWaitForm.Create(Application) do  begin02    aniMain.Active := true;03    PostMessage(Handle, WM_CLOSE, 0, 0);04    Msg := AMsg;05    Show;06    SendMessage(Handle, WM_KEYDOWN, 13

procedure TFDBForm_EditForm_MD.EnableDataSetEvent(AEnalbed: Boolean);{$J+}const  CDetailBeforeEditEvent: TDataSetNotifyEvent = nil;  CDetailBeforeDeleteEvent: TDataSetNotifyEvent = nil;{$J-}begin  inherited;  if AEnalbed then  begin    if not

這幾天查記憶體流失，發現編輯表單彈出後，出現了記憶體流失。原來以為是編輯表單的問題。經過排查發現是編輯表單關閉後reOpen的時候因為需要記錄原有資料集的位置所以用到了BookMark現在用了FastMM發現之前的寫法有問題 var  lvBookMark:Pointerbegin  lvBookMark:=cdsMain.GetBookMark; try    …… finally   if cdsMain.ValidateBookMark(lvBookMark) then    

var  ConnectionService := TConnService;procedure TfrmMain.FormCreate(Sender: TObject);begin  ConnectionService := TConnService.Create(Application);end;destructor TfrmMain.Destroy;begin 

 第一，主要是多寫，實踐是最好的老師，多寫系統，一套一套的系統寫。每寫完一套，就會覺得自己的水平就會提高了不少，每個高手，寫的代碼是很多的。 第二，多和身邊的同事，高手交流，和他們一起開發系統。 第三，看書嘍，怎樣把代碼寫得漂亮有條理，重用性高！比如設計模式，一定要看！最近出的InsideVCL，等水平高一點後也要看。每個程式員都寫代碼。但是要寫出好的代碼。是不容易的！ 第四，學自己不懂的技術，也許這些新的技術，可以大大的提高代碼效率。比如，繼承，Frame。等等。不要怕新的技術。

1.流：(TStream)使用流裡要注意流的位置(Position)，否則小心讀不到東西。2.介面:(Interface)介面變數不再需要的時候不要自己去調用MyInterface._release()函數。應該MyInterface:=nil;來釋放介面變數。自己調用dllInterface._Release釋放一次介面變數,dllInterface自動釋放介面變數調用一次，所以可能是釋放兩次。3.DBGridEh273966879(C01.楓長舞)

錯誤 1324。檔案夾路徑 .. 中含有無效的字元今天用移動usb disk把[visual.studio.net.2005.簡體中文版].microsoft.visua拷到了家裡，準備好好學習下csharp，也讓LP也一起學習下csharp，她待在家裡很悶，沒做事。學點東西也好。說不定以後可以幫幫忙。誰知安裝不了，裝了四五次還是不行，還以為是用usb disk沒有copy好。    

 declare @StartDate datetimedeclare @EndDate datetimedeclare @WeekDay INT, @WeekNum INTset @StartDate = '2009-10-4'  set @EndDate = '2009-10-25' set @StartDate = '2009-10-1'  set @EndDate = '2009-10-2' set @StartDate = '2009-10-3'  set @EndDate = '20

temperature010203Ares 15:02:10Check(DSCursor.ModifyRecord(ActiveBuffer));Mofen 14:58:06就這樣OK了？Mofen 14:58:25謝謝了Mofen 14:58:32我試一下。:)Ares 15:02:54function TAcbsClientDataSet.LoadBlobData(FieldName: string): boolean;var  F1, F2 : TField;  V : Variant; 

今天花了我將近一個小時的時間來才找到了這個原因,真是鬱悶.我將查詢的設計流ChangeName將QueryCreator改成QueryCreatorView後發現主的QueryCreator建立老是有問題,有一些組件不顯示了.後來才發現是在ChangeName的時候,設計流儲存了修改記錄,恢複Detail的設計流時,把Main的QueryCreator的組件進行改名,解決:在資料字典設計流改名後,重新DesignAnayzer.Star一下.這樣就好了.

這幾天在移植代碼，將之前的項目移植到外掛程式架構裡面，因為之前是單EXE的。對記憶體流失問題不是很在意。在DLL下面就不一樣了，所以加入FastMM4來做監控調試。發現之前的ScripParser解析SQL時存在記憶體流失。 其中有段代碼 var lvItem : TSuperObjectIter;begin if ObjectFindFirst(vParam, lvItem) then try repeat FScript :=

多層系統架構本架構已經講解中介層請參照講義http://www.cnblogs.com/dksoft/category/10146.html主題:<外掛程式式>的中介層架構 第一節主題:<外掛程式式>的中介層架構 第二節 |DLL的Exception你如何處理？|不同宿主內如果介面拋出異常，怎麼處理用戶端架構的解決方案可以參照EXE BPL DLL Interface Package

今天研究了一下TMail2000,發現他的Demo發送Email根本就行了.開始發現每次[Save fields to header]時老是在mToNames列表中多了一個空的Item,發送email返回的訊息也是Bad address xxxx後來跟蹤發現function TSMTP2000.SendMessageTo(const From, Dests: String): Boolean;這個方法裡,它不會理會Dests的Item是否為空白    for Loop := 0 to

一個項目的開始先有需求，這個需求不管是直接客戶提出還是由上級提出。對應到rose裡面就是使用案例圖。使用案例圖分為use-case(用例也叫系統用例)和Business

今天上午折騰了半天，下午又折騰了幾個小時，終於搞定了，定出來讓大夥解燃眉之急。如果有更好的辦法請你告訴我。:)1.選刪除以前版本在Winnt\System32\ tee*70檔案刪除2.開啟Delphi7編譯Delphi 2005: Tee7D9.bpgDelphi 7:    Tee7D7.bpg3.安裝DCL的包4.reinstall FastReport安裝Fastreport先按照FastReport的TeeChart.txt說明修改frxReg.inc檔案---------------

EhLibADO,  initialization   RegisterDatasetFeaturesEh(TADOSQLDatasetFeaturesEh, TADOQuery);   RegisterDatasetFeaturesEh(TADOCommandTextDatasetFeaturesEh, TCustomADODataSet); EhLibCDSinitialization {$IFDEF EH_LIB_6}  

--從人事庫中查出在職的,薪卡號重複的記錄 select FGongKaHao from bas_Employee   where  FZaiZhi=0   group by FGongKaHao having count(FGongKaHao)>1 --找出進倉從表的出倉數量和出倉記錄中的出倉數量總合不一樣的記錄SELECT * FROM(    select        ISNULL(         (            --計算出倉記錄裡的出倉數量總合           

總結:1. 使用CloneCursor(FSourceCds, false), 新的Cds移動(first, next, piror, last)不會影響到FSourceCds的移動．   pvParentKey:=FCdsGongChengPZJL_TV.FieldByName('FKey').AsString;    lvTmpCds := TClientDataSet.Create(nil);    lvTmpCds.CloneCursor(FCdsGongChengPZJL_TV,

以前一直認為這個xp的一個bug(也應該是系統的bug)每次需要複製中文的時候到另外的記事本裡的時候在要複製的介面裡我都將IME切換到中文IME,然後複製才可以解決複製出現的亂碼問題.到前幾天我幫我老婆裝個IME時習慣性的裝好IME後,把[簡體中文-美式鍵盤]刪除,換成[英語(美國)-美式鍵盤]然後她就報怨說複製有亂碼問題,說以前沒有的,後來想想是不是我把[簡體中文-美式鍵盤]刪除的問題.一試果然是的想想道理,和以前的做法的原理都是一樣.保留[簡體中文-美式鍵盤]把[英語(美國)-美式鍵盤]刪除

我點擊這個部位,他執行的是建立的動作. 在這個位置點就是正常的  這個位置點,彈出這個 經過幾個小時的折騰, 也沒有找出什麼原因來我上面都的按扭都是連的是action. 居然點按鈕的前半部分不正常. 點後半部分才正常. 寫這麼多年程式, 頭一次見到...,我把他換成dxBar是正常的. 後來再換回來, 把屬性ShowCaption設為false再設為true, 把什麼AutoSize重設了幾下, 居然可以了難怪真的這幾個小時我的RP真的有問題?  至今沒有想明白是什麼問題. 如果哪位知道,