Страница 1 из 1

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

Добавлено: 20 авг 2010, 18:20
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.
Помогите !!! Пожалуйста !!! Что ей еще надо ?!!! Заранее всем спасибо !

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

Добавлено: 20 авг 2010, 18:41
BlazeBio
Попробуйте такое:

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

#define ComponentVersion
#ifdef ComponentVersion
#Component "Z_STAFF"
#end
const
cmIface = 3001;
end
alter interface ReceptionMain
//-----------------------------------

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

Добавлено: 20 авг 2010, 19:18
KATZ
NAIL писал(а):Стартую Галактику. Она говорит, что в ресурсе не находит RECEPTOINMENU.
Может, нужно просто название поправить на ReceptionMenu?

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

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