Author: ericwa
Date: Tue Mar 24 22:34:19 2015
New Revision: 38432

URL: http://svn.gna.org/viewcvs/gnustep?rev=38432&view=rev
Log:
GSTest: NSWindow-test: add button to open a sheet.

Modified:
    tests/examples/trunk/gui/GSTest/ChangeLog
    tests/examples/trunk/gui/GSTest/NSWindow-test/NSWindow-test.m

Modified: tests/examples/trunk/gui/GSTest/ChangeLog
URL: 
http://svn.gna.org/viewcvs/gnustep/tests/examples/trunk/gui/GSTest/ChangeLog?rev=38432&r1=38431&r2=38432&view=diff
==============================================================================
--- tests/examples/trunk/gui/GSTest/ChangeLog   (original)
+++ tests/examples/trunk/gui/GSTest/ChangeLog   Tue Mar 24 22:34:19 2015
@@ -1,3 +1,7 @@
+2015-03-24  Eric Wasylishen  <[email protected]>
+
+       * NSWindow-test/NSWindow-test.m: Add a button to open a sheet.
+
 2014-08-31  German Arias <[email protected]>
 
        * NSAnimation-test/AnimationView.m: Use NSAnimationNonblocking, this

Modified: tests/examples/trunk/gui/GSTest/NSWindow-test/NSWindow-test.m
URL: 
http://svn.gna.org/viewcvs/gnustep/tests/examples/trunk/gui/GSTest/NSWindow-test/NSWindow-test.m?rev=38432&r1=38431&r2=38432&view=diff
==============================================================================
--- tests/examples/trunk/gui/GSTest/NSWindow-test/NSWindow-test.m       
(original)
+++ tests/examples/trunk/gui/GSTest/NSWindow-test/NSWindow-test.m       Tue Mar 
24 22:34:19 2015
@@ -49,6 +49,19 @@
   [labelView release];
 }
 
+static NSButton *AddButton(NSString *label, NSRect frame, NSView *dest, id 
target, SEL action)
+{
+  NSButton *button = [NSButton new];
+  [button setFrame: frame];
+  [button setTitle: label];
+  [button setTarget: target];
+  if (action)
+    [button setAction: action];
+  [button setContinuous: YES];
+  [button setToolTip: label];
+  [dest addSubview: button];
+  return [button autorelease];
+}
 
 @implementation NSWindowTest
 
@@ -64,6 +77,9 @@
   [testWindow setReleasedWhenClosed: NO];
   [testWindow setTitle: @"Test Window"];
 
+  AddButton(@"Open Sheet", NSMakeRect(0,0,100,50), [testWindow contentView], 
self, @selector(openSheet:));
+  AddButton(@"nothing", NSMakeRect(110,0,50,50), [testWindow contentView], 
self, (SEL)0);
+
   panel = [[NSPanel alloc] initWithContentRect: NSMakeRect(0,0,200, 400)
                                           styleMask: (NSTitledWindowMask 
                                                       | NSUtilityWindowMask
@@ -80,6 +96,14 @@
 
   [self restart];
   return self;
+}
+
+- (void) openSheet: (id)sender
+{
+  NSLog(@"Opening sheet...");
+
+  NSBeginAlertSheet(@"My title", @"default button", @"alt button", @"other 
button",
+    testWindow, self, (SEL)0, (SEL)0, NULL, @"Here is a sheet...");
 }
 
 - (void) setupTextView


_______________________________________________
Gnustep-cvs mailing list
[email protected]
https://mail.gna.org/listinfo/gnustep-cvs

Reply via email to