// S_Trim_Man.hsp /*title this*/_4title=__FILE__:split _4title,".",_4title:title _4title.0 // 操作前文字列用mesbox用 sdim s,65000 // ノートパッド用 sdim t,65000 button "実行",*_do font "",18 objmode 2 // sが中身の操作前文字列用mesbox mesbox s,600,455,5 ID4mesbox=stat stop *_do t=s notesel t repeat notemax tmp_A="" tmp_B="" noteget tmp_A,cnt tmp_B=strtrim(tmp_A,1,' ') noteadd tmp_B,cnt,1 loop // notepad保存 notesave "tmp.txt" // メモ帳を利用して表示 exec "notepad tmp.txt" stop
タグ
コメントをかく