第五章delphi圖形圖像編程一-資料下載頁
2024-09-05 15:40本頁面
【導(dǎo)讀】一些簡單的圖像功能。利用這些對象、部件的方法，可以方便地繪制各種常用圖。形；通過設(shè)置它們的屬性，能得到不同風(fēng)格的圖形。另外，通過對鼠標事件的定。本章將結(jié)合此程序進行講述。TCanvas的Brush,Pen,Font屬性分別是。象，下節(jié)中將詳細介紹。畫布的筆的位置定義在PenPos屬性中，可用MoveTo方法來移動筆。在畫布上輸出文本，可用Textout方法。弧的起點是橢圓圓周和橢圓中心與連線的交點。定，是始點，是終點。域，并用畫筆的當前顏色替換位圖的顏色。Canvas表示源畫布，Source. Dest表示目標畫布上將接受復(fù)制。左上角的象素坐標，x2,y2是矩形右下角的象素坐標。將出現(xiàn)一個橢圓。制的那部分由橢圓中心到,兩點的兩條輻射線所決定。形成一個區(qū)域，并用當前筆刷填充此區(qū)域。此方法繪制一矩形以指示此矩形獲得焦點。用時原有矩形將消失?？山Y(jié)合當前的顏色、屏幕顏色或它們反轉(zhuǎn)值，對線段的顏色重新定義，但不改變Color屬性。
【正文】 按鈕，然后設(shè)置 GraphIndex值。 有時用戶按一個已經(jīng)按下的按鈕，希望該按鈕能夠彈起，這樣沒有任何按鈕被按下，使用 AllowAllup 屬性可實現(xiàn)上述功能。對于一組加速按鈕來講 ，設(shè)置該組中任一按鈕的 AllowAllup 可使這組的每一個按鈕具有這種功能。 Graphex 程序中設(shè)計了三組加速按鈕和兩個單獨的加速按鈕。 第一組加速按鈕用來選擇繪圖工具，它與兩個單獨的按鈕處在同一面板中，這個面板是缺省可見的。另外兩個按鈕分別代表畫筆、畫刷。第二組與第三組加速按鈕處在兩個缺省不可見的面板中，它們分別代表不同風(fēng)格的畫筆和畫刷，只有按下第一個面板中的畫筆 (或畫刷 )按鈕，第二 (或第三 ) 個面板才會顯示，這樣用戶就可以選擇畫筆、畫刷了。 響應(yīng)鼠標事件 鼠標常被用作繪圖的工具，應(yīng) 用程序利用鼠標位置的變化來繪制各種不同的圖形。鼠標有三個動作：鼠標按鈕按下、鼠標移動、鼠標按鈕彈起。在 Delphi中， 對應(yīng)三個動作有三個不同的事件： OnMouseDown,OnMouseMove,OnMouseUp。 當 Dlephi 應(yīng)用程序探測到一個鼠標動作時，它傳遞五個參數(shù)，并調(diào)用相應(yīng)的事件響應(yīng)。 程序員可利用這些參數(shù)來定義事件程序。五個參數(shù)如下表 ： 表 鼠標事件的五個參數(shù) ━━━━━━━━━━━━━━━━━━━━━━━━━━━ 參數(shù) 含義 ──────────────── ────────── Sender 探測鼠標動作的對象 Button 涉及的鼠標按鈕：左鍵，中鍵，右鍵 Shift 鼠標動作時， Alt,Ctrl,Shift 按鈕的狀態(tài) X,Y 事件發(fā)生時鼠標的坐標 ━━━━━━━━━━━━━━━━━━━━━━━━━━━ 當鼠標按下時發(fā)生 OnMouseDown 事件。舉一個簡單例子來說明程序如何對該事件進 行響應(yīng)。假如我們想在鼠標按下的地方出現(xiàn) Here。 響應(yīng)鼠標的 OnMouseDown 事件 可在該事件中調(diào)用 TextOut 方法： procedure (Sender: TObject,Button: TMouseButton。 Shift : TShifState。 X,Y : Integer)。 begin (X, Y, 39。Here!39。)。 end。 用戶放松鼠標鍵時發(fā)生 OnMouseUp 事件。該事件發(fā)生時，鼠標到達的對象并不一定是鼠標鍵按下時鼠標所在的對象。例如，用戶可在窗體之外畫一條線段， (鼠標在窗體外，線段在窗體內(nèi) )。下面的代碼可用鼠標繪制直線： procedure (Sender:TObject) begin Moveto(x,y)。 end。 procedure Up(Sender:Tobject) begin Lio(X, Y)。 end。
公司管理相關(guān)推薦
鄂ICP備17016276號-1