On Sunday 29 June 2014 15:09:37 liuzg2 wrote:
> but this promble is still
> why ?
>
> > procedure tmainfo.exec(const sender: TObject);
> > var
> > pclass : TPersistentClass;
> >
> > psexec: TPSScript ;
> > begin
> >
> >
> > pclass := getclass('TPSScript');
> > if assigned( pclass ) then //
> > begin
> > psexec:= TPSScript.Create(self) ;
> > // a.show;
> > end;
> > end;
> >
> > last
> > assigned( pclass )
> > is false
Probably because classes.registerclass*() instead of mclasses.registerclass*()
has been called in PS-Library.
Martin
------------------------------------------------------------------------------
Open source business process management suite built on Java and Eclipse
Turn processes into business applications with Bonita BPM Community Edition
Quickly connect people, data, and systems into organized workflows
Winner of BOSSIE, CODIE, OW2 and Gartner awards
http://p.sf.net/sfu/Bonitasoft
_______________________________________________
mseide-msegui-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk