我想在RichEdit控制項中裝入一個圖片做爲背景色，爲此，我寫了以下的程式碼（當然Image1中是有圖片的，格式是點陣圖(TBitmap)）： var dc:HDC; begin dc:=GetDC(richedit1.Handle); try drawicon(dc,12,12,image1.Picture.Icon.Handle); image1.Show; finally ReleaseDC(Richedit1.Handle,dc); end; end; 但是，程式執行後，看不到image1中的圖片。明明已經Show了，爲什麼看不到？哪位高手能幫我解決一下，在這裡先謝謝您了！

wnnnnnn6您好：
可能是drawicon函数的问题吧，DrawIcon ( Icon : System.Drawing.Icon; Rectangle : System.Drawing.Rectangle ) ; 
Draws an icon onto the graphics canvas 对icon图形格式起作用，试着将图片改成icon格式，程式能运行没错误
您可以参考下列作法：
問題】MEMO元件，如何加入背景圖案？？ 
http://delphi.ktop.com.tw/topic.php?topic_id=34531
Rain大大的回答：
procedure TForm1.Button1Click(Sender: TObject);
var
  DC: HDC;
  bmp: TBitmap;
  ACanvas:TCanvas;
  iX, iY: Integer; //圖片位置座標
begin
  iX := 0;
  iY := 0;
  ACanvas := TCanvas.Create;
  bmp := TBitmap.Create;
  DC := GetWindowDC(Memo1.Handle);
  try
    ACanvas.Handle := DC;
    Bmp.LoadFromFile('C:\SAMPLE.bmp');
    ACanvas.Draw(iX, iY, bmp);
  finally
    ReleaseDC(Memo1.Handle, DC);
    ACanvas.Free;
    bmp.Free;
  end;
end;
将上面的memo1改为RichEdit即可，试试看，另您可以在站内查找“背景图”里有很多的相关的资料供参考，别浪费哦试试看
    ——行径窄处，留一步与人行——

        

謝謝您呀！我回去好好研究一下。