控制台怎么写托盘程序

2022-09-20 生活百科控制台

1.求助：怎么样才能用vc的win32应用程序或者是控制台程序实现托盘图打开一个新工程，将工程文件取名为test、单元文件取名为main 。
在窗口上放置二个按钮、一个标签，其属性按如下设置组件属性值 Label1 Caption 按OK按钮。终止程序 OKButton Caption &OKButton CancelButton Caption &CancelButton 打开文件main.h，加入斜体部分声明（以手工输入部分均以斜体表示，以下同） class TForm1 : public TForm { __published: // IDE-managed Components TButton *OKButton; TButton *CancelButton; TLabel *Label1; void __fastcall FormCreate(TObject *Sender); void __fastcall FormDestroy(TObject *Sender); void __fastcall OKButtonClick(TObject *Sender); void __fastcall CancelButtonClick(TObject *Sender); private: // User declarations unsigned ugIconMessage; void AddTray(); void DeleteTray(); protected:virtual void __fastcall WndProc(Messages::TMessage &Message); public: // User declarations __fastcall TForm1(TComponent* Owner)； }；切换到main.cpp，加入以下函数及声明 #include#pragma hdrstop#include#include "main.h"//---------------------------------------------------------------------------#pragma package(smart_init)#pragma resource "*.dfm" TForm1 *Form1;//--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner): TForm(Owner) { }//--------------------------------------------------------------------------- void TForm1::AddTray（)//创建任务栏布告区图标 { NOTIFYICONDATA icondata；① memset(&icondata,0,sizeof(icondata)）；② icondata.cbSize=sizeof(icondata); icondata.hWnd=Handle；③ strncpy(icondata.szTip，"我的任务"，sizeof(icondata.szTip)）；④ Application->Icon->LoadFromFile("e:\\yxg\\map\\system\\ico\\yxg.ico"); icondata.hIcon=Application->Icon->Handle； ⑤ icondata.uCallbackMessage=ugIconMessage；⑥ icondata.uFlags=NIF_MESSAGE|NIF_ICON|NIF_TIP；⑦ Shell_NotifyIcon(NIM_ADD,&icondata)；⑧ } void TForm1::DeleteTray（)//删除任务栏布告区图标 { NOTIFYICONDATA icondata; memset(&icondata,0,sizeof(icondata)); icondata.cbSize=sizeof(icondata); icondata.hWnd=Handle; Shell_NotifyIcon(NIM_DELETE,&icondata)； ⑧ } void __fastcall TForm1::WndProc(Messages::TMessage &Message) { if(Message.Msg==ugIconMessage)//如果产生的是与该图标相关的消息 { if(Message.LParam==WM_LBUTTONDBLCLK) Application->Terminate（)；⑨ if(Message.LParam==WM_RBUTTONDBLCLK) { ShowWindow(Application->Handle,SW_SHOW);// Application->ShowMainForm=true; Form1->Visible=true； ⑩ } return; } TForm::WndProc(Message)； } ①申请一个任务栏布告区图标的结构变量；②将结构变量的内容清零；③取得当前窗口的句柄；④输入鼠标经过该图标时的提示字符串；⑤将自已所喜爱的图标文件作为任务栏布告区的图标；⑥取得回调信息变量；⑦当结构变量中成员hIcon、uCallbackMessage与szTip 出错时将给出错误标志；⑧调用函数Shell_NotifyIcon（)在任务栏布告区产生或删除一个图标；⑨当鼠标左键在该图标处双击时，终止程序运行；⑩当鼠标右键在该图标处双击时，显示与该图标相关的应用程序。
我们知道，所有的TWinControl派生来的VCL类都有一个WndProc函数，调用这个函数可以发送消息并被相关的窗口接收，WndProc被定义成一个虚函数，这样一个派生类就可以定义它自已的WndProc函数来代替其父类的WndProc函数。在这里，与任务栏布告区图标相关的消息由子类的WndProc函数处理，否则调用父类的WndProc处理。
在Form1的OnCreate事件中加入以下代码： void __fastcall TForm1::FormCreate(TObject *Sender) { ugIconMessage=RegisterWindowMessage("IconNotify")；① AddTray（)；② Form1->Visible=false；③ } ①调用RegisterWindowMessage（)函数来创建一个独一无二的消息编号，以确保没有冲突；②在任务栏布告区创建图标；③显示窗体；在Form1的OnDestroy事件中加入DeleteTray（)函数以删除图标。将OKButton与CancelButton按钮的OnClick事件增加代码以隐藏主窗口及终止程序运行。

上一篇：服务商简介怎么写

下一篇：公司出具工伤报告怎么写