Что не так?

corba

В скрипте пишу следующий текст:

var
  AItem:TMenuItem;
begin
  AItem := TMenuItem.Create(nil);
end.

В тексте программы регистрю классы TMainMenu и TMenuItem

with fsGlobalUnit do
begin
	fsScript.AddClass(TMainMenu, 'TMenu');
	fsScript.AddClass(TMenuItem, 'TComponent');
end;    // with

Однако при компиляции скрипта выводится сообщение:
"Incompatible types: 'Class TMenuItem', 'Class TMenuItem'".

Что не так?

AlexTZ

Вот это:

with fsGlobalUnit do
begin
AddClass(TMainMenu, 'TMenu');
AddClass(TMenuItem, 'TComponent');
end;

Класс Tmenu тоже надо зарегистрировать.

corba

Спасибо, все понятно.
Еще один вопрос - правильно ли я понимаю, что через published можно автоматически "закачивать" при регистрации только свойства класса, но не методы и их надо отдельно подключать?

AlexTZ

Все не-published свойства и все методы надо регистрировать вручную.