apps-projectcenter/PCAppProj/main.m
Robert Slover 4d601bf8c6 applied the patch of nicola
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/apps/projectcenter/trunk@8541 72102866-910b-0410-8b05-ffd578937521
2001-01-10 13:10:08 +00:00

103 lines
2.6 KiB
Objective-C

/* $Id$ */
#import <AppKit/AppKit.h>
#import "AppController.h"
#define APP_NAME @"GNUstep"
/*
* Create the application's menu
*/
void createMenu();
/*
* Initialise and go!
*/
int main(int argc, const char *argv[])
{
NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init];
AppController *controller;
[NSApplication sharedApplication];
createMenu();
controller = [[AppController alloc] init];
[NSApp setDelegate:controller];
RELEASE(pool);
return NSApplicationMain (argc, argv);
}
void createMenu()
{
NSMenu *menu;
NSMenu *info;
NSMenu *edit;
NSMenu *services;
NSMenu *windows;
SEL action = @selector(method:);
menu = [[NSMenu alloc] initWithTitle:APP_NAME];
[menu addItemWithTitle:@"Info" action:@selector(showInfoPanel:)
keyEquivalent:@""];
[menu addItemWithTitle:@"Edit" action:action keyEquivalent:@""];
[menu addItemWithTitle:@"Windows" action:action keyEquivalent:@""];
[menu addItemWithTitle:@"Services" action:action keyEquivalent:@""];
[menu addItemWithTitle:@"Hide" action:@selector(hide:) keyEquivalent:@"h"];
[menu addItemWithTitle:@"Quit" action:@selector(terminate:) keyEquivalent:@"q"];
info = AUTORELEASE([[NSMenu alloc] init]);
[menu setSubmenu:info forItem:[menu itemWithTitle:@"Info"]];
[info addItemWithTitle:@"Info Panel..."
action:@selector(showInfoPanel:) keyEquivalent:@""];
[info addItemWithTitle:@"Preferences"
action:@selector(showPrefPanel:) keyEquivalent:@""];
[info addItemWithTitle:@"Help" action:action keyEquivalent:@"?"];
edit = AUTORELEASE([[NSMenu alloc] init]);
[edit addItemWithTitle:@"Cut"
action:@selector(cut:)
keyEquivalent:@"x"];
[edit addItemWithTitle:@"Copy"
action:@selector(copy:)
keyEquivalent:@"c"];
[edit addItemWithTitle:@"Paste"
action:@selector(paste:)
keyEquivalent:@"v"];
[edit addItemWithTitle:@"Delete"
action:@selector(delete:)
keyEquivalent:@""];
[edit addItemWithTitle:@"Select All"
action:@selector(selectAll:)
keyEquivalent:@"a"];
[menu setSubmenu:edit forItem:[menu itemWithTitle:@"Edit"]];
windows = AUTORELEASE([[NSMenu alloc] init]);
[windows addItemWithTitle:@"Arrange"
action:@selector(arrangeInFront:)
keyEquivalent:@""];
[windows addItemWithTitle:@"Miniaturize"
action:@selector(performMiniaturize:)
keyEquivalent:@"m"];
[windows addItemWithTitle:@"Close"
action:@selector(performClose:)
keyEquivalent:@"w"];
[menu setSubmenu:windows forItem:[menu itemWithTitle:@"Windows"]];
services = AUTORELEASE([[NSMenu alloc] init]);
[menu setSubmenu:services forItem:[menu itemWithTitle:@"Services"]];
[NSApp setMainMenu:menu];
[NSApp setServicesMenu: services];
}