uniGUI学习之UniStringGrid(35)

2020-04-15 16:00:26来源:博客园 阅读 ()

新老客户大回馈,云服务器低至5折

请问uniListBox如何调整某行内容的字体颜色

用一个只有一列的UniStringGrid代替

  object UniStringGrid1: TUniStringGrid
    Left = 312
    Top = 58
    Width = 320
    Height = 240
    Hint = ''
    FixedCols = 0  //这里重要
    FixedRows = 0 //这里重要
    ColCount = 1  //这里重要
    Options = []   //这里重要
    Columns = <>
    OnDrawCell = UniStringGrid1DrawCell
  end

 

procedure TMainForm.UniStringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
var Value: string; Attribs: TUniCellAttribs);
begin
 if ARow = 3 then
 begin
//前端显示   两者只能先一个
 Attribs.Font.Color:=clred;
 Attribs.Font.Size:=20;
 Attribs.Font.Name:='楷体';
  Attribs.Font.Style:=[fsBold, fsItalic];
 end;
//背景边框    两者只能先一个
Attribs.Style.Style := 'border: 2px solid green;border-radius: 5px 5px 5px 5px;-moz-border-radius: 5px 5px 5px 5px;background-color: rgb(0,255,255) !important'   // 直接定义样式,分号格开,但最后不要分号
Attribs.Style.Cls := 'myStyle1'  // style is defined in file "files/mycss.css"
end;

 


原文链接:https://www.cnblogs.com/tulater/p/12706488.html
如有疑问请与原作者联系

标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇:uniGUI之主窗口折叠UI之UniTreeMenu(32-2)

下一篇:Delphi对接快递单的md5函数