Skript Tcl/Tk - Praktische Informatik / Datenbanken - Universität Kassel

Kapitel 4 – Fortsetzung Tcl und Einführung in Tk 49
• Nachdem ein Parameter mit Default-Wert definiert wurde, müssen
alle nachfolgenden Parameter ebenfalls einen Default-Wert erhalten
Variable Anzahl von Parametern
proc argTest {a b args} {
foreach param {a b args} {
puts "$param = [set $param]"
}
}
argTest Dies ist ein Test!
Bildschirmausgabe:
=>
a = Dies
b = ist
args = ein Test!
Zu beachten:
• Das Schlüsselwort args muss am Ende der Parameter-Liste stehen!
• args nimmt alle überschüssigen Parameter als Liste auf
Variablennamen als Parameter
upvar #0 varName localvar
upvar #0 wird innerhalb von Prozeduren gebraucht, um globale Variablen
(im Kontext 0, daher #0) unter einem lokalen Variablennamen verfügbar
zu machen
Einsatzgebiete:
• Zeitersparnis bei umfangreichen Variableninhalten
• Ggf. einfacher, bestimmte Variablen direkt zu verändern, als alles
im Rückgabe-String der Prozedur unterzubringen
Beispiel zu upvar
set globalVar 0; puts "globalVar = $globalVar"