Gambas Documentation
Aperçu du Langage
À traduire
Code Snippets
Comment faire ...
Compilation et installation
Composants
Controls pictures
Derniers changements
Dépôt d'applications
Documentation de l'Environnement de développement
Documentation des développeurs
Documents
Indenter
Index de tous les Documents
Index du langage
#Else
#Endif
#If
+INF
-INF
Abs
Access
ACos
ACosh
Affectations
Alloc
AND
AND IF
Ang
APPEND
AS
Asc
ASin
ASinh
Asl
Asr
Assign
ATan
ATan2
ATanh
BChg
BClr
BEGINS
Bin$
Bool@
Boolean@
Boucle d'évènements
BREAK
BSet
BTst
BYREF
Byte@
CASE
CATCH
CBool
Cbr
CByte
CDate
Ceil
CFloat
Chemins de Fichiers & Répertoires
CHGRP
CHMOD
Choose
CHOWN
Chr$
CInt
CLASS
CLong
CLOSE
Collections Inline
Comp
CONST
Constantes du langage
CONTINUE
Conv$
COPY
Cos
Cosh
CREATE
CREATE PRIVATE
CREATE STATIC
CShort
CSingle
CStr
CVariant
Date
DateAdd
DateDiff
Day
DConv$
DEBUG
DEC
DEFAULT
Deg
Déclaration d'énumération
Déclaration d'évènement
Déclaration de constante
Déclaration de fonctions externes
Déclaration de méthode
Déclaration de propriété
Déclaration de structure
Déclaration de tableau
Déclaration de variable locale
Déclaration de variables
Déclaration Spéciale
DFree
DIM
Dir
DIV
DO
DOWNTO
ELSE
END
ENDIF
ENDS
END SELECT
END STRUCT
END WITH
ENUM
Eof
ERROR
ERROR TO
Eval
Even
EVENT
EXEC
Exist
Exp
Exp2
Exp10
Expm
EXPORT
EXTERN
External Function Management
FALSE
FINALLY
Fix
Float@
Floor
FLUSH
Fonctions de Localisation et Traduction
FOR
FOR EACH
Format$
Formats définis par l'utilisateur
Frac
Free
FUNCTION
Gestionnaires d'évènements globaux
GOTO
Hex$
Hour
Html$
Hyp
IF
IIf
IN
INC
INHERITS
INPUT
INPUT FROM
InStr
Int
Int@
Integer@
IS
IsAscii
IsBlank
IsBoolean
IsDate
IsDigit
IsDir
IsFloat
IsHexa
IsInf
IsInteger
IsLCase
IsLetter
IsLong
IsMissing
IsNaN
IsNull
IsNumber
IsObject
IsPunct
IsSpace
IsUCase
KILL
Labels
LAST
LCase$
Left$
Len
LET
LIBRARY
LIKE
LINE INPUT
LINK
LOCK
Lof
Log
Log2
Log10
Logp
Long@
LOOP
Lsl
Lsr
LTrim$
Mag
Max
ME
Mem$
MEMORY
Méthodes de comparaison
Méthodes spéciales
Mid$
Min
Minute
MkBool$#4
MkBoolean$
MkByte$#4
MkDate$
MKDIR
MkFloat$
MkInt$
MkInteger$
MkLong$
MkPointer$
MkShort$
MkSingle$
MOD
Month
MOVE
NEW
New
NEXT
NOT
Now
NULL
Odd
OPEN
Opérateurs arithmétiques
Opérateurs d'affectation
Opérateurs de chaînes de caractères
Opérateurs logiques
OPTIONAL
OR
Ordre d'évaluation des opérateurs
OR IF
OUTPUT
OUTPUT TO
Pi
PIPE
Pointer@
PRINT
PRIVATE
PROCEDURE
PROPERTY
PUBLIC
QUIT
Quote$
Rad
RAISE
RANDOMIZE
RDir
READ
Realloc
REPEAT
Replace$
Représentation binaire des données
RETURN
Right$
RInStr
RMDIR
Rnd
Rol
Ror
Round
RTrim$
Scan
SConv$
Second
SEEK
Seek
SELECT
Sgn
SHELL
Shell$
Shl
Short@
Shr
Sin
Single@
Sinh
SizeOf
SLEEP
Space$
Split
Sqr
Stat
STATIC
STEP
STOP
STOP EVENT
Str$
String$
String@
StrPtr
STRUCT
SUB
Subst$
SUPER
SWAP
Swap$
Tableaux intégrés
Tan
Tanh
Temp$
THEN
Time
Timer
TO
Tr$
Trim$
TRUE
TRY
TypeOf
Types de données
UCase$
UNLOCK
Unquote$
UNTIL
USE
Utilisation des mots réservés comme identificateur
Val
VarPtr
WAIT
WATCH
Week
WeekDay
WEND
WHILE
WITH
WRITE
XOR
Year
Lexique
LISEZ-MOI
Manuel du wiki
Messages d'erreur
Tutoriels
Wiki License

NEW

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

Instancie la classe Class .

Si un nom est indiqué, le nouvel objet sera capable de lever des évènements en appelant une procédure ou fonction publique dans son "parent".

  • Ce parent, ou l'observateur d'évènement par défaut, est l'objet ou la classe où le nouvel objet est instancié.

  • Le nom de ce gestionnaire d'évènement est le nom de l'objet suivit par un trait de soulignement ( _ ) et le nom de l'évènement.

Si vous omettez de spécifier la partie Name , votre objet ne lèvera jamais d’évènement !

NEW n'est pas un opérateur. Vous pouvez seulement l'utiliser dans une assignation.

Mais vous pouvez utiliser la fonction Object.New à la place.

Gestionnaires d’évènement communs

Deux objets différents peuvent avoir le même nom d'évènement. Ainsi, vous pouvez gérer les évènements d'objets multiples dans la même procédure d'évènement, tant que ces objets lèvent les même évènements.

Cette caractéristique est utilisée par l’ IDE pour implémenter la propriété Group.

Exemples

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

  PRINT "Mon bouton a été cliqué !"

END

' Cet exemple crée des petites [/comp/gb.qt/textbox]-es 9\*9\*9 auxquelles les accès
' sont effectués par le tableau d’Objets[] public 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[] ' Necessite de créer le tableau
  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) ' crée les TextBox  9*9*9 suivantes
        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

Instanciation dynamique

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

Cette seconde syntaxe permet d'indiquer dynamiquement le nom de classe sous forme de chaîne.

Exemples

' Ceci crée un tableau de flottants 3x3.
DIM MyArray AS NEW Float[3, 3]
' Et ceci aussi
DIM MyArray AS Object
DIM MyClassName AS String
MyClassName = "Float[]"
MyArray = NEW (MyClassName, 3, 3)

Voir aussi