全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1309
推到 Plurk!
推到 Facebook!

問一下 樹狀結構圖做法

尚未結案
ptj
一般會員


發表:14
回覆:19
積分:11
註冊:2003-01-21

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-08-17 15:40:52 IP:218.166.xxx.xxx 未訂閱
我是希望利用txt讀入數值 畫出樹狀的結構圖 但畫完希望能夠存檔 我想到兩個方法 1 利用tree view 但不知怎麼存成圖檔 2 直接畫在image上 但算每個數值及分配位置 可能有點複雜 不知道各位前輩可否指導一下 最好能給各範例囉 謝謝
RaynorPao
版主


發表:139
回覆:3622
積分:7025
註冊:2002-08-12

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-08-17 16:23:35 IP:203.73.xxx.xxx 未訂閱
引言: 我是希望利用txt讀入數值 畫出樹狀的結構圖 但畫完希望能夠存檔 我想到兩個方法 1 利用tree view 但不知怎麼存成圖檔 2 直接畫在image上 但算每個數值及分配位置 可能有點複雜 不知道各位前輩可否指導一下 最好能給各範例囉 謝謝
ptj 你好:
(1)假設你已經能夠順利把 *.txt 的資料結構匯入 TreeView
(2)接下來只需要參考以下的範例程式碼,就可以把 TreeView 存成圖檔
   HDC hDC=GetDC(TreeView1->Handle);
   TCanvas *cs=new TCanvas;
   cs->Handle=hDC;
   Graphics::TBitmap *bmp=new Graphics::TBitmap;
   bmp->Width=TreeView1->ClientWidth;
   bmp->Height=TreeView1->ClientHeight;
   bmp->Canvas->CopyRect(Rect(0, 0, bmp->Width, bmp->Height), cs,
      Rect(0, 0, TreeView1->ClientWidth, TreeView1->ClientHeight));
   bmp->SaveToFile("TreeView.bmp");
   delete bmp;
   delete cs;
   ReleaseDC(NULL, hDC);
(3)請再依照自己的需求,自行修改
    < src="http://delphi.ktop.com.tw/loadfile.php?TOPICID=10003806&CC=223734"> -- Enjoy Researching & Developing --    發表人 - RaynorPao 於 2004/08/17  17:23:28
        
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
andychang1690
資深會員


發表:20
回覆:694
積分:442
註冊:2003-03-14

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-08-17 17:14:55 IP:219.132.xxx.xxx 未訂閱
不好意思,附上一個直接存入Image元件的方式
  Graphics::TBitmap *newBitmap;
  newBitmap = new Graphics::TBitmap();
  HDC ScreenDC;
  TPoint REOrg;
  try  {
    Image1->Picture->Graphic=newBitmap;
    Image1->Picture->Graphic->Width=TreeView1->ClientWidth;
    Image1->Picture->Graphic->Height=TreeView1->ClientHeight;
    REOrg=TreeView1->ClientToScreen(Point(0,0));
    ScreenDC=GetDC(0);
    try    {
      BitBlt(Image1->Picture->Bitmap->Canvas->Handle,0,0,TreeView1->ClientWidth,TreeView1->ClientHeight,ScreenDC,REOrg.x, REOrg.y, SRCCOPY);
    }
    __finally    {
      ReleaseDC(0, ScreenDC);
    }
  }
  __finally  {
    newBitmap->Free();
  }
請參考!
Andy Chang
------
Andy Chang
系統時間:2024-05-20 21:45:12
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!