One class for each module

[José M. C. Quintas]

Can I create Private Class? Or a class relative to an module?

An first use could be to store module variables.

But perhaps could be more than this.

Could too many classes makes EXE crash?

 

Private Create Class ThisForm

  Data Code

  Data Name

  Data Address

  Data City

  Data GetList

EndClass

 

Procedure FormP010

 

FormP0010 := ThisForm()

FormP0010:Code := 1

FormP0010:Name := “X”

FormP0010:Address := “X”

FormP0010:City := “X”

 

José M. C. Quintas

[Maurizio la Cecilia]

Hi,
try to declare

CREATE CLASS ThisForm STATIC

This way the class is accessible only in the prg containing the class declaration.
It is possible to declare STATIC classes with the same symbolic name in different PRG files.
Maybe this could help you.
Best regards.
Maurizio

Il 01/06/2012 23:43, Jos� M. C. Quintas ha scritto:

Can I create Private Class? Or a class relative to an module?

An first use could be to store module variables.

But perhaps could be more than this.

Could too many classes makes EXE crash?

�

Private Create Class ThisForm

� Data Code

� Data Name

� Data Address

� Data City

� Data GetList

EndClass

�

Procedure FormP010

�

FormP0010 := ThisForm()

FormP0010:Code := 1

FormP0010:Name := �X�

FormP0010:Address := �X�

FormP0010:City := �X�

�

Jos� M. C. Quintas

--
You received this message because you are subscribed to the Google
Groups "Harbour Users" group.
Unsubscribe: harbour-user...@googlegroups.com
Web: http://groups.google.com/group/harbour-users