Wraptext and BorderTopStyle

[etwoss]

Hi

Changed all old code to cmdFormat code except:

Code: Select all

      R := FSheet.Range.Items[FFirstColumn + i, FCurrentRow, FFirstColumn + i, FCurrentRow];
      R.WrapText := True;
      R.VertAlignment := cvaTop;

      R := FSheet.Range.Items[FFirstColumn + i, FCurrentRow, FFirstColumn + i, FCurrentRow];
      R.BorderTopStyle := cbsThin;
      R.BorderTopColor := clBlack;

How can i do this using cmdFormat. Could not find it in example

Eric

[larsa]

Hello

Example

Code: Select all

  XLS.CmdFormat.Alignment.WrapText := True;
  XLS.CmdFormat.Alignment.Vertical := cvaTop;

FormatCells sample explains how to format borders.