|
||
| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны | Справка по форуму | Файлообменник | |
|
Поиск в этой теме |
11.06.2017, 17:48 | #1 | |
Проблема с чтением данных xData в программе на Delphi
Регистрация: 20.01.2012
Сообщений: 12
|
||
Просмотров: 3493
|
|
||||
КЖ; C# Регистрация: 03.11.2005
Санкт-Петербург
Сообщений: 2,588
|
ИМХО, справка исчерпывающе отвечает на этот вопрос
http://help.autodesk.com/view/ACD/20...D-6915B6B98426 Вы код покажите и напишите что Вы хотите получить. |
|||
|
||||
Регистрация: 20.01.2012
Сообщений: 12
|
Да собственно ничего сверхестественного.
var BlokName, RetVal, DataTypeOut, DATA_VALOut: OLEVariant; Begin BlokName := frBase.D_LIST_BLOKID_OBJECT.Value; // Беру значение ObjectID из предварительно выбранных блоков RetVal := Acad.ActiveDocument.ObjectIDToObject(BlokName); // Получаю ссылку на объект RetVal.GetXData ('*', DataTypeOut, DATA_VALOut); // Пытаюсь получить расширенные данные соответствующего блока // Дальше пытался получить данные, но поскольку ничего не получается то решил получить хоть что-то. ShowMessage (VarToStr(DataTypeOut) + ' & ' + VarToStr(DATA_VALOut)); End; На месте параметров DataTypeOut и DATA_VALOut подставлял и просто переменные и массивы ничего не дает. Сначала думал что процедура возвращает массив данных типа DataTypeOut (i), но пишет что не верно. Потом предположил просто длинная строка с перечислением строковых переменных, тоже не проходит. Хотя данные по SetXData все легло нормально и ExpressTools проверил. Все время возвращает пустоту. А основная идея в том что программно вставляя блоки в рисунок присваиваются данные строк для формирования спецификации, соответственно при выборки блоков эти данные берутся из чертежа. Но вот застрял на этой процедуре. Всего 7 переменных из них только одна Integer остальные String. |
|||
|
||||
КЖ; C# Регистрация: 03.11.2005
Санкт-Петербург
Сообщений: 2,588
|
Цитата:
Цитата:
Вы не привели код, как задаете XDate, однако попробуйте не задавать имя приложения (null) и посмотрите что там возвращается. |
|||
|
||||
Регистрация: 20.01.2012
Сообщений: 12
|
Звездочка говорит о том что пофигу какое приложение, но я пробовал и без неё. Результат тот же. Я и не задавал имя приложения нулл. С именем приложения я тоже пробовал. Просто оно у меня написано русскими буквами подумал что может быть из-за этого. Впрочем, попробую аглицкими, может получится.
----- добавлено через ~13 мин. ----- Все. Вопрос снят. Заработало. Вот что значит сторонний взгляд. Спасибо за помощь. Тут просто наложилось два косяка, и видимо звездочка не дает статус 'читать все' как я предполагал. |
|||
|
Опции темы | Поиск в этой теме |
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Что изменить в программе под Компас 7 для работы в 15 Компасе. (delphi) | reanimatoring | Программирование | 1 | 12.04.2015 20:41 |
Проблема с выводом на печать чертежей, содержащийх подрезанные растровые изображения (AutoCAD 2009LT) | GazRust | AutoCAD | 13 | 27.06.2014 10:51 |
Проблема с восстановлением и привязкой базы данных СПДС 6 в Win7х64 | Silent77 | ПО от CSoft | 1 | 15.10.2010 06:57 |
Проблема с базой данных в VETCADe | Saleh-07- | Расчетные программы | 2 | 23.09.2010 09:46 |
Проблема переноса данных из Credo в AutoCad | mikola1977 | AutoCAD | 4 | 03.06.2009 13:59 |