Objekt
(Übersetztung - Stand der EN Seite vom 26.03.2024)
Ein Objekt ist eine Datenstruktur, die Eigenschaften, Variablen, Methoden und Ereignisse bereitstellt.
Jedes Objekt ist mit einer
Class verbunden, die das Verhalten dieser Eigenschaften, Variablen, Methoden und Ereignisse beschreibt.
Eine
Class kann entweder in
Gambas definiert werden, wie in der Klasse "
textbox",
oder durch den Programmierer, der eine neue Klasse in seinem Projekt definiert.
Eine Klasse hat niemals eine Adresse. Eine Klasse kann nicht angezeigt werden.
Objekte haben eine Laufzeitadresse. Diese Adresse kann im Watch-Fenster angezeigt werden.
Die Mitglieder des Objekts können ebenfalls im Überwachungsfenster angezeigt werden.
Example 1
In diesem Beispiel ist "
TextBox" eine
Class.
"TextBox1" ist ein
Objekt das von der IDE erstellt wird.
"hTextBox1" ist ein Verweis auf ein Objekt des Typs
TextBox.
Später in diesem Beispiel wird der Verweis auf die von der IDE erstellte "TextBox1" in "hTextBox1" kopiert.
Im Überwachungsfenster der IDE zeigen Verweise auf sie die gleiche hexadezimale Adresse an.
Mitglieder des Objekts können ebenfalls im Überwachungsfenster angezeigt werden.
Ausdruck
|
Wert
|
TextBox
|
FEHLER: Unbekannt ...
|
TextBox1
|
(TextBox 0x81099c0)
|
hTextBox1
|
(TextBox 0x81099c0)
|
hTextBox1.Text
|
"Set hTextBox1"
|
PUBLIC SUB Button1_Click()
DIM hTextBox1 AS TextBox ' kann die Adresse des Objekts enthalten
hTextBox1 = TextBox1 ' liefert die Adresse des bereits existierenden Objekts
hTextBox1.Text = "Set hTextBox1"
hTextBox1.X = TextBox1.X + 80
hTextBox1.Y = TextBox1.Y + 120
END
Example 2
In diesem Beispiel ist "
TextBox" eine
Class.
"hTextBox1" ist ein
Objekt dieser
Class, die auf
Form Form1 erstellt wird.
Die
TextBox wird auf dem Formular an den angegebenen X- und Y-Koordinaten platziert, mit dem angegebenen Text gefüllt und erhält den Namen TextBox1.
PUBLIC SUB Button1_Click()
DIM hTextBox1 AS TextBox ' kann die Adresse des Objekts enthalten
hTextBox1 = NEW TextBox(Form1) ' Instanziiert eine neue TextBox, d.h. erstellt das Objekt
hTextBox1.Text = "Set hTextBox1"
hTextBox1.X = TextBox1.X + 80
hTextBox1.Y = TextBox1.Y + 120
END