摘要：
以下代碼在D7+ACCESS+FastReport 3.15版中測試通過.1.將FastReport存入數據庫中:在窗體的"Insert"按鈕的OnClick事件中插入下面代碼:(Insert_rep: TADOQuery.設置SQL語句:select * from reportdata.注:ReportData為放置數據庫的表,其中有字段ID(標志),REPORT(報表內容))procedure TForm1.Button4Click(Sender: TObject);vartemplate : TStream;begintemplate := TMemoryStream 阅读全文
摘要：
Delphi对摄像头的控制很简单，在System，windows和messages三个单元内已定义了所有的底层消息函数，我们只需要合理的调用它们就行了。我把摄像头的有关操作做成一个控件，这样就可以拖动窗体上直接使用了。{************************************* Camera Control for Delphi7 ** Made by Rarnu ** Credit 2006.08.27 ** http://rarnu.ik8.com *************************************}unit RaCameraEye;interfac 阅读全文
摘要：
1. 先用一般的文书编辑器建好一个 MySet.inc 的普通文本文件 , 内容为 :{$H+}{$DEFINE _Proversion}2.在我们的程序中 , 加入一列 {$I MySet.inc}, 例如 :unit Unit1;{$I MySet.inc}interface… implementation{$R *.DFM}procedure TForm1.Button1Click(Sender: TObject);begin{$IFDEF _ProVersion} ShowMessage(' 专业版 ');{$Else} ShowMessage(' 只有专业版才 阅读全文