線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1262
推到 Plurk!
推到 Facebook!

ImageList1->Draw在Image上的問題

尚未結案
fantasy
一般會員


發表:10
回覆:9
積分:3
註冊:2003-11-27

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-03-09 00:54:07 IP:61.61.xxx.xxx 未訂閱
想請問一下各位大哥,小弟想在image在執行的時候,按一個button後會把 ImageList內的圖片畫在Image1上面程式如下    
void __fastcall TFormMain::Execute(TObject *Sender){     ImageList1->Draw(Image1->Canvas,20,20, 0, true);
  Image1->Repaint();
}
 
會有反應,Image1會變成全白的,不知道怎麼使用,希望能夠指導一下,謝謝
meta
中階會員


發表:3
回覆:60
積分:57
註冊:2004-06-09

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-03-09 11:28:29 IP:202.39.xxx.xxx 未訂閱
//小弟自己試的D7下..參考一下
procedure TForm1.Button1Click(Sender: TObject);
begin
  //
  Image1.Canvas.Brush.Color:=clBtnFace;//設跟背景同樣的color
  Image1.Canvas.FillRect(Image1.ClientRect);
  // 
  ImageList1.Draw(image1.Canvas,20,20,0,true);
  Image1.Repaint;
end;
//記得image's default color is white..
系統時間:2024-05-12 20:18:35
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!