【DrawDTText】

1. Inputs:
   
2.      SymText(StringSimple),
   
3.      SDate(NumericSimple),
   
4.      STime(NumericSimple),
   
5.      SymPrice(NumericSimple),
   
6.      SymColor(NumericSimple),
   
7.      BgColor(NumericSimple),
   
8.      SymSize(NumericSimple),        // 8
   
9.      SymFont(StringSimple),         // "Wingdings 3"
   
10.      AlignHoriz(NumericSimple),     // -1
    
11.      AlignVert(NumericSimple),      // 0
    
12.      Border(TrueFalseSimple);
    
13. 
    
14. //DrawDTText(SymText,SDate,STime,SymPrice,SymColor,BgColor,SymSize,SymFont,AlignHoriz,AlignVert);
    
15. 
    
16.    value1 = Text_New (SDate,STime,SymPrice,SymText);
    
17.    if SymColor > 0 then begin text_setcolor(value1,SymColor); end;
    
18.    //if AlignHoriz > -1 or AlignVert > -1 then begin
    
19.    text_setstyle(value1,AlignHoriz,AlignVert);
    
20.    //end;
    
21.    if SymFont <> "" then begin text_setfontname(value1,SymFont); end;
    
22.    if SymSize > 0 then begin text_setsize(value1,SymSize); end;
    
23.    if(BgColor > -1) then begin text_setbgcolor(value1,BgColor); end;
    
24.    if Border then begin text_setborder(value1,Border); end;
    
25. 
    
26.    
    
27. 
    
28. DrawDTText = value1;

复制代码