本文讲解的是为自身程序的任务栏右键菜单里添加自己定义的菜单的方法: delphi添加任务栏右键菜单 procedure TForm1.FormCreate(Sender: TObject); var Mnu: HMenu; begin Mnu := GetSystemMenu(Application.Handle, False); AppendMenu(Mnu, MF_SEPARATOR, 0, nil); AppendMenu(Mnu, MF_STRING, WM_ABOUT, pchar('…