初心者のFileMaker pro Q&A (旧掲示板)

扇風機

Guest

テキストスタイルをOnOffするボタンを作りたいのですが

FMPro12です

任意のフィールドのテキストに「字消し線」スタイルを適用するために
-----------------
変数を設定[$スタイル;値：Get(アクティブフィールド内容)]
計算結果を挿入[選択;TextStyleAdd($スタイル；字消し線)]
-----------------
というスクリプトを作ってボタンにすることはできました。
これに
任意のフィールドのテキストに「字消し線」スタイルを適用するが、既に字消し線スタイルが適用されていたら字消し線スタイルを解除する
というボタン（スクリプト）にするにはどのようにすればよいでしょうか？

どなたかご教示よろしくお願い致します。

チポ

Member

Re: テキストスタイルをOnOffするボタンを作りたいのですが

GetAsCSS関数で
テキストの書式が得られます。

字消し線は
"text-decoration:line-through:"
と返ります。

これで判定してトグルできますね。

tim

Guest

Re: テキストスタイルをOnOffするボタンを作りたいのですが

Case ( PatternCount ( GetAsCSS ( $スタイル ) ; "text-decoration:line-through;" ) ; TextStyleRemove ( $スタイル ; 字消し線 ) ; TextStyleAdd ( $スタイル ; 字消し線 ) )

扇風機

Guest

Re: テキストスタイルをOnOffするボタンを作りたいのですが

チポさん、timさん、ありがとうございます。
timさんのスクリプトをそのまま使ったのですが、字消し線が消えません。
なぜでしょうか？
字消し線ONはうまくいきます。

tim

Guest

Re: テキストスタイルをOnOffするボタンを作りたいのですが

あれ？
計算結果を挿入すると、既存データのスタイルを引き継いでしまうからでしょうか。
フィールド設定でやってました。
フィールド設定 [Let ( $スタイル = Get ( アクティブフィールド内容 ) ; Case ( PatternCount ( GetAsCSS ( $スタイル ) ; "text-decoration:line-through;" ) ; TextStyleRemove ( $スタイル ; 字消し線 ) ; TextStyleAdd ( $スタイル ; 字消し線 ) ) )]

扇風機

Guest

Re: テキストスタイルをOnOffするボタンを作りたいのですが

timさん、早速ありがとうございます。
case関数をご教示いただいたのでご指摘の通り「計算結果を挿入」ステップで組んでいました。
フィールド設定スクリプトステップで無事うまく行きました。
ありがとうございました。