aboutprp.pas

来自「Delphi 开发的的热键操作 很值得看的」· PAS 代码 · 共 24 行

unit AboutPrp;

interface

uses
  WinTypes, WinProcs, Classes, Graphics, Forms, Controls, StdCtrls, Buttons;

type
  TAboutInfo = class( TPersistent )
  private
    FCopyrightDate: string;
    FCompany      : string;
    FDescription  : string;
  public
    property CopyrightDate: string read FCopyrightDate write FCopyrightDate;
    property Company      : string read FCompany       write FCompany;
    property Description  : string read FDescription   write FDescription;
  end;

implementation

end.