三段封装好的显示文本函数拿去用——小名叫雷锋

//| CreateTextLable() function 


void CreateTextLable


(string TextLableName, string Text, int TextSize, string FontName, color TextColor, int TextCorner, int X, int Y )


  {


//---


   ObjectCreate(TextLableName, OBJ_LABEL, 0, 0, 0);


   ObjectSet(TextLableName, OBJPROP_CORNER, TextCorner);


   ObjectSet(TextLableName, OBJPROP_XDISTANCE, X);


   ObjectSet(TextLableName, OBJPROP_YDISTANCE, Y);


   ObjectSetText(TextLableName,Text,TextSize,FontName,TextColor);


//----


  }






//| SetTextLable() function                                          |






void SetTextLable


(string TextLableName, string Text, int TextSize, string FontName, color TextColor, int TextCorner, int X, int Y )


  {


//---


   ObjectSet(TextLableName, OBJPROP_CORNER, TextCorner);


   ObjectSet(TextLableName, OBJPROP_XDISTANCE, X);


   ObjectSet(TextLableName, OBJPROP_YDISTANCE, Y);


   ObjectSetText(TextLableName,Text,TextSize,FontName,TextColor);


//----


  }






//| TimeCount() function                                            |






void TimeCount


(string TextLableName, int StartNumber, int StopNumber, int Inerval, int TextSize, string FontName, color TextColor, int TextCorner, int X, int Y )


  {


//---


   CreateTextLable(TextLableName,"-"+StartNumber+"-",TextSize,FontName,TextColor,TextCorner,X,Y);


   WindowRedraw();


   PlaySound("WAIT");


   for(int Count=StartNumber+1;Count<=StopNumber;Count++)


    {


     Sleep(Inerval);


     PlaySound("WAIT");


     SetTextLable(TextLableName,"-"+ Count+"-",TextSize,FontName,TextColor,TextCorner,X,Y);


     WindowRedraw();


    }


   Sleep(Inerval);


   ObjectDelete(TextLableName);


//----


  }
复制代码

谢谢分享

谢谢分享

谢谢分享

感谢楼主分享

路过看看

感谢分享

感谢分享

谢谢分享

谢谢分享

路过路过

感谢楼主分享，好好学习，天天向上！

感谢分享

谢谢分享

路过看看

谢谢分享

确有见解

感谢分享

我就看看

看看。。感谢分享。。。。