PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : befehl bei click ausführen in tcl



avuton
06-03-2003, 16:19
Hallo kann mir jemand sagen, wie ich das mache:
In einem Textfeld wird eine Datei eingegeben und wenn man auf einen Button drückt, soll der Befehl tar xcfz mit dieser datei ausgeführt werden.
Wie geht das, kann einer hier ein Beispiel posten?
danke Avuton

Hephaestus
07-05-2003, 21:56
Hallo avuton,

Du gibst beim entry-widget einfach mit Parameter textvariable die Variable an, in der Du Deine Eingabe (Dateiname) ablegen willst. Die Variable benutzt Du dann in Deiner exec bzw. eval Zeile z.B.:

entry .fileInput -textvariable fileName
pack .fileInput
.
.
exec tar xcfz $fileName
.
.

Vielleicht mußt Du auch anstatt exec eval benutzen.

Gruß,
Hephaestus

pik7
07-05-2003, 22:52
hallo,

ein Beispiel mit cat.



#!/usr/local/bin/wish8.3

label .label -text "Dateiname"
entry .entry -width 20 -relief sunken -bd 2 -textvariable Datei
button .action -text "Mach was" -command {action $Datei}
pack .label .entry .action -side left

proc action {Datei} {
puts $Datei
set AUS [exec cat $Datei]
puts $AUS
return

}


gruß