<< Click to Display Table of Contents >> Navigation:  Programming > Printing and PDF Export > Label Priniting > Example Project > Change of column count or row count

procedure TForm1.ColumnCountChange(Sender: TObject);

begin

 WPRichText1.RTFData.LabelDef.ColumnCount := ColumnCount.Value;

 WPRichText1.RTFData.LabelDef.RowCount := RowCount.Value;

// Read

 LabelWidth.SetValueAsInchOrCM( WPRichText1.RTFData.LabelDef.LabelWidth, UseInch);

 LabelHeight.SetValueAsInchOrCM( WPRichText1.RTFData.LabelDef.LabelHeight, UseInch);

 

 StoreProps;

 WPRichText1.ReformatAll(true, true);

end;