Tcl 7.6/Tk 4.2 ѱ ġ

1. 
-------

  Tcl/Tk ѱȭ ġ Ͽ ϰֽϴ.
α׷ ǥ Tcl 7.6 Tk 4.2 ѱ / ϵ 
߰ Դϴ.  α׷ ȣȯ   ֵ ϴ 
̳ α׷    ʾҽϴ.
 ڼ  Ʒ Ͻʽÿ.

2. 
-------

Tcl/Tk Ͽ     Ͻô  ()ũ
Ȩ 湮 ñ ٶϴ.    ֽϴ.
()ũ ּҴ Ʒ ϴ.

		http://www.wins21.com


"doc"  丮 Tcl/Tk  ޴ ԵǾ ,
 Ȯ ߿ ".1" α׷( tclsh.1)  
ԵǾְ ".3" Ȯڸ   C ̺귯 Լ 
 ԵǾ ֽϴ. ׸ ".n"̶ Ȯڸ  ϵ 
Tcl ɾ    ֽϴ.
  "man" ɾ ϽŴٸ Tcl    
    Դϴ.  :

		man Tcl

		
󿡼 Tcl/Tk Ȩ ּҴ Ʒ ϴ.

		http://www.sunlabs.com/research/tcl


3. ġ   
------------------------

ѱȭ   Ϲ UNIX PC(Windows NT, Windows 95 Ǵ 
Win32s ϴ Win 3.1) ȯ濡 Tcl ࿡   ġ 
 ڽ ƾ ߰ϰ  ̺귯   ũŰ ȴ.

    (a)	 ġ
	α׷ ġ ǥ Tcl/Tk ġ մϴ.

	* UNIX 
	Ϻ UNIX ýۿ ϼ ѱ Ʈ ġǾ Ƿ
	Tk  ѱ      ֽϴ.
	̷ 쿡 ϼ ѱ Ʈ ġּž մϴ.

    (b) 
	ο α׷ Makefile ̺귯  ϽŰ ϸ
	˴ϴ.

	* UNIX 
	ݵ Tcl_AppInitƾ ƷͰ ۼ ֽñ ٶϴ.
	Han_Init() Լ ȣ ּž ѱ Է Ͻ  ֽϴ.

	/*
	 *----------------------------------------------------------------------
	 *
	 * Tcl_AppInit --
	 *
	 *	This procedure performs application-specific initialization.
			      :
			      :
	 *
	 *----------------------------------------------------------------------
	 */
	
	int
	Tcl_AppInit(interp)
	    Tcl_Interp *interp;		/* Interpreter for application. */
	{
	    if (Tcl_Init(interp) == TCL_ERROR) {
		return TCL_ERROR;
	    }
	    if (Tk_Init(interp) == TCL_ERROR) {
		return TCL_ERROR;
	    }
	    Tcl_StaticPackage(interp, "Tk", Tk_Init, (Tcl_PackageInitProc *) NULL);
	#ifdef TK_TEST
	    if (Tktest_Init(interp) == TCL_ERROR) {
		return TCL_ERROR;
	    }
	    Tcl_StaticPackage(interp, "Tktest", Tktest_Init,
		    (Tcl_PackageInitProc *) NULL);
	#endif /* TK_TEST */
	
	
	    /*
	     * Call the init procedures for included packages.	Each call should
	     * look like this:
	     *
	     * if (Mod_Init(interp) == TCL_ERROR) {
	     *	   return TCL_ERROR;
	     * }
	     *
	     * where "Mod" is the name of the module.
	     */
      +	    if (Han_Init(interp) == TCL_ERROR) {
      +		return TCL_ERROR;
      +	    }
	
	    /*
	     * Call Tcl_CreateCommand for application-specific commands, if
	     * they weren't already created by the init procedures called above.
	     */
	
	    /*
	     * Specify a user-specific startup file to invoke if the application
	     * is run interactively.  Typically the startup file is "~/.apprc"
	     * where "app" is the name of the application.  If this line is deleted
	     * then no user-specific startup file will be run under any conditions.
	     */
	
	    Tcl_SetVar(interp, "tcl_rcFileName", "~/.wishrc", TCL_GLOBAL_ONLY);
	    return TCL_OK;
	}

    (c) 
	 "register.txt" Ͻñ ٶϴ.


4. ѱȭ ߰ ɾ
---------------------------

- Tcl 7.6

    dbcs		: DBCS        ִ.
    klsearch		: Ʈ  DBCS ڵ带 ãƳ.
    klsort		: Ʈ DBCS ڵ带 ش.
    ksplit		: Ʈ DBCS ڵ带 и ش.
    kstring		: ڿ  Լ Ѵ.

    *  Tcl ɾ lsearch, lsort, split, string ɾ 
      ϸ DBCS ڵ¿ Ϻ ڰ   ߻Ѵ.
       Tcl ҽ  ɾ ü ָ DBCS ڵ带 
      ڵ鸵ֱ    .

- Tk 4.2

    dbcsInput		: DBCS Է¼ ϴ ý Ǵ
			  ɾν Է¼ ¸   ִ.

5. ѱ ġ  
--------------------------

Tk  丮("tk4.2\library\demos") ø "widget"̶ Demo
α׷ ֽϴ.  α׷ ("source widget")غø
ѱ  κп     ֽϴ.

6.   
-------------------

 ѱȭ  ̷ ,  ߿ Ͻ
κ̳ Ǿ , Ÿ Ͻ   е Ʒ
ó  ֽʽÿ.

	EMail	: nazarino@wins21.com
	ȭ	: (02) 567-9696
	FAX	: (02) 568-9703


----------------------------------------------------------------------------

			()ũ
		
