* added an API call to avoid the "Graph Window" window title

demo/graph/fpctris.pp

@@ -604,6 +604,9 @@ BEGIN
   SetFillStyle(SolidFill,1);
   GetDefaultPalette(Pal);
   SetAllPalette(Pal);
+  {$ifdef win32}
+    Windows.SetWindowText(GraphWindow,'FPCTris, a demonstration of Free Pascal');
+  {$endif}
 {$ENDIF}
 
  {Here should be some terminal-detection for Linux}
@@ -853,7 +856,10 @@ END.
 
 {
   $Log$
-  Revision 1.5  2002-09-07 15:06:34  peter
+  Revision 1.6  2004-02-18 16:43:04  marco
+   * added an API call to avoid the "Graph Window" window title
+
+  Revision 1.5  2002/09/07 15:06:34  peter
     * old logs removed and tabs fixed
 
   Revision 1.4  2002/06/02 09:49:17  marco