paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-21 12:13:12 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Add hotkeys to test menu

Browse Source 
git-svn-id: trunk@3398 -
This commit is contained in:
daniel 2006-05-01 11:57:46 +00:00
parent cd1ff589df
commit 39bdf06629
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
fv/test/testapp.pas
View File

@ -202,11 +202,11 @@ BEGIN
NewItem('~V~iew Clipboard', '', kbNoKey, cmClipboard, hcNoContext,
nil)))), { Standard edit menu plus view clipboard}
NewSubMenu('~T~est', 0, NewMenu(
NewItem('Ascii Chart','',kbNoKey,cmAscii,hcNoContext,
NewItem('Window 1','',kbNoKey,cmWindow1,hcNoContext,
NewItem('Window 2','',kbNoKey,cmWindow2,hcNoContext,
NewItem('Window 3','',kbNoKey,cmWindow3,hcNoContext,
NewItem('Timed Box','',kbNoKey,cmTimedBox,hcNoContext,
NewItem('~A~scii Chart','',kbNoKey,cmAscii,hcNoContext,
NewItem('Window ~1~','',kbNoKey,cmWindow1,hcNoContext,
NewItem('Window ~2~','',kbNoKey,cmWindow2,hcNoContext,
NewItem('Window ~3~','',kbNoKey,cmWindow3,hcNoContext,
NewItem('~T~imed Box','',kbNoKey,cmTimedBox,hcNoContext,
NewItem('Close Window 1','',kbNoKey,cmCloseWindow1,hcNoContext,
NewItem('Close Window 2','',kbNoKey,cmCloseWindow2,hcNoContext,
NewItem('Close Window 3','',kbNoKey,cmCloseWindow3,hcNoContext,