Delphi控件源码

开发平台：

Delphi

Canvas.dpr：源码内容

							program Canvas;
uses
  Forms,
  UTestCanvas in 'UTestCanvas.pas' {TestForm};
{$R *.res}
begin
  Application.Initialize;
  Application.CreateForm(TTestForm, TestForm);
  Application.Run;
end.

						