原创 賬套創建

Option   ExplicitConst   CompanyName   As   String   =   "一卡通系統"Private   Sub   CmdExit_Click()        Unload   MeEnd  

2020-06-21 10:11:10

原创 Dbgrid使用技巧(下)-

Dbgrid使用技巧(下)- -                                        二、建立項目，實現功能 1．新建一項目，併爲表單添加相關控件，各控件主要屬性如下表： 2．建立各Click的事件代碼 But

2020-06-21 10:11:10

原创 啟動時以0.5秒速度動畫顯示窗體

procedure TForm1.FormCreate(Sender: TObject);begin  AnimateWindow(Handle,500,AW_BLEND);{ 動畫顯示窗體^_^  AW_HOR_POSITIVE = $

2020-06-21 10:11:10 1

原创 自制精美易用的DBGrid

看了以上這麼多的技巧和方法，想必大家未免會有一種衝動吧－自己動手做一個DBGrid，下面就介紹一種自制DBGrid的方法啦。    Delphi中的T

2020-02-22 05:50:05 1

原创 DBGrid的實用技巧

1.隔行不同顏色顯示with TDBGrid(Sender) dobeginif (gdSelected in State) or (gdFocuse

2020-02-22 05:50:05 5

原创 點擊DBGrid的Title對查詢結果排序

欲實現點擊DBGrid的Title對查詢結果排序，想作一個通用程序，不是一事一議，例如不能在SQL語句中增加Order by ...，因爲SQL可能原

2020-02-22 05:50:05

原创 自我複製到系統目錄中,並寫註冊表,使程序開機自動運行

procedure TForm1.CopyNWriteRegestry;var Path:array [0..255] of char;    Hk:HKEY;    SysStr,CurStr:string;begin//以下是自我複製

2020-02-22 05:50:05

原创 取DBGRID內一個單元格內的值

type  TDBGridEx = class(TDBGrid)    function GetValue(row, col: integer):Va

2020-02-22 05:50:05

原创 將FASTREPORT報表從數據庫存入取出

Let's assume, you have a Blob Filed called "Report" and the table Name is "

2020-02-22 05:50:05

原创 Dbgrid使用技巧（上）-

Dbgrid使用技巧（上）- -                                        在 Delphi 語言的數據庫編程中，DBGrid 是顯示數據的主要手段之一。但是 DBGrid 缺省的外觀未免顯得單調和缺

2020-02-22 05:50:05 13

原创 取得某一個月的第一天和最後一天

--可以不用字符串函數就可以select dateadd(mm, datediff(mm, '1901-01-01', getdate()), '19

2020-02-22 05:50:05

原创 另類D6+fastreport3分組報表

作者:DengGuo通常在用fastreport作分組報表時,我們想到的是用groupheader+masterdata+groupfooter,但是在實現分組頁次時總是不能得到各分組頁次與總頁,類似-------------------

2020-02-22 05:50:05

原创 判斷輸入，如果不合要求則無效

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);begin  if no

2020-02-22 05:50:05

原创 在DBGRID中回車到下一格已到最後一格則換行

在onkeypress事件寫如下代碼：if key=#13 then   begin     keybd_event(vk_tab,0,0,0);  

2020-02-22 05:50:05 1

原创 財務軟件、進銷存軟件、ERP中會計憑證錄入模塊DIY全攻略

財務軟件、進銷存軟件、ERP中會計憑證錄入模塊DIY全攻略(二) 一、需求分析  1、錄入界面要求友好，直觀便捷，提供多種錄入途徑並有容錯設計；  2、憑證錄入要符合現行會計制度的要求，制度規定的憑證要素要求用戶完整錄入，否則不能保存； 

2020-02-22 05:50:05