279136_ja-JP

liliconcom

テキスト編集ボックスのスクロールバーを設定する

Scroll Box() による回避策なしで、テキスト編集ボックスのスクロール バーを直接設定できると便利です。

teb = text edit box("",set width(200),set nlines(15));
teb << Set Scrollers( h, v );

したがって、15 個を超える項目を入力する場合は、下にスクロールできます。

自動化とスクリプトRe: テキスト編集ボックスのスクロール バーを設定 - ステータスが次のように変更されました: アーカイブ済みこのリクエストをアーカイブしています。 これがまだ重要な場合は、追加の詳細をコメントしてください。再開します。 ありがとうございました！Re: テキスト編集ボックスのスクロールバーを設定する

これはまだ実装すべきだと思います。

テキスト編集ボックスでN行を制限する必要がある場合がありますが、スクロールバーがないため、テキストの編集が非常に困難になります（また、テキスト編集ボックスが選択されていないときにテキスト編集ボックス内のテキストを比較すると、テキストが飛び跳ねます）それが選択されると、さらに難しくなります）。 Scroll Box を使用すると、テキストを編集するときにうまく機能しません。フォント (およびフォント サイズ) に基づいて高さを計算する必要があると思います。

Names Default To Here(1);

nw = New Window("",
 V List Box(
  H List Box(
   window:teb1 = Text Edit Box("", << Set Width(300), << Set N Lines(5), << Set Wrap(250)),
   V Scroll Box(
    Size(85), // should be calculated based on font size
    window:teb2 = Text Edit Box("", << Set Width(300), << Set Wrap(250)),
   )
  ),
  Button Box("Close",
   nw << Close Window;
  )
 )
);

txt = "At vero eos et accusamus et iusto odio dignissimos ducimus qui blanditiis praesentium voluptatum deleniti atque corrupti quos dolores et quas molestias excepturi sint occaecati cupiditate non provident, similique sunt in culpa qui officia deserunt mollitia animi, id est laborum et dolorum fuga. Et harum quidem rerum facilis est et expedita distinctio. Nam libero tempore, cum soluta nobis est eligendi optio cumque nihil impedit quo minus id quod maxime placeat facere possimus, omnis voluptas assumenda est, omnis dolor repellendus. Temporibus autem quibusdam et aut officiis debitis aut rerum necessitatibus saepe eveniet ut et voluptates repudiandae sint et molestiae non recusandae. Itaque earum rerum hic tenetur a sapiente delectus, ut aut reiciendis voluptatibus maiores alias consequatur aut perferendis doloribus asperiores repellat.";
wait(1);
nw:teb1 << Set Text(txt);
wait(1);
nw:teb2 << Set Text(txt);