請教各位大大，這樣可以做縮圖嗎？ |
|
尚未結案
|
|
enu
中階會員   發表：36 回覆：93 積分：55 註冊：2003-10-22 發送簡訊給我 |
各位先進，請教一個問題，小弟在最大化的form上使用滑鼠繪圖後，不知可否透過一個按鈕將它變成一個縮圖（image）？
void __fastcall TForm1::FormActivate(TObject *Sender)
{
Canvas->Pen->Width=3;
}
//--------------------------------------------------------------------
int dmode=0;
void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button,TShiftState Shift, int X, int Y)
{
dmode=1;
Canvas->MoveTo(X,Y);
}
//--------------------------------------------------------------------
void __fastcall TForm1::FormMouseMove(TObject *Sender, TShiftState Shift,int X, int Y)
{
if(dmode==1){
Canvas->LineTo(X,Y);
}
}
//--------------------------------------------------------------------
void __fastcall TForm1::FormMouseUp(TObject *Sender, TMouseButton Button,TShiftState Shift, int X, int Y)
{
dmode=0;
}
也就是說，小弟利用上列程式繪圖後，可否將它轉成一張縮圖？小弟是想要在form上增加一個image，繪圖後可以將它縮在image中？（比如長、寬各縮為原來的1/4），不知接下來如何做比較適當呢？懇請賜教！謝謝！
|
|
RaynorPao
版主  發表：139 回覆：3622 積分：7025 註冊：2002-08-12 發送簡訊給我 |
引言:
各位先進，請教一個問題，小弟在最大化的form上使用滑鼠繪圖後，不知可否透過一個按鈕將它變成一個縮圖（image）？
enu 你好:
有關圖形的放大/縮小，可以利用 Canvas->CopyRect 達到目的，例如:
http://delphi.ktop.com.tw/topic.php?topic_id=32450
------
-- 若您已經得到滿意的答覆，請適時結案!! -- -- 欲知前世因，今生受者是；欲知來世果，今生做者是 -- -- 一切有為法，如夢幻泡影，如露亦如電，應作如是觀 -- |
|
aqjj
一般會員  發表：0 回覆：1 積分：0 註冊：2005-01-22 發送簡訊給我 |
TImage *I1;
TRect r1,r2;
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
I1=new TImage(Form1);
I1->Parent=Form1;
I1->Top=0;
I1->Left=0;
I1->Width=Form1->Width/4;
I1->Height=(Form1->Height-24)/4;
} void __fastcall TForm1::Button1Click(TObject *Sender)
{
I1->Visible=0;
Button1->Visible=0;
r1=Rect(0,0,Form1->Width,Form1->Height-24);
r2=Rect(0,0,I1->Width,I1->Height);
I1->Canvas->CopyRect(r2,Form1->Canvas,r1);
I1->Visible=1;
Button1->Visible=1;
} 其他的就照你的程式哩(我也是用你的程式下去試的)
寫法可能有點差...不過我試過可以用@@"
|
|
enu
中階會員 發表：36 回覆：93 積分：55 註冊：2003-10-22 發送簡訊給我 |
發表時間：2005-01-31 01:58:52
IP:218.165.xxx.xxx 未訂閱
系統時間：2024-06-29 17:06:40
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |