|
Delphi繪圖對(duì)象屬性[TCanvas][一]
2009-01-24 21:10
在Delphi中,專門定義了一組用于繪制圖形的對(duì)象和組件,完成一些簡(jiǎn)單的圖像功能。利用這些對(duì)象、組件的方法,可以方便地繪制各種常用圖形;通過(guò)設(shè)置它們的屬性,能得到不同風(fēng)格的圖形。另外,通過(guò)對(duì)鼠標(biāo)事件的定義,可以方便設(shè)計(jì)圖形繪制程序。
(1)TCanvas,TPen,TBrush,TColor對(duì)象的方法及屬性;
(2)繪圖功能的實(shí)現(xiàn);
(3)TImage,TPicture,TBitBtn,TBitmap組件的方法及屬性;
(4)圖像觀測(cè)及處理。4.4.1 TCanvas——畫布對(duì)象
TCanvas對(duì)象是一個(gè)用于繪圖的組件,Delphi利用這個(gè)組件為用戶提供了一個(gè)繪制圖形的區(qū)域,在這個(gè)區(qū)域上,程序可實(shí)現(xiàn)各種繪圖功能,很多組件(如TImage、TMemo)的Canvas屬性就是TCanvas對(duì)象。在組件上繪制圖形就是在組件的畫布上繪制。TCanvas的Brush、Pen、Font屬性分別是TBrush、TPen、TFont對(duì)象,它們用于定義繪制圖形的風(fēng)格。關(guān)于TBrush、TPen對(duì)象,后面將詳細(xì)介紹。
需要說(shuō)明的是,Delphi中利用前綴T來(lái)標(biāo)志內(nèi)部定義的對(duì)象,例如TPen代表畫筆對(duì)象,TForm則代表窗體對(duì)象等。
畫布的筆的位置定義在PenPos屬性中,可用MoveTo方法來(lái)移動(dòng)筆。如果要在畫布上輸出文本,可用Textout方法。
TCanvas對(duì)象有很多方法,可完成常用的繪圖功能。方法及功能簡(jiǎn)介見(jiàn)表4.2。
表4.2 TCanvas對(duì)象的方法
|
方法
|
說(shuō)明
|
|
Arc
|
Arc(x1,y1,x2,y2,x3,y3,x4,y4 :
Integer);
Arc方法在橢圓上畫一段弧,橢圓由(x1,y1)、(x2,y2) 兩點(diǎn)所確定的橢圓決定。弧的起點(diǎn)是橢圓圓周和橢圓中心與(x3,y3)連線的交點(diǎn)?;【匦谓K點(diǎn)是橢圓圓周和橢圓中心與(x4,y4)連線的交點(diǎn)以逆時(shí)針?lè)较虍嫽?/span>
|
|
Chord
|
Chord(x1,y1,x2,yx,x3,y3,x4,y4 :
Integer);
Chord方法連接橢圓上兩點(diǎn),橢圓由(x1,y1)、(x2,y3) 兩點(diǎn)所確定的矩形決定,(x3,y3)是始點(diǎn),(x4,y4)是終點(diǎn)
|
|
Brushcopy
|
Brushcopy(const Dest : TRect;Bitmap :
TBitmap;
const Source TRect;Color :
TColor);
|
|
Brushcopy方法把位圖的一部分復(fù)制到畫布的某個(gè)矩形區(qū)域,并用畫筆的當(dāng)前顏色替換位圖的顏色。參數(shù)Dest定義畫布的一個(gè)矩形區(qū)域,該矩形用以填充位圖,Bitmap定義位圖;Source定義位圖中的矩形區(qū)域,該區(qū)域上的位圖將被復(fù)制;Color定義畫筆中用以替換位圖的顏色
|
|
CopyRect
|
CopyRect(Dest:TRect;Canvas:TCanvas;
Source TRect);
此方法從另一個(gè)畫布對(duì)象上復(fù)制部分圖像到該畫布。Canvas表示源畫布,Source是源畫布上要復(fù)制的圖像區(qū)域。Dest表示目標(biāo)畫布上將接受復(fù)制圖像的矩形區(qū)域
|
(續(xù)表)
|
方法
|
說(shuō)明
|
|
Draw
|
Draw(x,y : Integer;Graphic
: TGraphic);
此方法在畫布給定的像素點(diǎn)坐標(biāo)(x,y)處畫Graphic所給的圖像,該圖像可以是位圖、圖標(biāo)或元位圖
|
|
Ellips
|
Ellips(x1,y1,x2,y2 :
Integer);
Ellips方法在畫布指定的矩形邊界上畫一個(gè)橢圓,(x1,y1)是矩形左上角的像素坐標(biāo),(x2,y2)是矩形右下角的像素坐標(biāo)。如果矩形形成一個(gè)區(qū)域,則將出現(xiàn)一個(gè)橢圓
|
|
LineTo
|
LineTo(x,y :
Integer);
|
|
LineTo從當(dāng)前位置畫一條線至(x,y)所指定的位置,并把筆的位置移至(x
,y)
|
|
MoveTo
|
MoveTo(x,y : Integer);
MoveTo將筆的當(dāng)前位置設(shè)置到點(diǎn)(x,y)處,筆的當(dāng)前位置在PenPos屬性中,改變筆的當(dāng)前位置使用MoveTo方法,不要設(shè)法改變PenPos的值
|
|
Die
|
Die(x1,y1,x2,y2,x3,y3,x4,y4 :
Longint);
Die方法繪制橢圓的一部分,橢圓由點(diǎn)(x1,y1),(x2,y2)所確定的矩形所決定,繪制的那部分由橢圓中心到(x3,y3)、(x4,y4)兩點(diǎn)的兩條輻射線所決定
|
|
Polygon
|
Polygon(Points : array of
TPrint);
Polygon方法在畫布上繪制一系列的點(diǎn),各點(diǎn)依次連成線,最后將首尾兩點(diǎn)相接形成一個(gè)區(qū)域,并用當(dāng)前筆刷填充此區(qū)域
|
|
Polyline
|
Polyline(Ports : array of
TPort);
Polyline方法在畫布上用當(dāng)前畫筆繪制一系列的點(diǎn),各點(diǎn)依次連成線
|
|
StretchDraw
|
StretchDraw(Const Rect : TRcct :
Graphic : TGraphic);
此方法在Rect參數(shù)指定的矩形內(nèi)畫一圖像。圖像延伸,改變大小以適應(yīng)矩形
|
|
Rectangle
|
Rectangle(X1,y1,x2,y2 :
Integer);
Rectangle方法在畫布上用當(dāng)前畫刷繪制矩形,(x1,y1)是矩形的左上角,(x2,y2)是矩形的右下角
|
|
DrawFocusRect
|
DrawFocusRect(Const Rect :
TRect);
此方法繪制一矩形以指示此矩形獲得焦點(diǎn)。此方法是XOR(異或)函數(shù),第二次調(diào)用時(shí)原有矩形將消失。DrawFocusRect繪制的矩形不能滾動(dòng)。要實(shí)現(xiàn)滾動(dòng)功能則先調(diào)用此方法使矩形消失,待滾動(dòng)過(guò)后重新繪制
|
4.4.2 TPen——畫筆對(duì)象
應(yīng)用程序常用TPen對(duì)象在畫布上繪制各種線段,筆的顏色在Color屬性中定義。線段寬度在Width屬性中定義。
1. Style屬性
Style屬性定義了線段的各種類型,見(jiàn)表4.3。
表4.3 Style屬性的取值及含義
|
Style屬性
|
含義
|
|
PsSolid
|
畫固定線段
|
|
PsDash
|
畫由虛線組成的線段
|
|
PsDot
|
畫由點(diǎn)組成的線段
|
|
PsDashDot
|
畫點(diǎn)劃線
|
|
PsDashDotDot
|
畫雙點(diǎn)劃線
|
|
PsClear
|
畫看不見(jiàn)的線段
|
|
PsInsideFrame
|
畫邊界的矩形線框
|
|
|