線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1982
推到 Plurk!
推到 Facebook!

請問Tprint如何列印黑底白字的文字??

尚未結案
kswedu
一般會員


發表:9
回覆:13
積分:4
註冊:2004-04-13

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-04-13 11:55:50 IP:61.30.xxx.xxx 未訂閱
各位高手請問Tprint如何列黑底白字的文字? 在此先謝謝摟 發表人 - kswedu 於 2004/04/13 12:24:42
jcjroc
高階會員


發表:21
回覆:276
積分:114
註冊:2002-09-18

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-04-28 17:58:58 IP:211.75.xxx.xxx 未訂閱
用SetTextColor與SetBkColor阿
shieh2700
高階會員


發表:0
回覆:127
積分:100
註冊:2002-06-13

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-05-16 06:07:36 IP:61.216.xxx.xxx 未訂閱
對 BCB 不熟, 下列是 Delphi 的程式碼. 僅供參考...    
procedure TForm1.Button1Click(Sender: TObject);
begin
  with Printer do begin
    BeginDoc;
    Canvas.Font.Size := 48;
    Canvas.Font.Color := clWhite;//文字顏色
    Canvas.Brush.Color := clBlack;//背景顏色
    Canvas.TextOut( 10, 10, 'Hello World!' );
    EndDoc;
  end;
end;
發表人 - shieh2700 於 2004/05/16 06:11:51
系統時間:2017-10-19 6:16:03
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!