可以把function寫在一個xxx.pas中,
然後uses xxx
如附檔之uses_test.pas
如果function有連資料庫,如附檔之Button3,
要如何設計,才比較方便reuse???
目前的作法是在每一個project新增一個相同的function,
感覺很不方便

------
OS : Win 7 pro
Program : Delphi 7
DataBase : Ms Sql 2008

附加檔案：466ea607b3acf_問題.rar

編輯記錄

如果程式很大，很多表單都要運用到ADO物件，那麼應該將所有的ADO物件放在一個DataModule裡面，並且最好在所有表單之前Create起來(可以手動調整Project Source)，那麼之後各個表單只要Uses那個DataModule即可，運用之妙存乎於心。
還有你程式中動態Create的Query是多餘的，你的主FORM中不是已經放了一個Query了嗎？建議考慮使用上面的方法。

補充說明：建議增加一個參數，傳入一個TDataset，如此資料物件即可與function分離。

DataModule沒用過,
看下面網頁的附加檔案
http://delphi.ktop.com.tw/board.php?cid=17&fid=115&tid=3861
改了一下程式,大概可以解決問題了
第一次用DataModule,不知這樣的寫法好不好...
附加檔案已更新為修改過後的(用DataModule)
-------------------------
小弟先說明一下目前公司的程式架構
目前公司主要有二個系統
一個是ms sql delphi 7.0(以下稱為A系統)
一個是sybase powerbuild(以下稱為ERP系統)
A系統常常要去ERP系統捉一些資料作結合,
例去用料號去捉料品名稱.規格,
用客戶代號捉客戶名稱..等
所以想找一個可以resue的方法,解決問題...
照小弟附件的DataMOdule用法,感覺應可以解決一部份的問題
目前A系統的架構是一個main.exe登入程式,
輸入帳號密碼後會出現有權限程式的樹狀檔名
如:
xxxx系統
xxx001.exe 程式名稱
xxx002.exe 程式名稱
yyyy系統
yyy001.exe 程式名稱
yyy002.exe 程式名稱
連點二下樹狀裡的資料,會用ShellExecute開啟一個.exe執行檔,
並帶入資料庫ip,資料庫名稱,帳號,密碼(執行檔的連線方式在test專案的TForm1.FormCreate)
照小弟附件的DataMOdule用法,DataMOdule裡的資料庫ip,及資料庫名稱是寫死的..
要怎麼改成活的呢????

------
OS : Win 7 pro
Program : Delphi 7
DataBase : Ms Sql 2008

編輯記錄

if your system is Client-server  , then let DataModule out ...
I think you should Dynamic create a DB Pool to some one DB you want to connect ...
and ... It change Connection String easier for u ....

感謝各位前輩的幫忙..
小弟已改用dll去測試了..
在測試時有一些小問題,
請各位前輩有空再幫小弟看一下程式
http://delphi.ktop.com.tw/board.php?cid=30&fid=69&tid=89068
感恩

------
OS : Win 7 pro
Program : Delphi 7
DataBase : Ms Sql 2008