みんなに優しく、解りやすくをモットーに開設しています。 以下のルールを守りみんなで助け合いましょう。
1.ファイルメーカーで解らない事があればここで質問して下さい。 何方でも、ご質問・ご回答お願いします。 (優しく回答しましょう)
You are not logged in.
Pages: 1
17 Advanceです。
テキストフィールドのフォントのカラーを返す関数はありますか。
Aフィールド あいうえお (赤文字)
Bフィールド 赤 もしくは RGB ( 255 ; 0 ; 0 ) など
よろしくお願いします。
Offline
GetAsCSS() で求められます。
Offline
テキストフィールドの使用「文字色」を「RGBコード」で返す計算式。
【 計算手順 】(「赤色テキスト」 → 「RGB(255;0;0)」を得る)
GetAsCSS関数でHTML変換してCSS情報を得る。
そのHTML/CSS構文の中から文字カラー情報部を切り出す。
その得られた16進のCSSカラーコード「#FF0000」を
10進のRGBコード「255 0 0」へ進数変換
最後に「RGB(255;0;0)」と整形して、お終い。
Let(
[
#css=GetAsCSS(テキストフィールド); // ← ①
#css=GetValue(Substitute(#css; ["color: #";¶]); 2); // ← ②
$css=List(Middle(#css;1;2);Middle(#css;3;2);Middle(#css;5;2));
$i=0;
$res="";
$LOOP= // ← ③用のループ関数を定義
"Case($i=3; $res;
Let([
$i=$i+1;
#hex=GetValue($css;$i);
#dec1=Substitute(Left(#hex;1);[""A"";10];[""B"";11];[""C"";12];[""D"";13];[""E"";14];[""F"";15]);
#dec2=Substitute(Right(#hex;1);[""A"";10];[""B"";11];[""C"";12];[""D"";13];[""E"";14];[""F"";15]);
$res=List($res; #dec1*16+#dec2)
]; Evaluate($LOOP))
)";
#rgb=Substitute(Evaluate($LOOP); [¶;";"]) // ← ③
];
"RGB(" & #rgb & ")" // ← ④
)
Last edited by Hiro (2019-11-04 00:17:36)
Offline
Pages: 1
[ Generated in 0.007 seconds, 9 queries executed - Memory usage: 505.98 KiB (Peak: 516.2 KiB) ]