• ベストアンサー

JTreeで各行の高さを変更できますか?

表題とおりなのですが、 JTreeの各行の高さを任意に変更する方法を探しています。 どこかの記述で、全てのセルの高さは均一と書かれていましたが、 それでも何か方法は無いものかと諦めきれずに、 質問させていただきました。 1行目の高さは10ピクセルで、2行目は20・・・といった具合にしたいのです。 そんな方法は無いというご意見でも構いません。 以上です、宜しくお願いいたします。

質問者が選んだベストアンサー

  • ベストアンサー
  • Bonjin
  • ベストアンサー率43% (418/971)
回答No.1

JavaDocを読むと、JTree#setRowHeight()で0以下に指定するとセルレンダラによって決められると書いてあります。 なので、JTree#setRowHeight()で0以下を指定し、TreeCellRendererの実装を行えば質問者さんが考えている様なこともできます。

digtoyoda
質問者

お礼

ありがとうございました。 おかげさまで思い通りのJTreeを構築することができました。 質問前にJavaDocを読んだのですが肝心の箇所を見落としていたようです。 ご指摘いただき、本当に助かりました。 以上です。

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • 各行のグラフの作り方

    エクセルでドーナツ型のグラフを作成しているのですが、各行ごとにグラフを作らないといけません。 120行あるので、一つ一つ作成するのはすごく大変です。 簡単に各行のグラフを作る方法を教えてください。 宜しく御願いします。 それと、ドーナツ型のグラフの真ん中に文字を入れたいのですが、どうやって入れたらいいのでしょうか? その文字も各行ごとにすべて違います。

  • 各行毎を検査して集計するには

    エクセル2002です。 =SUMPRODUCT(COUNTIF(B2:K2,$B$2:$K$2)) 上記の数式を組んで、1つの行を固定して、各行毎のデータの一致数を調査用で組んでいます。 行データが、1000行を超えていますので、列方向に何列表示出来るか確認してみましたら、256列でしたので全ての行データの検査結果を各列毎に表示する事が出来ない状態です。 $B$2:$G$2 の部分の数字は、1つずつ増えて、各行毎を検査して、各々行毎の合致数集計して合計値を表示させたいのですが、ご教授お願いします。 合計 No.1 No.2 No.3 No.4 No.5 No.6 No.7 No.8 No.9 No.10 12   10   0   0   1   1   0   0   0    0    0 現在作成しているのは、上記の様に列方向にデータの識別No.の下のセル数式を組んでいます。 識別ナンバーの行データは、下へ行く程、識別ナンバーの数値が増えていきます。 No.2は、No.1のデータと比較してNo.2の行には合致するデータがゼロと言う数式結果です。 他の識別No.の部分も同様です。 これを各識別No.行毎の合計のセルの部分に、集計結果を表示する流れです。 ご教授、宜しくお願いします。

  • Excel2021で各行の最小値を返す

    Excel2021、つまりBYROWが使えない環境で、配列(m行n列)の各行の最小値を(m行1列に)返すような数式を組めないでしょうか。 合計を返すのはMMULTを使った巧妙な方法(SEQUENCE関数を使って要素がすべて1のm行1列配列を作りMMULTで行列の積を返す)が他のサイトにありました。しかし、MMULTを使う方法で最小値を返す方法は思いつきません。なにかアイディアがあればお願いいたします。

  • EXCELで右側の文字の位置がずれる

    Windows Vista Office2007です。 セル幅1.88(20ピクセル)の状態のセルを作っておいて、 同数のセルを結合した行を、3行作りました。 各行の一番右端には 円 という文字を入力しました。 が、 円 の位置が微妙にずれているのです。 位置を合わせる方法を、教えていただけませんか。 よろしくお願いいたします。

  • セル内の行数で行の高さを変更

    セルA1を調べてその行の高さを変更するように下記のとおり 記述したのですが、これを複数行(例えば1~10行)繰り返すようにする(調べるセルは各行のA列)にはどのように記述すればよいでしょうか? ご教示どうぞよろしくお願いします。 Sub 行高変更() Dim TextA As Variant TextA = Range("A1").Text TextA = Split(TextA, vbLf, , vbBinaryCompare) RowA = UBound(TextA) + 1 If RowA = 1 Then Rows(1).RowHeight = 20 ElseIf RowA = 2 Then Rows(1).RowHeight = 30 ElseIf RowA = 3 Then Rows(1).RowHeight = 40 ElseIf RowA = 4 Then Rows(1).RowHeight = 50 ElseIf RowA = 5 Then Rows(1).RowHeight = 60 End If End Sub

  • Excel表の各行に数行ずつ空白行を入れたい

    Excel表の各行の間に、例えば5行ずつの空白行を入れたいのですが、簡単な方法はないものでしょうか? 現在やっているのは、上の5行の空白行をコピーして次の行の下の行を選択し、 ツールバーの「挿入」で「コピーしたセルの挿入」とし、 次はそのコピーされた5行が選択状態ですから、それをコピーして次の行の下を選択し・・・・ とやっています。 データが100行もあるので困っています。

  • 条件書式を自動的に変更したい

    excelの条件書式をセル毎に自動的に変更する方法はありますでしょうか。   A   B   C   1 black 任意  任意 ・・ ←全て黒に 2 red  任意  任意 ・  ← 全て赤に 3 blue  任意  任意 ・・ ← 全て青に   :   :   :  : 99 red  任意  任意  ・・ 全て赤 上記の例で、  Aの列の内容によって、その行の背景色を変更する ようにしたいのですが、 例えば、一列目なら条件書式に、「=$A$1="black"」と記載すればそうなりますが、一列毎に条件書式を変更していくのが面倒なので、複数列にまとめて適用する方法はありますでしょうか。絶対参照を相対参照にする必要があるとは思うのですが、うまくできていません。 ご存じの方、どうぞご教授願います。

  • VB2005でファイル操作(2)

    前回の質問を踏まえて 記述されているテキストは各行長さ固定にし いったんすべてを取り込み(StreamReader) 取り込んだデータの編集したい行を編集して 編集したデータを書き込みする(StreamWriter) 上記方法を取れば可能になったのですが これですとファイルのサイズが大きくなると 動作に支障をきたす可能性がありそうです すべてを取り込んで編集したい箇所を編集して書き込む方法でなく ピンポイントに任意の行を指定してそこの行だけ上書き編集するような 都合のいい方法はないのでしょうか?(INIファイルの操作みたいに)

  • EXCELの幅 変更

    EXCELのセルの幅を 変更して 色(背景)をつけ グラフの様なものを作りたいのですが 行毎に 幅をいろいろに変えることは出来ないでしょうか ? セル幅を変更すると 全ての行が そうなって しまいます」

  • ワードの表の列幅の変更で

    ワード2003使用です。 ワードで表を作成し、ある任意のセル(1列1行目と2行目みたいな)の列幅を変更するのに、そのセルを選択しマウスでドラッグすると変更は出来るのですが、表のプロパティのセルタブで幅を指定しても出来ません。どうしてでしょうか?

このQ&Aのポイント
  • Brother MFC-J739DNのプリンターエラーについて質問です。エラーメッセージが表示されている場合、具体的なエラーメッセージを教えてください。
  • お使いの環境について、Windows11proを使用し、無線LANで接続していることがわかりました。関連するソフト・アプリケーションはありません。
  • 電話回線の種類は光回線です。
回答を見る