[Gridflow-cvs] [svn] commit: r4869 - /trunk/src/quartz.m

gridflow-cvs at artengine.ca gridflow-cvs at artengine.ca
Mon Dec 7 00:37:10 EST 2009


Author: pboivin
Date: Mon Dec  7 00:37:09 2009
New Revision: 4869

Log:
added function for setting window title

Modified:
    trunk/src/quartz.m

Modified: trunk/src/quartz.m
==============================================================================
--- trunk/src/quartz.m (original)
+++ trunk/src/quartz.m Mon Dec  7 00:37:09 2009
@@ -151,6 +151,7 @@
 		[window close];
 	}
 	void call ();
+	\decl 0 title (string title="");
 	\grin 0
 };
 
@@ -211,6 +212,11 @@
 	GFView_display(widget);
 } GRID_END
 
+\def 0 title (string title="") {
+    NSString *str = [[NSString alloc] initWithCString:title.c_str()];
+    [window setTitle: str];
+}
+
 \end class FormatQuartz {
 	NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init];
 	distantFuture = [NSDate distantFuture];



More information about the Gridflow-cvs mailing list