Documentación de Gambas

¡Precaución! La página no está traducida. Véase la versión inglesa

NEW

Object = NEW Class [ ( Constructor parameters... ) ] [ AS Name ]

Instantiates the clase Class.

If a name is specified, the new objeto will be able to raise events by calling a public procedure or function in its "parent".

This parent, or default evento observer, is the objeto or clase where the new objeto is instantiated.

The name of this evento handler is the name of the objeto followed by an underscore and the name of the evento.

If you forget to specify the Name part, your object will never raise events!

NEW is not an operator. You can only use it within an assignment.

But you can use the Object.New function instead.

Common event handlers

Two different objects can have the same evento name. Thus, you can manage events of multiple objects in the same event procedure, provided these objects raise the same events.

This feature is used by the IDE for implementing the Group propiedad.

Ejemplo

hButton = NEW Button(ME) AS "MyButton"
...
PUBLIC PROCEDURE MyButton_Click()

PRINT "My button was clicked !"

END

' This example creates 9*9*9 small textboxes to which can be accesses through the
' public Object[] array objIsImpossible

PUBLIC bIsInitialised AS Boolean
PUBLIC objIsImpossible AS Object[]

PUBLIC SUB Form_Open()

DIM iR AS Integer
DIM iR2 AS Integer
DIM iC AS Integer
DIM iC2 AS Integer
DIM iDigit AS Integer
DIM iX AS Integer
DIM objTextBox AS TextBox

IF NOT bIsInitialised THEN
  objIsImpossible = NEW Object[] ' Need to create the array
  iX = 0
  FOR iR = 0 TO 8
    FOR iC = 0 TO 8
      FOR iDigit = 0 TO 8
        iR2 = iDigit MOD 3
        iC2 = iDigit / 3
        objTextBox = NEW TextBox(ME) ' create the next of the 9*9*9 TextBox -es
        objTextBox.X = (iR * 3 + iR2) * 12 + 2
        objTextBox.y = (iC * 3 + iC2) * 12 + 2
        objTextBox.Width = 10
        objTextBox.Height = 10

        objIsImpossible.Add(objTextBox, iX)

        iX = iX + 1
      NEXT '  iDigit
    NEXT '    iC
  NEXT '      iR
ENDIF

END

Dynamic instanciation

Object = NEW ( ClassName [ , Constructor parameters... ] ) [ AS Name ]

That second syntax allows to specify the clase name dynamically as a string.

Ejemplo

' This creates an 3x3 array of float.
DIM MyArray AS NEW Float[3, 3]
' And this too
DIM MyArray AS Object
DIM MyClassName AS String
MyClassName = "Float[]"
MyArray = NEW (MyClassName, 3, 3)

Véase también

Gestión de Objetos y Clases, Gestión de Eventos, Object.New, El Modelo de Objetos de Gambas