tntforms.pas

来自「Universal Viewer Universal Viewer(ATVi」· PAS 代码 · 共 23 行

unit TntForms;

interface

uses
  Forms;

function TntApplication: TApplication;

type
  TTntForm = TForm;


implementation

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


end.