Докомпиляция интерфейса

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

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

Ответить
NAIL
Сообщения: 18
Зарегистрирован: 31 янв 2006, 17:45

Докомпиляция интерфейса

Сообщение NAIL »

Есть интерфейс :

Interface Sampl;
create view as select * from x$users;
browse SB;
fields
xu$loginname;
xu$fullname;
end;
datastream SS
(
table x$users
(
[lgn] xu$loginname;
[nnm] xu$fullname;
);
)
end;
handleEvent
cmInit:
RunFReport(SS,'‘ЇЁб®Є Ї®«м§®ў вҐ«Ґ©',false);
end;
end.


Компилирую его в свой ресурс, который зарегистрирован в Support как пользовательский.

Затем есть еще вот это :

#Component "Z_STAFF"
const
cmIface = 3001;
end
alter interface ReceptionMain
var menuID_ni:longint;
create view;
HandleEvent
cmHotKeys:
{
menuId_ni := LoadMenu('z_staff::RECEPTOINMENU');
AddMenuItem (menuID_ni,'********‚бв ўЄ  ¬Ґ­о*********',cmIface);
PutHotCommand(RunLoadMenu(menuID_ni));
}
cmIface:
{
RunInterface('Nail::Sampl');
}
end;
end.

Это компилирую в другой интерфейс.

Стартую Галактику. Она говорит, что в ресурсе не находит RECEPTOINMENU.
Помогите !!! Пожалуйста !!! Что ей еще надо ?!!! Заранее всем спасибо !
BlazeBio
Местный житель
Сообщения: 386
Зарегистрирован: 27 апр 2010, 14:31
Контактная информация:

Re: Докомпиляция интерфейса

Сообщение BlazeBio »

Попробуйте такое:

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

#define ComponentVersion
#ifdef ComponentVersion
#Component "Z_STAFF"
#end
const
cmIface = 3001;
end
alter interface ReceptionMain
//-----------------------------------
KATZ
Местный житель
Сообщения: 473
Зарегистрирован: 29 мар 2005, 17:49

Re: Докомпиляция интерфейса

Сообщение KATZ »

NAIL писал(а):Стартую Галактику. Она говорит, что в ресурсе не находит RECEPTOINMENU.
Может, нужно просто название поправить на ReceptionMenu?
NAIL
Сообщения: 18
Зарегистрирован: 31 янв 2006, 17:45

Re: Докомпиляция интерфейса

Сообщение NAIL »

KATZ !!!!! С П А С И Б О !!! Просто иногда глаз "замылится". Кажется, что все красиво. Еще раз огромное спасибо !
Ответить