Ok das mit der Tabelle das passt dann mit der 9.2 - im Moment verhinder ich mal Tabelle in Tabelle
aber das mit dem löschen des ganzen TD Inhaltes bringe ich nicht zusammen
habe alle 4 Möglichkeiten probiert (+/+ +/- -/+ -/-) mit
fEditor.ProtectedProp := [ppAllExceptForEditFields];
fEditor.EditOptions := fEditor.EditOptions + [wpDontSelectCompleteField]; // hier + und -
fEditor.EditOptions := fEditor.EditOptions - [wpSelectCompleteFieldAlsoWhenInside]; // hier + und -
mein Editor wird per Code erzeugt und die Tabelle mit
procedure TForm20.Button2Click(Sender: TObject);
var
table : TParagraph;
row : TParagraph;
lastCell : TParagraph;
fieldo : TWPTextObj;
r : integer;
c : integer;
begin
table := fEditor.AddTable(1,1, TRUE);
table := fEditor.FindTable('');
for r:=1 to 5 do begin
row := table.AppendNewRow(true);
for c:=1 to 5 do begin
lastCell := row.AppendNewCell(TRUE);
lastCell.ASet(WPAT_COLWIDTH, 1000);
lastCell.ASetFontName('Courier New');
lastCell.ASet(WPAT_CharFontSize, round(9.5 * 100)); // 9.5pt
fieldo := lastCell.AppendNewObjectPair(wpobjMergeField, 'MERGEFIELD');
fieldo.Name := 'MERGEFIELD';
fieldo.Mode := fieldo.Mode + [wpobjWithinEditable];
end;
end;
// lastCell.ASet(WPAT_CharFontSize, round(fFieldPool[i].Font.Size * 100)); // 9.5pt
// ShowMessage('Editor Version : '+WPToolsVersion);
end;
Display More
dann kann ich mit TAb durch die Tabelle springen und alle TD's ausleeren mit einem Klick auf die Taste, wenn ich in die TD reinklicke dann geht das nicht