コンピュータを楽しもう!!

今、自分が面白くていろいろやってみたことを書き綴りたいと思います。連絡先はtarosa.yでgmail.comです。

editText( タイトル[,初期文字列セットフラグ] ) 戻り値: 入力文字, 入力結果コード

文字入力ダイアログを表示します。
引数

  • タイトル: ダイアログに表示する文字です。
  • 初期文字列セットフラグ : 入力時に初期文字列をセットするかどうかのフラグ 0:無し 1:有り

戻り値

  • 入力文字列(最大240バイト)
  • 入力結果コード: 0:Cancel, 1:OK

使用例

------------------------------------------
-- 実行するluaファイル名の入力
------------------------------------------
function directlua()
local luafilename, a = editText("実行するluaファイル名の入力")
local pos,str
local i = 0

  if( a~=nil and a==1 and luafilename~=nil and luafilename~="" )then
    --拡張子のチェック
    pos = string.find(luafilename, "." , i, true )
    while(pos~=nil)do
      i = pos + 1
      pos = string.find(luafilename, "." , i, true )
    end
    str = string.sub(luafilename, i, string.len(luafilename) )
    if( i==0 or (str~="lua" and str~="luac") )then
      luafilename = luafilename..".lua"  --.luaの追加
    end
  else
    luafilename = "luarida.lua"
  end
  return luafilename
end