source: trunk/URouterboard.pas

unit URouterboard;

{$mode delphi}

interface

uses
  Classes, SysUtils;

type

  { TRouterboard }

  TRouterboard = class
    Logo: TStringList;
    RouterBoard: Boolean;
    Model: string;
    Version: string;
    Copyright: string;
    Vendor: string;
    OS: string;
    Website: string;
    constructor Create;
    destructor Destroy; override;
  end;


implementation

{ TRouterboard }

constructor TRouterboard.Create;
begin
  Logo := TStringList.Create;
end;

destructor TRouterboard.Destroy;
begin
  FreeAndNil(Logo);
  inherited Destroy;
end;

end.