Image控件里画了一个方框，然后再把字画在这个方框里，怎么搞？

Question

RT
方框的左上角和右下角坐标都知道了，画字的时候最好不要让方框消失

Answer 1

Image1.Canvas.TextOut(0,0,RichEdit1.Text);
这个是从（0，0）坐标开始画字，一直会画到IMAGE右边，现在我要从（10，20）坐标开始画，画到（50，100）坐标结束，而不是一定要画到IMAGE右边

Answer 2

unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Buttons, ExtCtrls;type
  TForm1 = class(TForm)
    Image1: TImage;
    BitBtn1: TBitBtn;
    procedure BitBtn1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  self.Image1.Canvas.Rectangle(0,0,100,100);
  self.Image1.Canvas.TextOut(45,45,'哈哈');
end;end.

Answer 3

用Image1.Canvas.TextWidth判断你要写的文字的总长度，然后根据长度折叠显示

Answer 4

在IMAGE的另一个区域再次画字的时候如何保留前一个区域画的字？

Answer 5

在IMAGE的另一个区域再次画字的时候前一个区域的字照样要再画一次。

Answer 6

假使你的方框是rect：TRect
为了在写字的时候不覆盖这个方框，定义一个比方框小的矩形srect，可以放在rect内
然后
image1.canvas.textout(srect,x,y,'string');