Опять проблема с ExtAttr

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

edd
Постоянный обитатель
Сообщения: 170
Зарегистрирован: 29 мар 2005, 17:49

Сообщение edd »

А ресы у вас все подключены?
Уверенно говорю, что да.

2Masygreen eddi@ap-plastic.ru.
edd
Постоянный обитатель
Сообщения: 170
Зарегистрирован: 29 мар 2005, 17:49

Сообщение edd »

не понятно где вы там его подключили в rtf скорей всего после .linkform
для этого вообще то есть
.declare
#include ....
.end ( не помню уже что в конце)
я его подключал и просто как #include ExtAttr.vih и в .declare .enddeclare
edd
Постоянный обитатель
Сообщения: 170
Зарегистрирован: 29 мар 2005, 17:49

Сообщение edd »

сделайте ошибку в extattr
Сделал. Компилятор пропустил, т.е. вообще ничего не сказал и рес не скомпилился. Компилил и vih подключил строго в проекте. И какую ошибку многих я повторяю?
А в VIP_RES.LOG ничего нет ?
Вообще ничего. Он пустой.
Последний раз редактировалось edd 30 окт 2008, 10:42, всего редактировалось 1 раз.
Алексей
Местный житель
Сообщения: 2896
Зарегистрирован: 24 июн 2005, 12:12
Откуда: Иркутская область

Сообщение Алексей »

не делаете дефайн

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

#define ComponentVersion
для ФРМок - напишите в проекте.
edd
Постоянный обитатель
Сообщения: 170
Зарегистрирован: 29 мар 2005, 17:49

Сообщение edd »

Алексей писал(а):не делаете дефайн

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

#define ComponentVersion
для ФРМок - напишите в проекте.
Дефайн в проекте отключил, не помогло. ФРМ и РТФ копилю в проекте
Алексей
Местный житель
Сообщения: 2896
Зарегистрирован: 24 июн 2005, 12:12
Откуда: Иркутская область

Сообщение Алексей »

edd приношу извинения, я неверно написал.

Наоборот "НУЖНО ДЕЛАТЬ ДЕФАЙН" componentversion для галактики 8.10!!! Т.к. в ВИХ файлах стоят конструкции #ifdef ComponentVersion
Заработалсо :?
edd
Постоянный обитатель
Сообщения: 170
Зарегистрирован: 29 мар 2005, 17:49

Сообщение edd »

Алексей
Тогда я уточню - дефайн надо прописать в файле проекта?

Т.е. prj должен выглядеть так:

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

#define ComponentVersion
#include ExtAttr.Vih
#make "EDD_3_SERTIFONTARA_test.rtf"
Алексей
Местный житель
Сообщения: 2896
Зарегистрирован: 24 июн 2005, 12:12
Откуда: Иркутская область

Сообщение Алексей »

Да, дефайн в проекте.

в РТФе надо инклюдить ExAttr.vih

.declare
#include ExtAttr.Vih
.enddeclare

дальше в Варах уже объявлять переменную типа
var
ExtAttr : iExtAttr new;
Masygreen
Местный житель
Сообщения: 1089
Зарегистрирован: 04 сен 2008, 11:27
Откуда: Москва
Контактная информация:

Сообщение Masygreen »

Адрес напиши .. пришлю проект ...
Время ведет!
edd
Постоянный обитатель
Сообщения: 170
Зарегистрирован: 29 мар 2005, 17:49

Сообщение edd »

2Masygreen
Я написал выше :-)

eddi@ap-plastic.ru
edd
Постоянный обитатель
Сообщения: 170
Зарегистрирован: 29 мар 2005, 17:49

Сообщение edd »

2Алексей
А как же
vih подключаются только в проекте!
? Я понял так, что #include ExAttr.vih надо прописывать именно в файле проекта
Алексей
Местный житель
Сообщения: 2896
Зарегистрирован: 24 июн 2005, 12:12
Откуда: Иркутская область

Сообщение Алексей »

