$Entry8->bind( "<KeyRelease>",  sub { &tiefevali($Entry8)});