.

Breaking News
recent

-

Un lenguaje de programación para no olvidar: Tcl

Un lenguaje de programación para no olvidar: Tcl
desarrollo
Programacion
perl
python
Linux
Lenguaje de programacion
Un lenguaje de programación para no olvidar: Tcl
desarrollo
Programacion
perl
python
Linux
Lenguaje de programacion
Un lenguaje de programación para no olvidar: Tcl
desarrollo
Programacion
perl

Esqueleto de aplicación

#!/bin/sh
# the next line restarts using wish 
exec wish "$0" "$@"

package require BLT

namespace eval Interface {
    proc init {} {
        #****  Ventana  *******************************************************
        wm title . "Aplicación de prueba"
        . configure -width 800 -height 600 -menu [menu .mnu]
        
        #****  Menu  **********************************************************
        
        menu .mnu.archivo
        .mnu add cascade -menu .mnu.archivo -label "Archivo"
        .mnu.archivo add command -label "Abrir" -command {::Funciones::abrir}
        .mnu.archivo add separator
        .mnu.archivo add command -label "Salir" -command {exit}
         
        menu .mnu.ayuda
        .mnu add cascade -menu .mnu.ayuda -label "Ayuda"
        .mnu.ayuda add command -label "Ayuda" 
        .mnu.ayuda add command -label "Acerca de esta prueba" -command {::Funciones::acerca}
        
        frame .frametxt 
        text .frametxt.txt -height 40 -width 80 -yscrollcommand {.frametxt.scroll set}
        scrollbar .frametxt.scroll -command {.frametxt.text yview} -orient v 
        
        pack .frametxt.txt -fill both -expand 1 -side left 
        pack .frametxt.scroll -expand 1 -fill y
        
    }
  
}

namespace eval Funciones {
    proc abrir {} {
        puts "Abrir: no implemntado"
    }
    
    proc acerca {} {
        set txt {Aplicación de prueba}
        append txt {Version 1.0}
        
        tk_messageBox -message $txt -type ok -title "Acerca de esta prueba" 
    }
    
}

::Interface::init


python
Linux
Lenguaje de programacion
Un lenguaje de programación para no olvidar: Tcl
desarrollo
Programacion

No hay comentarios:

Publicar un comentario

-

Con la tecnología de Blogger.