请问,怎样让image的大小等于image->cavas->retangle画出来的矩形框(50分)

  • 主题发起人 主题发起人 elfgirl
  • 开始时间 开始时间
E

elfgirl

Unregistered / Unconfirmed
GUEST, unregistred user!
我在image上用 Image1->Canvas->Pen->Color=clRed;
Image1->Canvas->Brush->Color=clYellow;
Image1->Canvas->Rectangle(50,50,120,120);
Image1->Canvas->Pen->Color=clBlack;
Image1->Canvas->Pen->Style=psDot;
Image1->Canvas->Brush->Color=clWhite;
Image1->Canvas->MoveTo(85,120);
Image1->Canvas->LineTo(85,270);画了一个矩形框和一根点线,但是image的大小
远大于这个矩形框,有些白色空间。如何使image的大小就是一个矩形框和一根点线
的大小,也就是image上只有一个矩形框和一根点线,没有白色背景
 
Image1->width=120;
Image1->height=270;
 
这样也不行,点线后面还是留有白色的空间
 
怎么样才能做出像rational rose一样的框图来
 
发出背景重画消息,然后再画你的虚框,至于如何发重画消息,查以前的贴子
 
应该怎样双击该矩形框,光标点在矩形框中间,可以写入文字
就像rational rose 中的一样
 
后退
顶部