Re: set term win title

[Tatsuro M. <tma...@ya...>]

Hello

Is it buildable on mingw?
If so I can try for it
Anyway I will access cvs from now.

Regards

Tatsuro


--- Ethan A Merritt <merritt@u.washington.edu> wrote:

> On Wednesday 14 May 2008 18:56, Shigeharu TAKENO wrote:
> > shige 05/15 2008
> > ----------------
> > 
> > I send a patch to modify the graph window's title of the 
> > wgnuplot, which is a request on the Japanese BBS "gnuplot QandA".
> 
> I have attached Shige's patch to an earlier request for this
> same feature.
> 
> It is now on the tracker as:
> https://sourceforge.net/tracker/?func=detail&atid=302055&aid=1769857&group_id=2055
> 
> Could someone with a Windows build system please test that
> it still works after my edit to make apply against current CVS?
> 
> 	Ethan
> 
>  
> > But, I am sorry that the following patch is for gnuplot-4.0.0 
> > since I cannot build the wgnuplot for gnuplot-4.3.0 and 
> > gnuplot-4.2.X by VC++ Toolkit 2003 in my computer.
> > 
> > ----- From Here -----
> > diff -uN term/win.trm.ORG term/win.trm
> > --- term/win.trm.ORG	Thu May 15 10:24:52 2008
> > +++ term/win.trm	Thu May 15 10:36:29 2008
> > @@ -118,7 +118,10 @@
> >  
> >  /* Interface routines - create list of actions for Windows */
> >  
> > -enum WIN_id { WIN_DEFAULT, WIN_MONOCHROME, WIN_COLOR, WIN_OTHER };
> > +enum WIN_id { WIN_DEFAULT, WIN_MONOCHROME, WIN_COLOR, 
> > +	/* shige */
> > +	WIN_GTITLE,
> > +	WIN_OTHER };
> >  
> >  static struct gen_table WIN_opts[] =
> >  {
> > @@ -126,15 +129,25 @@
> >      { "m$onochrome", WIN_MONOCHROME },
> >      { "c$olor", WIN_COLOR },
> >      { "c$olour", WIN_COLOR },
> > +    /* shige */
> > +    { "ti$tle", WIN_GTITLE },
> >      { NULL, WIN_OTHER }
> >  };
> >  
> > +/* shige */
> > +static char WIN_gtitle[MAXTITLELEN] = WINGRAPHTITLE;
> > +
> >  static int WIN_last_linetype = -3;		/* HBB 20000813: linetype caching */
> >  
> >  TERM_PUBLIC void
> >  WIN_options()
> >  {
> >      struct value a;
> > +    /* shige */
> > +    TBOOLEAN set_title=FALSE;
> > +
> > +    /* shige */
> > +    graphwin.Title = WIN_gtitle;
> >  
> >      while (!END_OF_COMMAND) {
> >  	switch(lookup_table(&WIN_opts[0],c_token)) {
> > @@ -142,6 +155,9 @@
> >  	    graphwin.color = TRUE;
> >  	    strcpy(graphwin.fontname, WINFONT);
> >  	    graphwin.fontsize = WINFONTSIZE;
> > +	    /* shige */
> > +	    graphwin.Title = WINGRAPHTITLE;
> > +	    set_title = TRUE;
> >  	    c_token++;
> >  	    break;
> >  	case WIN_MONOCHROME:
> > @@ -152,6 +168,19 @@
> >  	    graphwin.color = TRUE;
> >  	    c_token++;
> >  	    break;
> > +	 /* shige */
> > +	case WIN_GTITLE:
> > +	    c_token++;
> > +	    if (END_OF_COMMAND)
> > +	        int_error(c_token, "expecting title text");
> > +	    if (isstring(c_token))
> > +	       quote_str( WIN_gtitle, c_token, MAXTITLELEN );
> > +	    else
> > + 		copy_str( WIN_gtitle, c_token, MAXTITLELEN );
> > +	    c_token++;
> > +	    set_title = TRUE;
> > +	    graphwin.Title = WIN_gtitle;
> > +	    break;
> >  	case WIN_OTHER:
> >  	default:
> >  	    if (isstring(c_token)) {
> > @@ -174,6 +203,8 @@
> >  
> >      if (IsWindow(graphwin.hWndGraph) && IsIconic(graphwin.hWndGraph))
> >  	ShowWindow(graphwin.hWndGraph, SW_SHOWNORMAL);
> > +    /* shige */
> > +    if (set_title) GraphChangeTitle(&graphwin);
> >  
> >      GraphRedraw(&graphwin);
> >  }
> > diff -uN src/win/wgnuplib.h.ORG src/win/wgnuplib.h
> > --- src/win/wgnuplib.h.ORG	Thu May 15 10:23:46 2008
> > +++ src/win/wgnuplib.h	Thu May 15 10:31:16 2008
> > @@ -344,6 +344,10 @@
> >  #define WIN30FONT "Courier"
> >  #define WINFONT "Arial"
> >  
> > +/* shige */
> > +#define MAXTITLELEN 120
> > +#define WINGRAPHTITLE "gnuplot graph"
> > +
> >  #if 0
> >  enum JUSTIFY {
> >  	LEFT, CENTRE, RIGHT
> > @@ -354,6 +358,8 @@
> >  void WDPROC GraphClose(LPGW lpgw);
> >  void WDPROC GraphStart(LPGW lpgw, double pointsize);
> >  void WDPROC GraphEnd(LPGW lpgw);
> > +/* shige */
> > +void WDPROC GraphChangeTitle(LPGW lpgw);
> >  void WDPROC GraphResume(LPGW lpgw);
> >  void WDPROC GraphOp(LPGW lpgw, WORD op, WORD x, WORD y, LPCSTR str);
> >  void WDPROC GraphPrint(LPGW lpgw);
> > diff -uN src/win/wgraph.c.ORG src/win/wgraph.c
> > --- src/win/wgraph.c.ORG	Thu May 15 10:23:46 2008
> > +++ src/win/wgraph.c	Thu May 15 10:32:01 2008
> > @@ -443,6 +443,13 @@
> >  #endif
> >  }
> >  
> > +/* shige */
> > +void WDPROC
> > +GraphChangeTitle(LPGW lpgw)
> > +{
> > +	SetWindowText(lpgw->hWndGraph,lpgw->Title);
> > +}
> > +
> >  void WDPROC
> >  GraphResume(LPGW lpgw)
> >  {
> > diff -uN src/win/winmain.c.ORG src/win/winmain.c
> > --- src/win/winmain.c.ORG	Thu May 15 10:23:46 2008
> > +++ src/win/winmain.c	Thu May 15 10:33:12 2008
> > @@ -241,7 +241,12 @@
> >  
> >  	graphwin.hInstance = hInstance;
> >  	graphwin.hPrevInstance = hPrevInstance;
> > +	/* shige */
> > +#if 0
> >  	graphwin.Title = "gnuplot graph";
> > +#else
> > +	graphwin.Title = WINGRAPHTITLE;
> > +#endif
> >  	graphwin.lptw = &textwin;
> >  	graphwin.IniFile = textwin.IniFile;
> >  	graphwin.IniSection = textwin.IniSection;
> > ----- To Here -----
> > 
> > +========================================================+
> >  Shigeharu TAKENO     NIigata Institute of Technology
> >                        kashiwazaki,Niigata 945-1195 JAPAN
> >  sh...@ie...   TEL(&FAX): +81-257-22-8161
> > +========================================================+
> > 
> > -------------------------------------------------------------------------
> > This SF.net email is sponsored by: Microsoft 
> > Defy all challenges. Microsoft(R) Visual Studio 2008. 
> > http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
> > _______________________________________________
> > gnuplot-beta mailing list
> > gnu...@li...
> > https://lists.sourceforge.net/lists/listinfo/gnuplot-beta
> > 
> 
> -- 
> Ethan A Merritt
> Biomolecular Structure Center
> University of Washington, Seattle 98195-7742
> 
> -------------------------------------------------------------------------
> This SF.net email is sponsored by: Microsoft 
> Defy all challenges. Microsoft(R) Visual Studio 2008. 
> http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
> _______________________________________________
> gnuplot-beta mailing list
> gnu...@li...
> https://lists.sourceforge.net/lists/listinfo/gnuplot-beta
> 


--------------------------------------
GANBARE! NIPPON! Win your ticket to Olympic Games 2008.
http://pr.mail.yahoo.co.jp/ganbare-nippon/