首先新建一个工程文件(File->New Application)。
然后在Form1上面建立一个PopupMenu1,一个Button1,一个RichEdit1。
在头文Unit1.H的内容,其中黑体是自已加的。
#ifndef Unit1H
#define Unit1H
#include
#include
#include
#include
#include
#include
#include
class TForm1 : public TForm
{
__published: // IDE-managed Components
TButton *Button1;
TPopupMenu *PopupMenu1;
TRichEdit *RichEdit1;
void __fastcall Button1Click(TObject *Sender);
void __fastcall FormCreate(TObject *Sender);
private: // User declarations
POINT MousePos;//保存鼠标的位置
int PopCount;//保存菜单项个数
void __fastcall MyClick(TObject *Sender);//自已定义的单击事件
public: // User declarations
__fastcall TForm1(TComponent* Owner);
};
extern PACKAGE TForm1 *Form1;
#endif
在Unit1.cpp中的内容,黑体自已加。
#include
#pragma hdrstop
#include "U
然后在Form1上面建立一个PopupMenu1,一个Button1,一个RichEdit1。
在头文Unit1.H的内容,其中黑体是自已加的。
#ifndef Unit1H
#define Unit1H
#include
#include
#include
#include
#include
#include
#include
class TForm1 : public TForm
{
__published: // IDE-managed Components
TButton *Button1;
TPopupMenu *PopupMenu1;
TRichEdit *RichEdit1;
void __fastcall Button1Click(TObject *Sender);
void __fastcall FormCreate(TObject *Sender);
private: // User declarations
POINT MousePos;//保存鼠标的位置
int PopCount;//保存菜单项个数
void __fastcall MyClick(TObject *Sender);//自已定义的单击事件
public: // User declarations
__fastcall TForm1(TComponent* Owner);
};
extern PACKAGE TForm1 *Form1;
#endif
在Unit1.cpp中的内容,黑体自已加。
#include
#pragma hdrstop
#include "U