//--------------------------------------------------------------------------- // TOZENKAKU : 半角記号、英数字、ひらがな、カタカナを全角に変換する。 // [Usage] : // call TOZENKAKU $$in_str, ##jpn_flag; // $$out_str = $$return; // // $$in_str : 変換する文字列 // ##jpn_str : = 0 なら全角カタカナ、= 1 なら全角ひらがなへ変換 // $$out_str : 変換後の文字列 // TOZENKAKU: ##hwnd = hidemaruhandle(0); openfile "/h tmp.$$$"; ##s_hwnd = hidemaruhandle(0); insert $$1; selectall; if( ##2 ) tozenkakuhira; else tozenkakukata; gofileend; $$1 = gettext(0,0,x,y); setactivehidemaru ##hwnd; closehidemaruforced ##s_hwnd; return $$1; //---------------------------------------------------------------------------