Login
Templates, Tools and Utilities
for Clarion Developers
Templates, Tools and Utilities
|
||
|
|
|
Add a comment to an Icetips ArticlePlease add your comments to this article.
Please note that you must provide both a name and a valid email address in order
for us to publish your comment. Comments are moderated and are not visible until they have been approved. Spam is never approved!
Back to article list Search Articles Add Comment Printer friendly Direct link ABC: Derive FileManager object 2002-11-25 -- Jim Gambon Newsgroups: softvelocity.products.c55ee
Hi Klaus,
> Why cant I move it to the derived class ?
> (changing Filemanager to MYfilemanager ofcourse)
I ripped the attached out of a FileManager derived class that I wrote for
something else. Just toss it in the LibSrc directory and refresh the ABC
Classes.
What I hate about the ABC global template is the I cannot "type" the new
Filemanager name in the field. I have to pick it out of the list, which
means the derived FileManager HAS to go in the LibSrc directory. For most
cases I need this derived FileManager for one particular project. I would
like to be able to put the MyFileManager class in the project directory and
have the compiler pick it up.
Sometimes I do this anyway. One copy of a roughed in derived class goes in
LibSrc, and then the real copy (which may be different for each project)
goes in the project directory. The app generator is satisfied by the one in
LibSrc, and the compiler grabs the real one in the project directory. PITA,
but it works.
Fond regards,
Jim Gambon
Include file (MyFileM.INC):
!ABCIncludeFile
OMIT('_EndOfInclude_',_MyFileClassPresent_) ! Omit this if already compiled
_MyFileClassPresent_ EQUATE(1)
INCLUDE('ABFILE.INC'),ONCE
INCLUDE('ABUTIL.INC'),ONCE
MyFileManager
CLASS(FileManager),TYPE,MODULE('MyFileM.CLW'),LINK('MyFileM.CLW',_ABCLinkMode_),DLL(_ABCDllMode_)
SQL PROCEDURE(String SQLStr),BYTE,PROC,VIRTUAL
END !MyFileManager
! _EndOfInclude_
Code file (MyFileM.CLW)
MEMBER
MAP
END
INCLUDE('MyFileM.INC'),ONCE
MyFileManager.SQL PROCEDURE(String SQLStr) ! ,BYTE,PROC,VIRTUAL
ReturnValue BYTE
CODE
! Do your stuff
RETURN ReturnValue
Today is December 3, 2024, 11:58 am This article has been viewed 35421 times. Google search has resulted in 6 hits on this article since January 25, 2004.
|
|