Введение в Delphi. Рудалев В.Г - 35 стр.

UptoLike

Составители: 

35
procedure Chord (X1, Y1, X2, Y2, X3, Y3, X4, Y4: integer);
Jbkm_lohj^mb
aZeb\Z_l hlk_dZ_fmx _x qZklv weebikZ Weebik b dhhj^bgZlu ohj^u hij_^_
eyxlkydZd\f_lh^_$UF
procedure Ellipse (X1, Y1, X2, Y2: integer); Jbkm_lbaZdjZrb\Z_ll_dm
s_cdbklvxweebik\ibkZgguc\ijyfhm]hevgbd;<- (X2,Y2).
procedure LineTo (X, Y: Integer); Ijh\h^blebgbxl_dmsbfi_jhfbal_
dms_clhqdb\lhqdm;<
procedure MoveTo (X, Y: Integer); I_j_f_sZ_ll_dms__iheh`_gb_i_jZ\
lhqdm;<
procedure CopyRect (const Rect: TRect; Canvas: TCanvas; const Source:
TRect); Ijhba\h^bldhibjh\Zgb_ijyfhm]hevgbdZSourcebadZg\u&DQYDV\ijy
fhm]hevgbdDest \l_dmsmxdZg\m
procedure Draw (X, Y: Integer; Graphic: TGraphic); <uau\Z_lf_lh^jbkh
\Zgbyh[t_dlZ Graphic\h[eZklbk\_jogbfm]ehf (X,Y).
procedure StretchDraw (const Rect: TRect; Graphic: TGraphic); <uau\Z_l
f_lh^ jbkh\Zgbyh[t_dlZ Graphic \ ijyfhm]hevgbd_ Rect ?keb jZaf_ju bo g_
kh\iZ^Zxl GraphicfZkrlZ[bjm_lky
procedure DrawFocusRect (const Rect: TRect); Jbkm_lijyfhm]hevgmxjZf
dm ba lhq_d Ih\lhjgh_ jbkh\Zgb_ ijb\h^bl bah[jZ`_gb_ d i_j\hgZqZevghfm
\b^m
procedure FillRect (const Rect: Trect); Ijhba\h^blaZdjZkdmijyfhm]hevgbdZ
l_dms_cdbklvx
procedure FloodFill (X,Y: integer; Color: TColor; FillStyle: TFillStyle);
TFillStyle =(fsSurface, fsBorder); Ijhba\h^blaZeb\dmh[eZklbl_dms_cdbklvx
Ijhp_kkgZqbgZ_lkyklhqdb;<?kebj_`bf)LOO6W\OHjZ\_g)V6XUIDFHlhhg
ijh^he`Z_lky^hl_oihjihdZ_klvkhk_^gb_lhqdbkp\_lhf&RORU<j_`bf_
IV%RUGHU aZdjZrb\Zgb_ gZh[hjhlij_djZsZ_lky ijb \uoh^_ gZ ]jZgbpm k p\_
lhf&RORU
procedure FrameRect (const Rect: TRect); Ijhba\h^bl©hdhglmjb\Zgb_ª
p\_lhfl_dms_cdbklb
procedure Pie (X1, Y1, X2, Y2, X3, Y3, X4, Y4: integer); Jbkm_lk_dlhjwe
ebikZhij_^_ey_fh]hhibku\Zxsbfijyfhm]hevgbdhf;<- ;<Klh
jhguk_dlhjZe_`ZlgZemqZoijh\_^_gguoba_]hp_gljZq_j_alhqdb;<
b;<
procedure Polygon (const Points: array of TPoint); Kljhblfgh]hm]hevgbdih
dhhj^bgZlZf3RLQWV<gmlj_ggyyh[eZklvaZdjZrb\Z_lky
procedure Polyline (const Points: array of TPoint); Kljhbl ehfZgmx ebgbx
ihdhhj^bgZlZf3RLnts.
procedure PolyBezier (const Points: array of TPoint); Kljhbldjb\mx;_av_
dm[bq_kdbckieZcgihdhhj^bgZlZf3RLQWV
procedure PolyBezierTo (const Points: array of TPoint); Kljhbldjb\mx;_
av_dm[bq_kdbckieZcgihdhhj^bgZlZf3RLQWVL_dmsZylhqdZbkihevam_lky\
dZq_kl\_i_j\hc
                                        35

       procedure Chord (X1, Y1, X2, Y2, X3, Y3, X4, Y4: integer); Jbkm_lohj^mb
aZeb\Z_l hlk_dZ_fmx _x qZklv weebikZ Weebik b dhhj^bgZlu ohj^u hij_^_
eyxlkydZd\f_lh^_$UF
       procedure Ellipse (X1, Y1, X2, Y2: integer); Jbkm_lbaZdjZrb\Z_ll_dm
s_cdbklvxweebik\ibkZgguc\ijyfhm]hevgbd ;< - (X2,Y2).
       procedure LineTo (X, Y: Integer); Ijh\h^bl ebgbx l_dmsbfi_jhfbal_
dms_clhqdb\lhqdm ;< 
       procedure MoveTo (X, Y: Integer); I_j_f_sZ_ll_dms__iheh`_gb_i_jZ\
lhqdm ;< 
       procedure CopyRect (const Rect: TRect; Canvas: TCanvas; const Source:
TRect); Ijhba\h^bldhibjh\Zgb_ijyfhm]hevgbdZSourcebadZg\u&DQYDV\ijy
fhm]hevgbdDest \l_dmsmxdZg\m
       procedure Draw (X, Y: Integer; Graphic: TGraphic);