Thread Rating:
  • 360 Vote(s) - 2.84 Average
  • 1
  • 2
  • 3
  • 4
  • 5
TextFlowBoxの入力データ取得等について
05-02-2016, 01:04 PM, (This post was last modified: 05-02-2016, 05:10 PM by dice256.)
#2
RE: TextFlowBoxの入力データ取得等について
質問を正しく読み取れていないかもしれませんが…

質問①
TextFlowBoxのなかのテキストを取り出して、set 式で別の変数に代入という流れになると思います
(TextFlowBoxのなかのテキストを取り出すには get-text メソッドが用意されています)

def tfb = {TextFlowBox "test"} || "text"の文字が入ったTextFlowBox
let dst-str:String = "" || 代入先の変数宣言

set dst-str = {tfb.get-text}

※代入などの構文は下記参照
Curlドキュメント > Curl開発者ガイド > 基本概念 - 構文 > 基本的な構文 > 式 > 変数の使用
Curlドキュメント > Curl開発者ガイド > 基本概念 - 構文 > 式 > 代入ステートメント

質問②
TextFlowBoxにつけたタップのイベントハンドラで最後にタップしたTextFlowBoxを変数に記録しておく
のが一番簡単な気がします。

ただ、Caedeなら画面内にボタンをつくらずにソフトウェアキーボードを使うことにして、TextFlowBox
でなくコントロールのTextFieldを使った方が楽かもしれません。
(TextFieldなら質問③も選択してソフトウェアキーボードから連続して数字を入力すると後ろに続けて入力されます)

タップなどCaedeの機能については「General Caede questions」で聞くとより詳しいことがきけるかも
しれません。

 Curl Global Community / Discussions / General Caede questions
 http://communities.curl.com/forumdisplay.php?fid=23


質問③
数字を追加する場合は、既に入力されている文字列に追加する数字の文字列を連結した後にset、
(※訂正、TextFlowBox はaddだけで追加できました)
削除時は、substrメソッドを使用して最後尾1文字前までの文字列を取得してsetとなると思います。

Code:
{def tfb = {TextFlowBox "1"}}
{def cb-add = {CommandButton label = "add 1"}}
{def cb-del = {CommandButton label = "del"}}

|| 後ろに"1"を追加
{cb-add.add-event-handler
    {on Action do
        || 訂正 [[
        ||def v = {tfb.get-text}
        ||{tfb.clear}
        ||{tfb.add
        ||    v & "1"
        ||}
        || 訂正 ][
        || これだけでOK
        {tfb.add "1"}
        || 訂正 ]]
    }
}

|| 後ろ一文字削除
{cb-del.add-event-handler
    {on Action do
        def v = {tfb.get-text}
        def len = v.size
        {if len > 0 then
            {tfb.clear}
            {tfb.add
                {v.substr 0, (len - 1)}
            }
        }
    }
}


Messages In This Thread
RE: TextFlowBoxの入力データ取得等について - by dice256 - 05-02-2016, 01:04 PM
Forum Jump:


Users browsing this thread:
3 Guest(s)

MyBB SQL Error

MyBB has experienced an internal SQL error and cannot continue.

SQL Error:
1017 - Can't find file: 'mybb_threadviews' (errno: 2)
Query:
INSERT INTO mybb_threadviews (tid) VALUES('1350')