[Delphi6]關於Brush.Style色碼模式的解釋 |
答題得分者是:cmf
|
uuujjj
一般會員 發表:31 回覆:59 積分:18 註冊:2002-09-28 發送簡訊給我 |
各位高手大家好: 我還是Delhpi的新手,所以想請教熱心的大家一問題,
我目前有寫到Brush.Style此語法…
但是,我買的書本,沒有很詳細的提其用途及用法,
實在不大明白,bsClear、bsSolid、bsBDiagonal…等色碼的函意,
因為我曾試著利用每一項色碼來改變表單字型的填滿模式,
但,總覺得似乎還是不大明白有任何改變…@@||
我目前也只知道bsClear表示透明模式…^^|||
不知道,有沒有高手願意將自己所知的色碼模式…
分享出來…
因為學到了,就想透徹瞭解其中的用意…
感謝~
|
cmf
尊榮會員 發表:84 回覆:918 積分:1032 註冊:2002-06-26 發送簡訊給我 |
引言: 各位高手大家好: 我還是Delhpi的新手,所以想請教熱心的大家一問題, 我目前有寫到Brush.Style此語法… 但是,我買的書本,沒有很詳細的提其用途及用法, 實在不大明白,bsClear、bsSolid、bsBDiagonal…等色碼的函意, 因為我曾試著利用每一項色碼來改變表單字型的填滿模式, 但,總覺得似乎還是不大明白有任何改變…@@|| 我目前也只知道bsClear表示透明模式…^^||| 不知道,有沒有高手願意將自己所知的色碼模式… 分享出來… 因為學到了,就想透徹瞭解其中的用意… 感謝~type TBrushStyle = (bsSolid, bsClear, bsHorizontal, bsVertical, bsFDiagonal, bsBDiagonal, bsCross, bsDiagCross); property Style:TBrushStyle; bs Solid : 實心 bsCross : 十字網狀 bsClear : 空白 bsDiagCross : 交插網狀 bsBDiagonal : 右斜線 bsHorizontal : 水平線 bsFDiagonal : 左斜線 bsVertical : 垂直線
------
︿︿ |
uuujjj
一般會員 發表:31 回覆:59 積分:18 註冊:2002-09-28 發送簡訊給我 |
謝謝上面高手的回應…^^
我知道了,
但是,我在應用那些設定值的時候…
為什麼出現在表單上的字…
並無任何變化呢????
如:
procedure TForm1.Button1Click(Sender: TObject);
begin
Canvas.Font.Size :=16;
Canvas.Brush.Style :=bsDiagCross ;
Canvas.TextOut(12,12,'我');
end; 那個「我」沒有什麼有變化的感覺耶…^^||
不好意思…想問詳細一點… 發表人 - uuujjj 於 2002/12/28 19:04:18
|
cmf
尊榮會員 發表:84 回覆:918 積分:1032 註冊:2002-06-26 發送簡訊給我 |
引言: 謝謝上面高手的回應…^^ 我知道了, 但是,我在應用那些設定值的時候… 為什麼出現在表單上的字… 並無任何變化呢???? 如: procedure TForm1.Button1Click(Sender: TObject); begin Canvas.Font.Size :=16; Canvas.Brush.Style :=bsDiagCross ; Canvas.TextOut(12,12,'我'); end; 那個「我」沒有什麼有變化的感覺耶…^^|| 不好意思…想問詳細一點… 發表人 - uuujjj 於 2002/12/28 19:04:18procedure TForm1.Button1Click(Sender: TObject); begin Canvas.Font.Color := clRed; Canvas.Brush.Color := clBLUE; Canvas.Font.Size :=100; Canvas.Brush.Style :=bsDiagCross ; canvas.FillRect(ClientRECT); end; 發表人 - CMF 於 2002/12/28 19:51:27
------
︿︿ |
uuujjj
一般會員 發表:31 回覆:59 積分:18 註冊:2002-09-28 發送簡訊給我 |
|
cmf
尊榮會員 發表:84 回覆:918 積分:1032 註冊:2002-06-26 發送簡訊給我 |
|
uuujjj
一般會員 發表:31 回覆:59 積分:18 註冊:2002-09-28 發送簡訊給我 |
|
uuujjj
一般會員 發表:31 回覆:59 積分:18 註冊:2002-09-28 發送簡訊給我 |
謝謝您的提醒…^^
因為還不大習慣有給分制度這樣的討論區
現在已經知要給分,
謝謝您的叮嚀,我已經有指定給分了 ================================================
uuujjj:
請隨時注意是否已獲得滿意答覆,
若已獲得滿意答覆,請指定得分會員. 你共有4篇未結案 【問題】如何利用access表單設計程式寫出能減掉產品資料表的庫存
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=24030
【問題】關於如何使登入網域的電腦完全無法上網瀏覽網站
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=23050
【問題】【Delphi6】請問如何從table中有條件式的轉存為文字檔
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=21625
[/quote]
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |