- 4
- 0
- 约9.38千字
- 约 9页
- 2017-09-22 发布于江苏
- 举报
直线段剪裁的主要源代码解析
直线段剪裁的主要源代码解析
福州大学02级计算机系应用班:何蓥(1002111)
说明:以下是隶属于LineCut工程中的两个重要源代码。窗口设计没有在这里列出来,压缩包内附有封装好的可执行文件LineCut.exe,可以作为该程序的效果参考)
“LineCut.h”//类的申明
//----------------------------------------------------------------------------
#include Forms.hpp
#include ExtCtrls.hpp
#include Controls.hpp
#include Classes.hpp
#include Menus.hpp
#include Dialogs.hpp
#include ComCtrls.hpp
#include Buttons.hpp
#include StdCtrls.hpp
//---------------------------------------------------------------------------
enum TDrawingTool {dtLine, dtRectangle, };//定义两种画图方式
class TForm1 : public TForm
{
__published:
TPanel *Panel1;
TScrollBox *ScrollBox1;
TImage *Image;
TMainMenu *MainMenu1;
TMenuItem *File1;
TMenuItem *Open1;
TMenuItem *Save1;
TMenuItem *Saveas1;
TMenuItem *N1;
TMenuItem *Exit1;
TOpenDialog *OpenDialog1;
TSaveDialog *SaveDialog1;
TStatusBar *StatusBar1;
TSpeedButton *LineButton;
TSpeedButton *RectangleButton;
TButton *Button1;
TMenuItem *N2;
TMenuItem *N3;
TMenuItem *N4;
void __fastcall RectangleButtonClick(TObject *Sender);
void __fastcall FormMouseDown(TObject *Sender, TMouseButton Button,
TShiftState Shift, int X, int Y);
void __fastcall FormMouseMove(TObject *Sender, TShiftState Shift,
int X, int Y);
void __fastcall FormMouseUp(TObject *Sender, TMouseButton Button,
TShiftState Shift, int X, int Y);
void __fastcall Open1Click(TObject *Sender);
void __fastcall Save1Click(TObject *Sender);
void __fastcall SaveAs1Click(TObject *Sender);
void __fastcall Exit1Click(TObject *Sender);
void __fastcall LineButtonClick(TObject *Sender);
void __fastcall Button1Click(TObject *Sender);
void __fastcall N3Click(TObject *Sender);
void __fastcall N4Click(TObject *Sender);//以上都是各个按钮和菜单设计的说明
private: // private user declarations
public: // public user declarations
bool Drawing;//判断是否作图状态
TPoin
您可能关注的文档
- 盐都区教育局创建义务教育优质均衡发展区.doc
- 监理、工程造价咨询项目四标段.PDF
- 监督及监管.PDF
- 盘点这些既养生有增值的宝石!你买对了没.PDF
- 目前市面上大部分主流车型采用的车门板厘结构主要有全.PDF
- 直接接触食品的材料等食品相关产品生产许可证核发(发证、.doc
- 相关业务受理公告.PDF
- 相关业务细则的通知.PDF
- (43页PPT)贵州文旅5A级景区荔波小七孔抖音运营方案.pptx
- (43页PPT)黄小蕾Unit2PartB课件黄小蕾.pptx
- 伟明环保-市场前景及投资研究报告-境内业务稳健运行,印尼市场贡献边际增量.pdf
- 桂东县法院系统招聘考试真题2025.pdf
- 贵州省黔南布依族2026年中考三模物理试题及答案.pdf
- 贵州省黔南州2026年中考语文二模试卷附答案.pdf
- 贵州省铜仁市2026年中考语文二模试卷附答案.pdf
- 2026上半年安徽事业单位联考合肥市庐江县招聘36人备考题库及一套完整答案详解.docx
- 贵州省毕节市2026年中考语文一模试卷附答案.pdf
- 贵州省贵阳市南明区2026年中考语文一模试卷附答案.pdf
- 2026上半年安徽事业单位联考合肥市庐江县招聘36人备考题库及一套参考答案详解.docx
- 贵州省贵阳市白云区2026年中考二模物理试题附答案.pdf
原创力文档

文档评论(0)