Delphi相談室その２

■掲示板に戻る■ ■過去ログ倉庫めにゅーに戻る■

1 名前： デフォルトの名無しさん 投稿日： 2001/07/24(火) 14:00: ちょっと内容が高度になりすぎてしまうTechスレじゃ質問しずらい
とかはいりにくい人の為に　DelphiのTips Ｑ＆Ａ　はこちら

Delphi/Kylix Tech 2nd　はこちら
http://piza.2ch.net/test/read.cgi?bbs=tech&key=993005709
つづく>>2
2 名前： デフォルトの名無しさん 投稿日： 2001/07/24(火) 14:02: 前の　Delphi相談室
http://piza.2ch.net/test/read.cgi?bbs=tech&key=971261573

Delph6 の話でもはじめますか？
http://piza.2ch.net/test/read.cgi?bbs=tech&key=989950788

delphiで作られた有名ソフトって何がある？
http://piza.2ch.net/test/read.cgi?bbs=tech&key=990056026
3 名前： デフォルトの名無しさん 投稿日： 2001/07/24(火) 14:09: Techの方もリンクはってればよかったね。
4 名前： デフォルトの名無しさん 投稿日： 2001/07/24(火) 14:35: 1>>
すぐに削除依頼を出すように。
むやみにスレ立てんなよ
5 名前： デフォルトの名無しさん 投稿日： 2001/07/24(火) 14:38: delphiってもうバージョンアップしないんでしょ。
そんなのに新しいスレ建てるなんてばかげてると思わない会。
6 名前： デフォルトの名無しさん 投稿日： 2001/07/24(火) 14:45: 変なのが増えてきたので以後の質問は以下でお願いします。
このスレはsage進行で

http://piza.2ch.net/test/read.cgi?bbs=tech&key=993933402
7 名前： 名無しさん 投稿日： 2001/07/24(火) 14:56: >>1 スレ立てお疲れでーす。
しかし、変な嫌がらせ野郎がいるな。>>4-6
8 名前： 6 投稿日： 2001/07/24(火) 15:55: >>7
人の迷惑も考えずにスレを乱立してっからだろーがよ。
いくつあると思ってんだ、delphi関係のスレが。
もっと自粛セーよ。ぼけがー。
9 名前： デフォルトの名無しさん 投稿日： 2001/07/24(火) 16:10: 変なﾄﾞｷｭ煽りは無視しておいて

前スレの916の質問。

Becky風TreeView描画コード書いた。

procedure TForm1.TreeView1CustomDrawItem(Sender: TCustomTreeView;
　Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
　DefaultDraw := True;

　TreeView1.Canvas.Font.Color := clBlue;
　TreeView1.Font.Color := clRed;
　TreeView1.Font.Size := 15;
end;

procedure TForm1.TreeView1CustomDraw(Sender: TCustomTreeView;
const ARect: TRect; var DefaultDraw: Boolean);
var
　NodeRect: TRect;
　i: Integer;
begin
　DefaultDraw := True;

　TreeView1.Canvas.Font.Color := clGreen;
　for i := 0 to TreeView1.Items.Count-1 do
　begin
　　if (not TreeView1.Items[i].IsVisible) then continue;
　　NodeRect := TreeView1.Items[i].DisplayRect(True);
　　TreeView1.Canvas.TextOut(NodeRect.Right, NodeRect.Top, '('+IntToStr(i)+')');
　end;
　TreeView1CustomDrawItem(nil, nil, [], DefaultDraw); //※
end;

※のコードが無いと
Label1のフォントにItalicなどしている場合
TreeView1.Items[0]番の右項目(上の例では'(0)')の
初期描画位置がどうしてもずれる
別にイベントハンドラ呼ぶ必要がるのではなくてFontを設定しなおしているだけなんだけど

理由がわからない。
なぜだ！教えてくれ。

よろしく。
10 名前： デフォルトの名無しさん 投稿日： 2001/07/24(火) 16:38: >4=5=6=8
激しくｳﾝｺ（；´д｀）