помогите разобраться с ArcViewShapeFile.dll

0 голосов
спросил 29 Авг, 06 от Nord1 (160 баллов) в категории Программные продукты Esri
 Добрый день, уважаемые коллеги.
 
 Пытаюсь использовать указанную библиотеку, внимательно читаю документацию, но не могу понять, как с ее помощью создать новый shape.
 
 Среда разработки Delphi 7.0, исходный код:
 
procedure CreateShape;
var
  MyNewShape: _ShapeFiles;
  I: TOleEnum;
  HelpOle: OleVAriant;
begin
  CoInitialize(nil);
  MyNewShape := CreateComObject(CLASS_ShapeFiles) as _ShapeFiles;
  MyNewShape.OpenShape('Shp\X.shp', shpCreate, shpPoint);
  MyNewShape.ShapeFields.CreateField('TEST', shpInteger, 2, 1);
  HelpOle := 1;
  MyNewShape.AppendFieldDefs;
  MyNewShape.ShapeFields.Item[HelpOle].Value := HelpOle;
  MyNewShape.MoveNext;
  MyNewShape.CreateShape; // ОШИБКА (run-time)! Invalide procedure
                                               // call or argument
end;
 
 Спасибо за ответы. Другие корректные замечания по коду принимаются с благодарностью.

1 Ответ

0 голосов
ответил 06 Сен, 06 от Nord1 (160 баллов)

Хм... жаль, что нет ответов... Cry может я не в тот раздел запостил???

(может кто-нибудь поможет, а? совсем плохо с пониманием вопроса... а работа нужная)
Добро пожаловать на сайт Вопросов и Ответов, где вы можете задавать вопросы по GIS тематике и получать ответы от других членов сообщества.
...