Для FCOMа по другому
http://support.galaktika.ru/galaxy.asp? ... ts=faqlist
там есть темка:
17.VIII.2006
- FCOM. Компиляция объектных интерфейсов.
edd
Постоянный обитатель
Сообщения: 170
Зарегистрирован: 29 мар 2005, 17:49

Сообщение edd »

Из последнего намученного: компилил уже в FCOM-е, компилит без ошибок. Но если в консоли управления, в компонентах найти ресурс, в который компилил, в нем заглянуть в объекты, то откроется журнал, в котором говорится что была "...Ошибка при создании объекта Класс не зарегистрирован".
Думаю, что настала пора привести весь код в студию.

Файл проекта:

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

#define ComponentVersion
#include galnet.ccm //константы событий
#include galnet.csc //константы статус-строк
#make "EDD_3_SERTIFONTARA.rtf"
Файл EDD_3_SERTIFONTARA.rtf:

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

.LinkForm ’edd_3_SertifOnTara_SHTRIH2_testing’ prototype is tovn
.NameInList ’3. Сертификат на тару исправленный, пробный’
.group ’Накладные на продажу’
.group ’Накладные на продажу (fast)’
.Group 'Рекламационные накладные'
.Group 'Акты на строительство'
#include fldcolor.inc //константы цветов 
#include gloconst.inc //Глобальные константы 
#include mark.inc //константы пометки
#include summa.frn 
#include ttnf_var.frn 
#include format.frn
.Set Filler = ’-’ 
.declare
#include ExtAttr.vih
.enddeclare
.var
  Nom          : Word;
  kolEnter    :string;
  GetRow    :boolean;
  GetTransp:boolean;
  NRec_MC :comp;
  getExtrAttr:iExtAttr; // ЕСЛИ ПИШУ iExtAttr NEW, ТО КОМПИЛЯТОР ВЫДАЕТ ОШИБКУ "ПЕРЕД ИМЕНЕМ ПЕРЕМЕННОЙ И ТИПОМ НАДО СТАВИТЬ ДВОЕТОЧИЕ!"
  sName_Det : string;
  sIndex_det : string;
  sTipCont : string;
.endvar
.Create view vSertificat 
......
.fields
.....
getExtrAttr.sGetAttr(coKatMC, vSertificat.SpSopr.cmcUsl,’АВТОВАЗ_НаименованиеДетали’)
....
.endfields
....
Файл iExtAttr.vih

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

#ifndef _ExtAttr_Func
#define _ExtAttr_Func
#end

#ifndef __XEXTRATTR
#define __XEXTRATTR
#end
	
#ifdef ComponentVersion 
#component "C_ExtClass"
#end

//**************************************************
#doc
Функции для работы с внешними атрибутами документов<br>
</brief>
 ......
#end
ObjInterface objExtAttr;

!------------------------------------------------------------------------
  #doc
  Набор функций для создания атрибута, получения ID, показа ошибки.<br>
  Возвращает ссылку на внешний аттрибут если существует, если не найден - создает.
  #end
  Function CreateAttr ( _wTable : word; _Name : string; _Type : word ) : comp ;
........
  #doc
  Набор функций для извлечения содержания внешних аттрибутов для различных типов<br>
  </brief>
  Функции возвращают значение внешнего аттрибута по коду таблицы, имени атрибута и nRec-ку записи
  для разных типов атрибута.<br>
  sGetAttr - возвращает строку для всех типов, преобразовав тип в строку<br>
  #end
  function sGetAttr (_wTable : word; _cRec : comp; _Name : string) : string;
......
End;
VipInterface iExtAttr implements objExtAttr;

Почему не создается объект в ресурсе и где ошибка в коде? :?
edd
Постоянный обитатель
Сообщения: 170
Зарегистрирован: 29 мар 2005, 17:49

Сообщение edd »

Да, при подключении реса форма цепляется, но выводится всё, кроме внешних атрибутов.
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5188
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Сообщение edward_K »

vSertificat.SpSopr.cmcUsl тоже вывлдится? и правильный?
Ответить