type TFilter = set of(AApps,AAudios,AVideos,AImages,ATexts);

解决方案 »

  1.   

    TO technofantasy(www.applevb.com):
    set of 是集合啊
      

  2.   

    type MY_ENUM=(yes,no)var
        aaa:ENUM;
    begin
        aaa:=yes;
    end; 
      

  3.   

    type MY_ENUM=(yes,no);
    var
        aaa:ENUM;
    begin
        aaa:=yes;
    end;
      

  4.   

    哦,错了,是这样:type MY_ENUM=(yes,no);
    var
        aaa:MY_ENUM;
    begin
        aaa:=yes;
    end;
      

  5.   

    Type
      cmd=(Stop,Start);var
      cmdtype: cmd;
    begin
      cmdtype := Stop;
    end;