Hallo,
wie kann man ich die Eingabe eines Entry-Feld darauf trimmen, dass nur Ziffern zugelassen sind UND davon 5 Stueck (Eingabefeld soll fuer Postleitzahlen sein).
Ich habe auch nirgendwo eine Moeglichkeit gefunden, ein Entry auf eine bestimmte Anzahl Eingabezeichen/-stellen zu begrenzen.
Mein bisheriger Code:
-----------------------------------------------------------------------------------------
$umkreiseingabe = $rahmen4->Entry(-textvariable=>\$umkreisvariable
,-width=>"15"
,-background=>"plum"
,-exportselection=>1
,-selectbackground=>"yellow"
,-selectforeground=>"blue"
,-relief=>"sunken"
,-validate =>'key',
,-validatecommand => sub{ $_[1] =~ /^(\d+)$/ }
##,-validatecommand => sub{ $_[1] =~ /^(\d+)$/ && ( length($_[1]) <= 5) }
,-invalidcommand => sub {$rahmen4->bell}
)->pack(-anchor=>"w" ,-padx=>5 ,-pady=>0 );
-----------------------------------------------------------------------------------------
wie kann man ich die Eingabe eines Entry-Feld darauf trimmen, dass nur Ziffern zugelassen sind UND davon 5 Stueck (Eingabefeld soll fuer Postleitzahlen sein).
Ich habe auch nirgendwo eine Moeglichkeit gefunden, ein Entry auf eine bestimmte Anzahl Eingabezeichen/-stellen zu begrenzen.
Mein bisheriger Code:
-----------------------------------------------------------------------------------------
$umkreiseingabe = $rahmen4->Entry(-textvariable=>\$umkreisvariable
,-width=>"15"
,-background=>"plum"
,-exportselection=>1
,-selectbackground=>"yellow"
,-selectforeground=>"blue"
,-relief=>"sunken"
,-validate =>'key',
,-validatecommand => sub{ $_[1] =~ /^(\d+)$/ }
##,-validatecommand => sub{ $_[1] =~ /^(\d+)$/ && ( length($_[1]) <= 5) }
,-invalidcommand => sub {$rahmen4->bell}
)->pack(-anchor=>"w" ,-padx=>5 ,-pady=>0 );
-----------------------------------------------------------------------------------------
