我该怎样定义?(0分)

而且,paint是Image的方法吗,怎么看的?
我怎么找出那些方法?

paint是TGraphicControl的protected方法
TImage从TGraphicControl继承
delphi语法：
type
TMyImage=class(TImage)
protected
procedure Paint;override;
end;

procedure TMyImage.Paint;
begin
Inherited Paint;
//你自己的画线代码
.....
end;

这样太麻烦，建议你先试一下把OnCreate中的画线代码放到OnPaint中看看
另：CB我没用过，语法如何你自己翻译吧

时间太久，强制结束。 wjiachun