TableAddCellEvent does not work correct
-
-
- Offizieller Beitrag
The text should go into the first column and in my test it does.
Code
Alles anzeigenprocedure TWPMiniEd.TableAddCellEvent(RowNr, ColNr: Integer; par: TParagraph); begin // 1 based ! if ColNr = 1 then begin par.SetText(RowNr.ToString); end; end; procedure TForm1.Button3Click(Sender: TObject); begin WPRichText1.TableAdd(3,5,[], nil, TableAddCellEvent ); WPRichText1.ReformatAll(true,true); end;