zoukankan      html  css  js  c++  java
  • RTTI(一) 枚举

    SetEnumProp
    void __fastcall TForm2::Button1Click(TObject *Sender)
    {
        //Getting the current color of the workspace
        String currentPropColor = GetEnumProp(this,"Color");
        int currentColorInt = StrToInt(currentPropColor);
     
        //Getting the first button align enum and, if different,
        //setting it to alLeft
        String currentAlignProp = GetEnumProp(Button1, "Align");
        if (currentAlignProp != "alLeft")
        {
             SetEnumProp(Button1, "Align", "alLeft");
         }
     
        //Checking if the form background color was set.
        if(currentColorInt < 0)
        {
            currentColorInt = GetSysColor(COLOR_APPWORKSPACE);
        }
     
        //Setting the form background color as the negative value
        //of the current background color
        SetEnumProp(this, "Color",
                    IntToStr((int)(clWhite - currentColorInt)));
    }
     
    void __fastcall TForm2::Button2Click(TObject *Sender)
    {
        int p[5] = {clYellow, clGreen, clRed, clBlue, clBlack};
        SetEnumProp(this, "Color", IntToStr(p[random(5)]));
     
        //Getting the second button align enum and, if different,
        //setting it to alRight
        String currentAlignProp = GetEnumProp(Button2, "Align");
        if (currentAlignProp != "alRight")
        {
             SetEnumProp(Button2, "Align", "alRight");
         }
    }
  • 相关阅读:
    DS博客作业03--树
    DS博客作业02--栈和队列
    数据结构——线性表
    结构体
    C博客作业05--指针
    C语言博客作业04--数组
    面向对象设计大作业第二阶段:图书馆系统
    Java程序设计-有理数类的设计
    DS博客作业05-查找
    DS博客作业04-图
  • 原文地址:https://www.cnblogs.com/cb168/p/4643967.html
Copyright © 2011-2022 走看看