Home2006年11月 ≫ SetInputTextType

2006 11/ 8 (水) 13:10

今、某FlashLite物作ってて、いろいろ検証。

status = fscommand2("SetInputTextType", "mestxt", "Alpha");
↑なんだけど、
au_東芝携帯で「SetInputTextType」があまり正常に動いてくれない。
正常と言うのは間違いかな。文字入力画面で指定意外の文字が入力できる。
「定型文」とか「お好み」とか・・・そんなんいらんわ!!!
命令どおりに動けコノヤロ!・・・っといった感じです。

なんで、自分で文字制御のAS書いた。(汚い&長くてすいません。)

ソース3つ。

/*-----------------------------------
■メイン
moto_txtに入力文字が入っています
-----------------------------------*/

//とりあえず文字数カウント
ct = length(moto_txt);

//文字列分だけ変数配列生成 --------------
//a0 ~ a2
dtxt = "";
for( i=0; i eval("a" add i) = substring(moto_txt,i+1,1);
t = eval("a" add i);
//大文字に変換!!
call("a2A");
//大文字意外消す!!
call("split");
eval("a" add i) = t;
dtxt = dtxt add t;
}
ct = length(dtxt);

//もっかいちゃんと文字が入ってるかチェック!
if(ct > 0){
//OK!→処理開始
}else{
//ERROR!→もう一回入力してぇ~m(_ _)m
}



/*-----------------------------------
■a2A:Call_function
-----------------------------------*/
if(t eq "a"){
t = "A";
}else if(t eq "b"){
t = "B";
}else if(t eq "c"){
t = "C";
}else if(t eq "d"){
t = "D";
}else if(t eq "e"){
t = "E";
}else if(t eq "f"){
t = "F";
}else if(t eq "g"){
t = "G";
}else if(t eq "h"){
t = "H";
}else if(t eq "i"){
t = "I";
}else if(t eq "j"){
t = "J";
}else if(t eq "k"){
t = "K";
}else if(t eq "l"){
t = "L";
}else if(t eq "m"){
t = "M";
}else if(t eq "n"){
t = "N";
}else if(t eq "o"){
t = "O";
}else if(t eq "p"){
t = "P";
}else if(t eq "q"){
t = "Q";
}else if(t eq "r"){
t = "R";
}else if(t eq "s"){
t = "S";
}else if(t eq "t"){
t = "T";
}else if(t eq "u"){
t = "U";
}else if(t eq "v"){
t = "V";
}else if(t eq "w"){
t = "W";
}else if(t eq "x"){
t = "X";
}else if(t eq "y"){
t = "Y";
}else if(t eq "z"){
t = "Z";
}else{
t = t;
}



/*-----------------------------------
■split:Call_function
-----------------------------------*/
//▼大文字-------------
to1="A";
to2="B";
to3="C";
to4="D";
to5="E";
to6="F";
to7="G";
to8="H";
to9="I";
to10="J";
to11="K";
to12="L";
to13="M";
to14="N";
to15="O";
to16="P";
to17="Q";
to18="R";
to19="S";
to20="T";
to21="U";
to22="V";
to23="W"
to24="X";
to25="Y";
to26="Z";

j=0;
er=0;
for(j=1;j<=26;j++){
//同じかチェック!
if( t eq eval("to"add j) ){
t = t;
}else{
//同じのがなかったらERRORを+1する!!
er = er+1;
}
//もし、ERRORが26になったら見つかってないので消去!!
if(er >=26){
t = "";
}else{
//
}
}

久しぶりにASソースのせるな・・・。

Comment form










 

Track back

この記事のトラックバックURL:
http://www.wauke.net/cgi/mt/mt-tb.cgi/503

Search

RSS feed

Category

Archives

Recent TrackBacks

Recent Comments