InternetServiceInfo

AcceptEdit IsSameChoice

Attributes

ContentDescription EditSteps HostName HostPort HostPortAsText Image Name OptionEditSteps ServiceType ShortContentDescription

Fields

instance InternetServiceInfo tag;
          image: nilObject;
    serviceType: 0;
       hostName: nilObject;
       hostPort: 0;
end instance;

Define Class InternetServiceInfo;
    inherits from Object;
    inherits from EditAttributeClient;
    inherits from HasContent;

    field image:        Image, getter, sharedSetter;
    field serviceType:  Unsigned, getter, setter;
        // type of Internet service: POP, Web, News, ... (see definitions in Internet.h)
    field hostName:     Text, getter, setter;
    field hostPort:     Unsigned, getter, setter;

    attribute Image: Image;
    attribute ServiceType: Unsigned;
    attribute HostName: Text;
    attribute HostPort: Unsigned;

    attribute HostPortAsText: Text;
        // returns ephemeral text version of hostPort

    overrides ContentDescription;
        // returns a plain text copy of HostName
    overrides ShortContentDescription;
        // returns nilObject
    overrides Name;
        // if inherited name is nil, returns TypeDescription

    attribute EditSteps: AttributeStepList, readOnly;
        // returns basic edit steps; in this case, for editing hostName
        // subclasses often override
    attribute OptionEditSteps: AttributeStepList, readOnly;
        // returns fancier edit steps; in this case, for editing both hostName and hostPort #
        // subclasses often override

    overrides AcceptEdit;
        // make sure host name & port are non-nil

    overrides IsSameChoice;
        // only compares serviceType, hostName, and hostPort
end class;