Identifier Redeclared

отредактировано 22:12 Раздел: FastScript
Здравствуйте, помогите если кто знает

в скрипре написана процедура
procedure Command_parser(com:string);


в прграмме вызываю ее из обработчика нажатия кнопки, работает нормально,
а если из обработчика IdTCPServer1Execute(AThread: TIdPeerThread); то выдает ошибку identifier redeclared Command_parser
причем ошибка вылазиет при выполнении fsScript1.Compile

код такой
                      if fsScript1.Compile then
                      fsScript1.CallFunction('Command_parser',VarArrayOf([z]))
                      else
                      ShowMessage(fsScript1.ErrorMsg);

Комментарии

  • отредактировано 22:12
    дело было в том что IdTCPServer1Execute открывает несколько потоков при приеме, и эти несколько потоков пытались одновременно скомпилировать скрипт
  • CazzoCazzo Россия
    отредактировано 22:12
    При попытке компиляции ZComponentDesign.dpk выдало:
    Error ZPropertyEditor.pas452: Undeclared identifier: GetSequences
    Error ZPropertyEditor.pas465: Undeclared identifier: GetSequences
    Fatal Error ZComponentDesign.dpk37: Could not compile used unit ....srccomponentZPropertyEditor.pas

    Стр. 452:
    ResultSet := Metadata.GetSequencesCatalog, Schema, ;
    Стр. 465:
    ResultSet := Metadata.GetSequencesConnection.Catalog, , ;

    Что делать?

    ZEOSDBO-6.6.1-beta, Delphi 7, WinXP_sp2

Оставить комментарий

Многофункциональный текстовый редактор. Чтобы отредактировать стиль параграфа, нажмите TAB, чтобы перейти к меню абзаца. Там вы можете выбрать стиль. По умолчанию не выбран ни один стиль. Когда вы выберете текст, появится встроенное меню форматирования. Нажмите TAB, чтобы войти в него. Некоторые элементы, такие как многофункциональные вставки ссылок, картинок, индикаторов загрузки и сообщений об ошибок могут быть вставлены в редактор. Вы можете перемещаться по ним, используя стрелки внутри редактора и удалять с помощью клавиш delete или backspace.