freepascal.ru

Всем доброго. Понадобилось выполнить сортировку в Libre Office по колонке.
Подобрал следующий код:

Код: Выделить всё

var  range,fields,unoWrap,sortDx:Variant;
begin
range:=Sheet.getCellRangeByName('C2:C135');
fields:=VarArrayCreate([0, 0], varVariant);
fields[0]:=StarOffice.Bridge_GetStruct('com.sun.star.table.TableSortField');
fields[0].Field:=7;
fields[0].IsAscending:=1;
unoWrap:=StarOffice.Bridge_GetValueObject();
unoWrap.Set('[]com.sun.star.table.TableSortField', fields);
sortDx:=range.createSortDescriptor();
sortDx[0].Name = 'ContainsHeader';
sortDx[0].Value = 1;
sortDx[3].Name = 'SortFields';
sortDx[3].Value = unoWrap;
range.sort(sortDx);
end;

Лазарус ругается на unoWrap.Set

unit1.pas(67,10) Fatal: Syntax error, "identifier" expected but "SET" found

Паскаль 2.6.4.
Посоветуйте как убедить Паскаль, что это имя метода а не зарезервированное слово.

Виталий писал(а):unoWrap.Set('[]com.sun.star.table.TableSortField', fields);

unoWrap.&Set(...);

Любопытно... А откуда такой финт?
Это где-то описано почему так в фришке сделано?

Виталий писал(а):Это где-то описано почему так в фришке сделано?

Не знаю как давно (нашёл, в 2.5.1) эта возможность появилось в FPC, но в дельфях оно существует очень давно (в 2006 точно есть, но скорее всего появилась в 2005) и появилась, как раз, для разруливания подобных ситуаций, т.е. когда идентификатор совпадает с ключевым словом. Для FPC написано тут.

Вау! Вот уж век учись
Никогда не использовал (и не встречал) в именах резервированки, потому сейчас у меня выражение лица типа -
Спасибо. Все получилось. Сортировка удалась