pdelphiassembly.dpr

来自「多数代码可以直接在Delphi6和Delphi7环境下运行。部分涉及.NET技术」· DPR 代码 · 共 23 行

library PDelphiAssembly;

uses
  Borland.Delphi.Classes,
  Borland.Delphi.SysUtils;

type
  TDemoClass1 = class(System.Object)
  public
    class function GetSystemTime : String; static;
  end;

{ TDemoClass1 }

class function TDemoClass1.GetSystemTime: String;
begin
  Result := DateTimeToStr(Now);
end;

begin

end.