XProfan

Español

pfisterhamj

¡Hola,

Yo sería gerne una assoziatives Array oder una dynamisches Array innerhalb uno Klasse nutzen (Als Eigenschaft). Leider tener Yo bisher todavía no Weg gefunden XProfan (X4) el auch korrekt mitzuteilen.

Wenn Yo el Ayuda sin embargo correcto lese kommt en me el Cuestión - va el überhaupt?

Tal vez ha alguien Tip Yo algo como bewerkstelligen podría.

Vielen Dank schonmal.

23.12.2019 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

H.Brill

Leider es sólo así, daß Estructuras y Klassen una feste
Größe haben necesario, así uno con DIM una solche
erzeugen kann. Deshalb kommen auch sólo el einfachen
Variables en Betracht :

Der Typ el Elemente se por el Sufijo gekennzeichnet:

&: 32-Bit Integer (Integer, LongInt: 4 Byte).

%: vorzeichenloser 16-Bit Integer (Word, ShortInt: 2 Byte).

$(n): Cuerdas. n=Länge des Cuerdas. Es a berücksichtigen, dass siempre una Null-Byte como Endekennzeichen a el String angehängt se! Deshalb muß n hier siempre en 1 Byte größer angegeben voluntad, como Signo en el String passen debería.

!: Fließkommazahlen (Double-Formato: 64 Bit o. 8 Byte, el entspricht el Float-Typ de XProfan).

#(n): Speicherbereich. n=Größe des Bereiches. Diese Speicherbereiche innerhalb uno Bereichsvariablen son no con Bereichsvariablen incluso a verwechseln. Innerhalb el Struktur se una entsprechend großer Zona a Bytes definiert, en el como en una String zugegriffen voluntad kann, con el Diferencia, dass lo kein Null-Byte como Endekennzeichen son.

:@ Método: Name uno Método. Diese muss como Procedimiento en el Programa definiert ser, wobei ihr Name de el Klassennamen y el Methodennamen (sin @), verbunden con un Punkt, besteht.

Einzig con #(n) podría uno una statisches (festes) Array simulieren.
Mit Pagar es el sí kein Problema wegen el 4-Byte Grenze. En Cuerdas
sería Yo entonces todos Cuerdas igual lang hacer (MKStr$), en ellos später
mejor ausfiltern a puede.

Como muß uno se sólo überlegen, qué con OOP macht y qué mejor
sin va. Ein korrespondierendes dyn. Array va en efecto.

Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.

Was die Borg können, können wir schon lange.

24.12.2019 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

pfisterhamj

Gracias para el Antwort. Dann muss Yo qué más überlegen.

24.12.2019 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

H.Brill

Tal vez wäre algo como interessant.
Gerade veces ausprobiert :

Kompilieren Marca Separación

Class MeineKlasse = X%, T$(10), MeineKlasse@
Class MeinArray = X%, B$(10), MeinArray@

Proc MeineKlasse.MeineKlasse

    Parámetros Largo A[], String B[]

    WhileLoop 0, SizeOf(A[]) - 1

        .X% = A[&LOOP]
        .T$ = B[&LOOP]
        Imprimir .X%, .T$

    EndWhile

ENDPROC

Proc MeinArray.MeinArray

    Parámetros String A[]
    Declarar String C[]
    C[] = A[]

    WhileLoop 0, SizeOf(C[]) - 1

        Imprimir C[&LOOP]

    EndWhile

ENDPROC

Declarar MeinObjekt#, MeinFeld#
Cls
MeinObjekt# = New(MeineKlasse,Array(Largo 1, 2, 3, 4 ,5), Array(String "Das", "ist", "ein", "kleiner", "Test !"))
Imprimir
MeinFeld#   = New(MeinArray, Array(String "das", "geht", "auch."))
WaitKey
Disponer MeinObjekt#, MeinFeld#
End