关于Delphi编程 初级问题 1

Question

with ... do //开域语句
Canvas//画布
Canvas.Brush//底图with MyTreeView.Canvas do
begin
{}Brush.Color := m_BkgColorDialog.Color; //相当于MyTreeView.Canvas.Brush.Color := m_BkgColorDialog.Color;
{}FillRect(ARect); //相当于MyTreeView.Canvas.FillRect
end;

Answer 1

//比较特殊的方式//不声明变量使用对象with TForm.Create(nil) do try
{}ShowModal;
finally
{}Free;
end;

Answer 2

1,这里画布对象及画刷对象.
2,fillrect() 是对API

Answer 3

1,这里画布对象及画刷对象.
2,fillrect() 是对API其封装。将其做成画布函数。可以看源码：CTRL + 点击”你想看的关键字“