Ok, thanks. I guess I'll just have to fudge it and parse the Python/Perlscript myself looking for functions/subroutines until this if fixed (if it ever is!)
I have managed to get AcivePerl working with the script control though.. Cheers, Lee ----- Original Message ----- From: "Andrew Powell" <[EMAIL PROTECTED]> To: "Lee" <[EMAIL PROTECTED]> Sent: Tuesday, April 27, 2004 4:04 PM Subject: Re: MSScriptControl & ActivePython > What I had discovered, was that with both the win32all extensions from > python.org AND ActivePython, the Procedures class is not implemented. This > goes for ActivePerl as well (which I still haevnt been able to get working > with the scriptcontrol). Youll have to catch the exception which occurs if > you call a procedure in the script which doesnt exist. > > That was my solution (and was easy to implement in .net) > > ----- Original Message ----- > From: "Lee" <[EMAIL PROTECTED]> > To: <[EMAIL PROTECTED]> > Sent: Monday, April 26, 2004 11:25 PM > Subject: Re: MSScriptControl & ActivePython > > > > No luck; I even tried Modules[1] and it gives the same error. > > > > I'm using the information here btw: > > > > http://www.microsoft.com/mind/0799/script/script.asp > > > > ----- Original Message ----- > > From: "DogWalker" <[EMAIL PROTECTED]> > > To: <[EMAIL PROTECTED]> > > Sent: Tuesday, April 27, 2004 2:43 PM > > Subject: Re: MSScriptControl & ActivePython > > > > > > > > > > ----- Original Message ----- > > > From: Lee > > > To: [EMAIL PROTECTED] > > > Sent: Monday, April 26, 2004 7:26 PM > > > Subject: MSScriptControl & ActivePython > > > > > > > > > Hi, > > > > > > I'm adding Python and PerlScript support to my Delphi application and am > > > having trouble with retreiving the names of the functions/pocedures in a > > > chunk of code. The following code works perfectly for VBScript and > > > Javascript but it gives an OleException whan accessing the Count > property > > of > > > the Procedures object with Python and PerlScripts: > > > > > > with ScriptObject.ActiveXScriptControl.Modules['Global'] do begin > > > for Loop := 1 to Procedures.Count do begin // ***EOLEException > ON > > > THIS LINE*** > > > if (Procedures[Loop].HasReturnValue) and not > > > (Procedures[Loop].Name[Length(Procedures[Loop].Name)] = '_') then begin > > > StringList.Add(Procedures[Loop].Name); > > > end; > > > end; > > > end; > > > > > > The ActiveXScriptControl object is a standard MS Script Control object. > > > > > > Does anyone know what the problem might be? Perhaps the 'Global' module > > does > > > not exist for Perl/Python scripts? If this is the case, what should be > > used > > > here instead? > > > ---------------------------------------- > > > iirc, you can either add a module or use "__main__". > > > > > > _______________________________________________ > > > ActivePython mailing list > > > [EMAIL PROTECTED] > > > To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs > > > Other options: > > http://listserv.ActiveState.com/mailman/listinfo/ActivePython > > > > > > > > > > > > _______________________________________________ > > ActivePython mailing list > > [EMAIL PROTECTED] > > To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs > > Other options: > http://listserv.ActiveState.com/mailman/listinfo/ActivePython > > > > > > _______________________________________________ ActivePython mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs Other options: http://listserv.ActiveState.com/mailman/listinfo/ActivePython
