请教delphi+access中的基本打印实现办法 |
|
答題得分者是：supman
|
|
ntjrr
高階會員   發表：240 回覆：312 積分：110 註冊：2005-04-24 發送簡訊給我 |
初学编了一个简单的通讯录软件，放置了若干个EDIT框，和一个DBGrid以及一些按钮，EDIT框输入内容，点按钮后数据做相应变动后在DBGrid中显示出来，所有内容实际上是存入了一个ACCESS数据库中。比如说我增加新内容的代码如下：ADOTable1.FieldByName('姓名').AsString := Edit1.Text;
目前运行一切正常，只是我不懂如何打印，我的要求只要打印数据库中现有的所有内容就行了。能否告诉我放什么控件，怎么设置，代码如何写？谢谢！
我查阅到MEMO的打印方法了：
printer.canvas.font:=memo1.font;
//把当前MEMO1的字体指定给打印对象的CANVAS的字体属性
for lines:=0 to memo1.lines.count-1 do
writeln(prntext,memo1.lines[lines]);
//把MEMO的内容写到打印机对象
但我用的是DBGrid，我不知道如何赋值给打印机了，请高手告知我完整的代码，因为我是初学者，基本很差，呵呵。
------
我的编程起步于ktop，我将永远支持ktop |
|
supman
尊榮會員 發表：29 回覆：770 積分：924 註冊：2002-04-22 發送簡訊給我 |
|
|
ntjrr
高階會員 發表：240 回覆：312 積分：110 註冊：2005-04-24 發送簡訊給我 |
|
|
supman
尊榮會員 發表：29 回覆：770 積分：924 註冊：2002-04-22 發送簡訊給我 |
發表時間：2005-04-25 20:57:53
IP:222.184.xxx.xxx 未訂閱
系統時間：2024-05-12 20:02:43
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |