279136_zh-TW

liliconcom

設定文字編​​輯框的捲軸

如果能夠直接為文字編輯框設定捲軸而無需使用 Scroll Box() 解決方法，那就太好了。

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

因此，當您輸入超過 15 個項目時，您可以向下捲動。

自動化和腳本編寫回复：為文本編輯框設置滾動條 - 狀態更改為：已存檔我們正在歸檔此請求。 如果這仍然很重要，請發表評論並提供更多詳細信息，我們將重新開放。 謝謝！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);