github-starred/ultimatepp
2
0
Fork 0
mirror of https://github.com/ultimatepp/ultimatepp.git synced 2026-05-15 14:16:07 -06:00
Code Issues 33 Projects Packages Wiki Activity Actions

.upptst

Browse source
This commit is contained in:
Mirek Fidler 2023-10-24 17:35:08 +02:00
parent e6d8f90f42
commit 642b265eed
2 changed files with 30 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

9
upptst/MenuBig/MenuBig.upp Normal file
View file

@ -0,0 +1,9 @@
uses
CtrlLib;
file
main.cpp;
mainconfig
"" = "GUI";

21
upptst/MenuBig/main.cpp Normal file
View file

@ -0,0 +1,21 @@
#include <CtrlLib/CtrlLib.h>
using namespace Upp;
struct MyApp : public TopWindow {
virtual void RightDown(Point p, dword keyflags);
};
void MyApp::RightDown(Point p, dword keyflags)
{
MenuBar b;
for(int i = 0; i < 60; i++)
b.Add("Action " + AsString(i), Upp::CtrlImg::save_as(), [] { PromptOK("invoked"); });
b.Execute();
}
GUI_APP_MAIN
{
MyApp app;
app.Run();
}