delphi createForm 作用
createForm可以创建任何TComponent派生的类对象,因此我们可以使用它创建任何的VCL组件,例如下面的程序
procedure TForm6.btn1Click(Sender: TObject);
var
ameno: TMemo;
begin
Application.CreateForm(TMemo, ameno);
ameno.Parent := Self;
ameno.Lines.Add('3333333333333333333333333333333333333');
ameno.Show;
end;
Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号
执行时间: 0.046928882598877 seconds