中国开发网: 论坛: Delphi/BCB: 贴子 56656
pcplayer: C# vs Delphi using generics
In this article, Scott Water pointed out that you can instantiate an object using generics.

For everyone out there who didn't know, you can already accomplish this, back in Delphi 1! It's called class referencing. For those of you C# people, you can find this in the Delphi Language Reference under “Constructors and class references”. This appeared in the Delphi 5 help.

type TControlClass = class of TControl;
function CreateControl(ControlClass: TControlClass;
const ControlName: string; X, Y, W, H: Integer): TControl;
begin
Result := ControlClass.Create(MainForm);
with Result do
begin
Parent := MainForm;
Name := ControlName;
SetBounds(X, Y, W, H);
Visible := True;
end;
end;

CreateControl(TEdit, 'Edit1', 10, 10, 100, 20);

相关信息:


欢迎光临本社区,您还没有登录,不能发贴子。请在 这里登录