gnustep/apps-gorm
0
0
Fork 0
mirror of https://github.com/gnustep/apps-gorm.git synced 2025-04-22 14:10:44 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

replace newApplication: newPalettes: , newInspector: newEmpty by newGormDocument:

Browse source 
Add intelligent window placement (cascade)


git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/apps/gorm/trunk@16783 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
Fabien Vallon 2003-05-24 11:11:18 +00:00
parent 82b28558d8
commit 605c4bf62a
1 changed files with 28 additions and 38 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

66
Gorm.m
View file

@ -1104,6 +1104,8 @@ static NSButtonType _buttonTypeForObject( id button )
{
// set the menu...
mainMenu = (NSMenu *)gormMenu;
//for cascadePoint
cascadePoint = NSZeroPoint;
}
- (id) inspector: (id) sender
@ -1169,48 +1171,36 @@ static NSButtonType _buttonTypeForObject( id button )
return nil;
}
- (id) newApplication: (id) sender
- (void) newGormDocument : (id) sender
{
id doc = [GormDocument new];
id doc = [GormDocument new];
[documents addObject: doc];
RELEASE(doc);
[doc setupDefaults: @"Application"];
switch ([sender tag])
{
case 0:
[doc setupDefaults: @"Application"];
break;
case 1:
[doc setupDefaults: @"Empty"];
break;
case 2:
[doc setupDefaults: @"Inspector"];
break;
case 3:
[doc setupDefaults: @"Palettes"];
break;
default:
printf("unknow newGormDocument tag");
}
if (NSEqualPoints(cascadePoint, NSZeroPoint))
{
NSRect frame = [[doc window] frame];
cascadePoint = NSMakePoint(frame.origin.x, NSMaxY(frame));
}
cascadePoint = [[doc window] cascadeTopLeftFromPoint:cascadePoint];
[[doc window] makeKeyAndOrderFront: self];
return doc;
}
- (id) newEmpty: (id) sender
{
id doc = [GormDocument new];
[documents addObject: doc];
RELEASE(doc);
[doc setupDefaults: @"Empty"];
[[doc window] makeKeyAndOrderFront: self];
return doc;
}
- (id) newInspector: (id) sender
{
id doc = [GormDocument new];
[documents addObject: doc];
RELEASE(doc);
[doc setupDefaults: @"Inspector"];
[[doc window] makeKeyAndOrderFront: self];
return doc;
}
- (id) newPalette: (id) sender
{
id doc = [GormDocument new];
[documents addObject: doc];
RELEASE(doc);
[doc setupDefaults: @"Palette"];
[[doc window] makeKeyAndOrderFront: self];
return doc;
}
- (id) open: (id) sender