如何由外部控制tfrshape的顏色??

發文回覆瀏覽次數：1406

推到 Plurk!

推到 Facebook!

如何由外部控制tfrshape的顏色??

答題得分者是：channel

bill_lee
一般會員

發表：4
回覆：7
積分：7
註冊：2003-01-04

發送簡訊給我

#1 引用回覆回覆

發表時間：2003-05-01 18:39:31

IP:61.216.xxx.xxx 未訂閱

外部資料庫檔內有一顏色欄位,讀進REPORT的shape欄位有辦法嗎

channel
尊榮會員

發表：67
回覆：707
積分：854
註冊：2002-05-02

發送簡訊給我

#2 引用回覆回覆

發表時間：2003-05-01 20:38:02

IP:218.163.xxx.xxx 未訂閱

引言: 外部資料庫檔內有一顏色欄位,讀進REPORT的shape欄位有辦法嗎

當然沒有問題：假設您存入資料庫的顏色欄位是字串型態

procedure TForm1.DetailBand1BeforePrint(Sender: TQRCustomBand;
  var PrintBand: Boolean);
begin
  QRShape1.Brush.Color := StringToColor(Query1.FieldByName(ColorField).AsString);
end;

~小弟淺見，參考看看~

------
~小弟淺見，參考看看~

系統時間：2024-05-14 17:16:28

聯絡我們 | Delphi K.Top討論版

本站聲明

1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！