` Printed Icetips Article

Icetips Article



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



Printed December 4, 2024, 3:02 am
This article has been viewed/printed 35422 times.
Google search has resulted in 6 hits on this article since January 25, 2004.