Module BaseClass (Module as Object)

[mk-soft]

Ok.
i have changed my example

[step11]

Great !! Thanks for your code.
Than what's your next plan?what about implementing multi interfaces? or even IDispatch interface?

[mk-soft]

It should not make any more difficult to create these ones.
For multiinterfaces only in QueryInterface has to call from another module the function New().

The function number and the name as key are already stored for IDispatch. Own Debuggerfunction ShowInterface.
However, the parameter list must still be stored.

But use less with Windows...

[mk-soft]

Update v1.27
- Bugfix BaseClass as DLL: Macros created codes as procedure encapsulated because on some Windows 7 machine crashed
- Code cleanup, some internal name changed

[mk-soft]

Update v1.28
- Changed internal class management because of the rules for creating DLLs

[mk-soft]

Update v1.29
- Dispose object work now revers
- Save LinkedList Initialize object and Dispose object over Mutex
- Added global ObjectCounter over all Classes

[mk-soft]

Update v1.31
- Spelling Correction: Initalize -> Initialize

Sorry, I did not notice it until ...

Correct your own projects with 'Search and Replace'.

[Kwai chang caine]

Spelling Correction: Initalize -> Initialize

I have spent a long time to understand the error is always in the above code
Nice works, thanks for sharing

[mk-soft]

Thanks

I have now update example 9. We need threadsafe.

Code: Select all

CompilerIf #PB_Compiler_Thread = 0
  CompilerError "Use compiler option theadsafe"
CompilerEndIf

P.S. Now updated all examples

[mk-soft]

Update v1.32
- Change internal Initialize and Dispose from list to array to avoid thread blocking
- Added small version of BaseClass. 'Modul_BaseClassSmall.pb'

[mk-soft]

BaseClass small version

Update v1.05
- Now compatible to extended version
+ Macro AsNewMethode, Macro CloneObject

Still the smallest code for creating objects

[mk-soft]

Update small v1.07 and advance v1.33
- bugfix FreeMutex

[Andre]

If I will ever use "OOP-style" code for programming in PureBasic, then I start with this nice piece of code...
Thank you

[mk-soft]

New version of small version

Update v1.09r3
- Map of classes encapsulated
- Check of the new class in procedure 'AddClass(...)' extended
- Change Macros because map of classes not longer global
- Change CheckInterface. Parameter is not longer required
- Name of classes not longer case sensitive (no case)

[mk-soft]

Update v1.10
- Change ClassName Management.

The module name is no longer the internal class name.
This means that the interface name is now specified for inheritance, and not the module name.
Is therefore more logical.