?? u7_3_3.cpp
字號:
//---------------- u7_3_3 -----------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "u7_3_3.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
Tf7_3_3 *f7_3_3;
//---------------------------------------------------------------------------
__fastcall Tf7_3_3::Tf7_3_3(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall Tf7_3_3::FormPaint(TObject *Sender)
{
Canvas->Pen->Width=3;
Canvas->MoveTo(50,50);
Canvas->LineTo(75,75);
Canvas->LineTo(100,50);
Canvas->MoveTo(75,75);
Canvas->LineTo(75,100);
TPoint p[6];
p[0]=Point(200,50);
p[1]=Point(175,70);
p[2]=Point(175,100);
p[3]=Point(225,100);
p[4]=Point(225,70);
p[5]=Point(200,50);
Canvas->Polyline(p,5);
Canvas->Pen->Width=1;
Canvas->Brush->Style=bsDiagCross;
p[0]=Point(300,50);
p[1]=Point(275,100);
p[2]=Point(325,100);
Canvas->Polygon(p,2);
Canvas->Brush->Style=bsClear;
Canvas->Rectangle(50,150,350,250);
Canvas->Ellipse(47,147,53,153);
Canvas->Ellipse(97,247,103,253);
Canvas->Ellipse(247,147,253,153);
Canvas->Ellipse(347,247,353,253);
p[0]=Point(50,150);
p[1]=Point(100,250);
p[2]=Point(250,150);
p[3]=Point(350,250);
Canvas->PolyBezier(p,3);
}
//---------------------------------------------------------------------------
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -