テキストを特定の位置に揃えるには?
問題
図のように、任意の場所にテキストオブジェクト(名前は「text1」)を作成する。text1は、画面上に固定しないものとする。
いま、text1の左下隅の座標を、正確に、( sqrt(2), sqrt(3) )に揃えたい。
text1をドラッグすれば、見かけ上、おおまかに揃えることはできそうだ。しかし、この方法では、「正確に」( sqrt(2), sqrt(3) )に揃えることは難しそうだ。
また、「プリファレンス」画面内の「位置」タブで、text1の「開始点」を、( sqrt(2), sqrt(3) )としてみたが、下図のように、text1の左下隅の座標は、( sqrt(2), sqrt(3) )にはならなかった。何かいい方法はないだろうか。
解答(一例)
①点A( sqrt(2), sqrt(3) )を作成する。
②入力バーに、以下を入力して実行する。
{SetCoords[text1,x(A),y(A)],SetCoords[text1,x(Translate[A,Vector[Corner[text1,1],A]]),y(Translate[A,Vector[Corner[text1,1],A]])]}
(以上)