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:='楷体';
//
// end;
Attribs.Style.Style := 'border: 2px solid green'; // define a style directly
end;