>Agnes,
>
>In that case I see but one solution: Hack the ClassLibs
>
>add a property to all your classes, eg TheApp
>
>Prior to building the app/exe have a program go through all the classes that are included in the project. (via Application.ActiveProject process FILETYPE_CLASSLIB)
>Set the property TheApp to someting useful to you and recompile the ClassLib
>
>Recompile all forms
>
>If it's worth the effort, this is
>
>
>
> oProject = Application.ActiveProject
>
> local i, t
>
> t = therm(oProject.Files.Count, 'Searching')
>
> for i = 1 to oProject.Files.Count
> obj = oProject.Files.Item(i)
>
> =t.Update(i, obj.Name)
> if( obj.Type == FILETYPE_CLASSLIB )
> =ProcessFile(obj)
> endif
> endfor
>
Gregory,
that is a way. Could use my project hook to do this. But I guess it is'nt worth the effort. (It is for error report. Don't want "unexpected" errors anyway.)
Agnes
Words are given to man to enable him to conceal his true feelings.
Charles Maurice de Talleyrand-Périgord
Weeks of programming can save you hours of planning.
OffThere is no place like [::1]