4.6.3.1 FillColor

FillColor procedure

Prototype:	procedure FillColor(const row1,col1,row2,col2 :integer; const Color :integer);
Description:	Sets background color of a range of cells.
Syntax:	xls.FillColor(row1,col1,row2,col2, Color);
	Part	Description
	xls	Variable declared as an instance of the TExcelWrapper class
	row1	Variable declared as integer that represents row number of the first cell in the range
	col1	Variable declared as integer that represents column number of the first cell in the range
	row2	Variable declared as integer that represents row number of the last cell in the range
	col2	Variable declared as integer that represents column number of the last cell in the range
	Color	Variable declared as integer that represents a color (as a conversion from RGB or predefined color)
Return value:	none

Example:

Var
  Row, Rows, Cols:integer;
  xls :TExcelWrapper;
Begin
  {document preparation}
  //...
  {managing worksheets}
  //...
  
  {------------------Formats-------------------}
  xls.AddUserFormat('Title_h1',14,'BOLD','0,0,0',0,0,'CENTER','CENTER',false);       
  xls.AddUserFormat('Title_h2',12,'','0,0,0',0,0,'CENTER','CENTER',false);
  
  {setting default cloumn width abd height}
  xls.SetDefaultColWidth(3500);
  xls.SetDefaultRowHeight(15);
  
  {setting cell values}
  //...  
  
  {formatting cells examples}
  xls.MergeCells(Row,1,Row,Cols);
  xls.DrawBorders(Row,1,Row,Cols,'BOTTOM','THIN');
  xls.SetTextOrientation(Row,1,Row,Cols,45);
  xls.FillColor(Row,1,Row,Cols,clOceanGreen); 
     
  xls.FormatCells(Row+1,1,Row+1,Cols,'BOLD',2,true,'RIGHT','CENTER');
  
  xls.Align(Row+3,1,Row+3,Cols,'LEFT','CENTER');

  {document saving / previewing}
  //...
End.