Mangler funktioner
<html><head>
<!-- Minus AutoDato -->
<title>TextareaValid</title>
<meta name="Generator" content="Stone's WebWriter 4">
<script language="javascript" type="text/javascript">
var ignKey = false;
var newVal = "";
var repeatChar=0;
var removeChar=0;
function getCharCode(e){
return (e.which)?e.which:e.keyCode;
}
function restoreVal(eC,f){
removeChar=0;
f.value=newVal;
}
function kDown(f,ch,l){
if ((ch!=8 && ch<32) || (ch<41 && ch>32) || (ch<124 && ch>111)){ignKey=true;return true;}
if (repeatChar>0){
f.value = chkLength(newVal,l);
return false;
}
if (ch!=8)repeatChar++;
}
function kPress(f,ch){
newVal=f.value+String.fromCharCode(ch);
return false;
}
function kUp(f,ch,l){
if (ch==8)return true;
f.value = chkLength(newVal,l);
repeatChar=0;
removeChar=0;
return false;
}
function chkLength(txt,l){
l--
var r = txt.lastIndexOf("\r");
var n = txt.lastIndexOf("\n");
var s = Math.max(r,n)+1;
if (txt.length>s+l){//test også her ...
var endstr = delLinie(txt.substring(s),l);
return txt.substring(0,s)+endstr;
}else{
return txt;
}
}
function delLinie(txt,l){
var insertHyphen = false;
var natDelAfter = " A-A}A]A),";
var natDelBefore = "(A{A[";
natDelAfter = natDelAfter.split("A");
natDelBefore = natDelBefore.split("A");
var place = -1;
for (i=0;i<natDelAfter.length;i++){//>
var p = txt.lastIndexOf(natDelAfter[i]);
if(p>-1)place = Math.max(place,p+natDelAfter[i].length);
}
for (i=0;i<natDelBefore.length;i++){//>
var p = txt.lastIndexOf(natDelBefore[i]);
if(p>-1)place = Math.max(place,p-natDelBefore[i].length);
}
if (place>0)l = Math.min(place,l);
return txt.substring(0,l)+"\n"+txt.substring(l);
}
</script>
</head>
<body>
<TABLE ALIGN="center"><TR><TD>
<TABLE WIDTH="500"><TR><TD ALIGN="center">
<FORM NAME="minForm">
<TEXTAREA NAME="testArea" COLS="50" ROWS="8" onkeydown="kDown(this,getCharCode(event),30)" onkeypress="kPress(this,getCharCode(event))" onkeyup="kUp(this,getCharCode(event),30)">1234567890123456789012345</TEXTAREA><BR>
</FORM>
</TD></TR></TABLE>
<div id="minDiv"></div>
</TD></TR></TABLE>
</body>
</html>
Ovenstående kode mangler at alle redirgeringstaster virker
Pil op - Pil ned - Pil tilbage - pil frem - Home - end osv.
