Altera Quartus II Scripting Manuale Utente Scaricare il pdf (Pagina 307)

Chapter 3: Tcl Packages & Commands 3–177

Initializes a Tk window. If you are using Tk functionality in Tcl, you must run this command first before

running any Tcl scripts.

# Initialize the Tk library

# Create a top level and add a title

toplevel .top

wm title .top "Hello World"

# Add widgets

button .top.hello -text Hello -command {puts stdout "Hello, World!"}

pack .top.hello -padx 20 -pady 10

# Without "tkwait", the script finishes at this point and the

# window is destroyed. The "tkwait" command prevents the

# script from finishing until the you close the window.

tkwait window .top

Nessun commento

Altera Quartus II Scripting Manuale Utente Pagina 307