Уважаемый Plex, Вы со всеми клиентами строите диалог подобным образом? Я не буду выкладывать ваши "информативные" ответы на мой вопрос. Отмечу лишь, что просто потерял 2 дня зря, видимо данная функция плохо документирована. Спасибо SK - предложил самый лучший способ - использовать OLE, но этот вариант для меня не подошел, а вот установить Poratable Perl и написать скрипт для разбора одного текстового файла и формирования *.chp файла по образцу оказалось по факту быстрее.
Скрипт приведу ниже, может кому-то пригодится. Колонки в исходном файле разделены табуляцией. FF - исходный CSV файл, FT - файл контрольных точек Автограф. При формировании исходного файла координаты были получены с запятыми. Нужно заменить их на точки, споткнулся и на этом.
Код:
|
#! /bin/usr/perl
open(FF,"<pts2.txt") or die "Ошибка открытия файла: $!";
open(FT,">pts.chp") or die "Ошибка открытия файла: $!";
while(<FF>)
{
chomp;
@str = split (/\t/, $_);
print(FT "Name=скв.№ @str[2] @str[3] \nPExt=(@str[0] @str[1] R25)\nAtrc=32768\nPrms=0,-1,0,0\n");
}
close(FT) or die $!;
close(FF) or die $!; |