ディレクトリツリー

for VisualWorks 7.8 / 7.7 / 7.6 with Jun793

ツリービューでディレクトリの階層構造を

ディレクトリの階層構造をを一望するためのアプリケーション「ディレクトリツリー」を作成します。ガジェット(ウィジェット)としてツリービューを用いる練習になります。

DirectoryTree1

どうぞ次のプログラムを実行してください。作成のための準備が整います。

| aCollection |
(aCollection := OrderedCollection new)
	add: #url: -> 'http://www.cc.kyoto-su.ac.jp/~atsushi/Programs/VisualWorks/DirectoryTree/DirectoryTree.st';
	add: #comment: -> 'Copyright 2008-2011 KSU (Kyoto Sangyo University). All Rights Reserved.';
	add: #bundle: -> #KSU;
	add: #package: -> 'KSU-Template';
	add: #nameSpace: -> #KSU;
	add: #category: -> 'KSU-Template';
	add: #class: -> #{KSU.DirectoryTree};
	add: #protocol: -> #examples;
	add: #selector: -> #example1;
	add: #execute: -> [#{KSU.DirectoryTree} value example1];
	yourself.
JunSystem
	perform: ((aCollection collect: [:each | each key]) inject: String new
			into: [:selector :key | selector , key]) asSymbol
	withArguments: (aCollection collect: [:each | each value]) asArray
DirectoryTree2

約200行のプログラムを作ると…

インターフェースビルダ(GUI Canvas)やメニューエディタ(Menu Editor)などを用いて、すべてこしらえると…

DirectoryTree3

約200行のプログラミング(このドックレット出力を見ながら)、おきばりやしとくれやす!

for VisualWorks 7.8 / 7.7 / 7.6 with Jun793


Updated: 2015/11/08 (Created: 2008/11/15) KSU AokiHanko