表单上有一个image控件，我需要对bmp的canvas执行多次textout操作，即加上一些文字，每次操作前我想先使canvas上原来存在的内容去掉，我

Question

表单上有一个image控件，我需要对bmp的canvas执行多次textout操作，即加上一些文字，每次操作前我想先使canvas上原来存在的内容去掉，我该怎么办？

Answer 1

写上去之前保存BMP覆盖Rect的信息，下次写之前先用保留信息恢复Bmp，然后再保存覆盖Rect(如果bmp会发生移动的话)

Answer 2

procedure TForm1.BitBtn1Click(Sender: TObject);
var
  tmp:TCanvas;
begin
  tmp:=image1.Canvas;
  tmp.TextOut(1,1,'test');
end;

Answer 3

procedure TForm1.BitBtn1Click(Sender: TObject);
var
  tmp:TCanvas;
begin
  tmp:=image1.Canvas;
  tmp.TextOut(1,1,'test');
end;

Answer 4

407107() 兄弟，将文字写到bmp上是一行一行写的，该如何保留信息？