Identifier Redeclared
Здравствуйте, помогите если кто знает
в скрипре написана процедура
в прграмме вызываю ее из обработчика нажатия кнопки, работает нормально,
а если из обработчика IdTCPServer1Execute(AThread: TIdPeerThread); то выдает ошибку identifier redeclared Command_parser
причем ошибка вылазиет при выполнении fsScript1.Compile
код такой
в скрипре написана процедура
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);
Комментарии
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