請問一下各位前輩
小弟參考一些文章與程式範例..使用下面的程式..但卻一直換不了色
試了一整晚..不知道到底錯在哪...
[code cpp]
m_pRedPen = new TPen;
m_pRedPen->Mode = pmCopy;
m_pRedPen->Style = psSolid;
m_pRedPen->Color = clRed;
m_pRedPen->Width = 5;
[/code]
[code cpp]
Image01->Canvas->Pen = m_pRedPen;
Image01->Canvas->MoveTo(11,22);
Image01->Canvas->LineTo(333,555);
Image01->Refresh();
[/code]

附加檔案：4a5fd80ad5ed2_StdProject.rar

Pen裡面不是本來就有Color屬性?
Image01->Canvas->Pen->Color = clRed;


===================引 用 stwave 文 章===================
請問一下各位前輩
小弟參考一些文章與程式範例..使用下面的程式..但卻一直換不了色
試了一整晚..不知道到底錯在哪...
[code cpp]
m_pRedPen = new TPen;
m_pRedPen->Mode = pmCopy;
m_pRedPen->Style = psSolid;
m_pRedPen->Color = clRed;
m_pRedPen->Width = 5;
[/code]
[code cpp]
Image01->Canvas->Pen = m_pRedPen;
Image01->Canvas->MoveTo(11,22);
Image01->Canvas->LineTo(333,555);
Image01->Refresh();
[/code]

可是我一開始試過..
還是一樣都不會變色~"~

開新專案,放按Button1和Image1
下面的code會在Image1上看到紅色線條
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Image1->Canvas->Pen->Color = clRed;
Image1->Canvas->MoveTo(11,22);
Image1->Canvas->LineTo(333,555);
Image1->Refresh();
}

 我開啟你的專案執行過.
在載入Bitmap圖檔後,會有紅線.
所以無法得知錯誤為何
===================引 用 stwave 文 章===================
請問一下各位前輩
小弟參考一些文章與程式範例..使用下面的程式..但卻一直換不了色
試了一整晚..不知道到底錯在哪...
[code cpp]
m_pRedPen = new TPen;
m_pRedPen->Mode = pmCopy;
m_pRedPen->Style = psSolid;
m_pRedPen->Color = clRed;
m_pRedPen->Width = 5;
[/code]
[code cpp]
Image01->Canvas->Pen = m_pRedPen;
Image01->Canvas->MoveTo(11,22);
Image01->Canvas->LineTo(333,555);
Image01->Refresh();
[/code]

看到您的問題突然想到圖片的問題..
我都是載..8bit的黑白BMP...
剛用小畫家存成一空白BMP去開就有紅線了..
難怪兩位都認為程式是OK的!!^^
另外可以請教這樣的情況..
能有方法顯示有顏色的線嗎??

===================引 用 李國維 文 章===================
我開啟你的專案執行過.
在載入Bitmap圖檔後,會有紅線.
所以無法得知錯誤為何

編輯記錄

灰階(8 bits)的圖片要顯示彩色(24 bits)的紅線?
用另外一個Image(透明屬性設為true)顯示畫圖的效果就好了

了解~還是需要再多一個Image來顯示~
===================引 用 taishyang 文 章===================
灰階(8 bits)的圖片要顯示彩色(24 bits)的紅線?
用另外一個Image(透明屬性設為true)顯示畫圖的效果就好了