2008/08/06(Wed) 09:37:13 編集(投稿者)
■No22928 (コバヤシ さん) に返信
> フォントでFixedSysみたいに横幅が一定のがあれば昔みたいに右にスペースをいくつか追加して
> 左から10文字切って…みたいなアスキーアートみたいな技ができるんですが
[MS ゴシック 9pt] などの固定幅フォントを使えないでしょうか。
import Accessibility;
import System;
import System.Drawing;
import System.Windows.Forms;
class Form1 extends Form {
  var tvw : TreeView;
  function Form1() {
    Controls.Add(tvw = new TreeView());
    tvw.Dock = DockStyle.Fill;
    //tvw.Font = new System.Drawing.Font("MS P Gothic", 9);
    //tvw.Font = new System.Drawing.Font("MS UI Gothic", 9);
    tvw.Font = new System.Drawing.Font("MS Gothic", 9);  //固定幅フォント
    var root:TreeNode = tvw.Nodes.Add("C:");
    var $ = root.Nodes.Add;
    $(NewNode("sample.txt", new Date(2008, 7, 5)));
    $(NewNode("sampあle2.tx", new Date(2008, 7, 5)));
    $(NewNode("sampl.txt", new Date(2008, 7, 5)));
    $(NewNode("sample40ne.txt", new Date(2008, 7, 5)));
    $(NewNode("samplefile.txt", new Date(2008, 7, 5)));
    $(NewNode("sampl6.txt", new Date(2008, 7, 5)));
    root.ExpandAll();
  }
  function NewNode(file:String, date:DateTime):TreeNode {
    // ファイル名は左寄せ 18 文字。(実際には、全角文字への対応も必要)
    return new TreeNode(String.Format("{0,-18}\t{1:yyyy/MM/dd}", file, date));
  }
}
Application.Run(new Form1());