tntforms.pas

来自「支持版本:Delphi 5-2009, C++Builder 5-2009 A」· PAS 代码 · 共 23 行

unit TntForms;

interface

uses
  Forms;

function TntApplication: TApplication;

type
  TTntForm = TForm;


implementation

function TntApplication: TApplication;
begin
  Result := Application;
end;


end.