| |
|
|
- Página 1 - |
|
RudiB. | ¡Hola,
habe una kleines Problema el Yo no lösen kann, oder no verstehe. Mein Interpreter stürzt me en folgendem Quellcode de / hängt se en.....aber por qué porque sólo. Was mache Yo como falso ?? Sombrero alguien una Concepto y kann me helfen ?
Descargar |
|
|
| |
|
|
|
« Dieser Contribución wurde como Solución gekennzeichnet. » |
|
RGH | Sí, y lo wurde de me tatsächlich seinerzeit así eigebaut:
El Arrays son null-basierend y el Angabe beim Dimensionieren son el jeweils letzte Element a. Der Begriff Größe a algunos Stellen el Ayuda es hier tatsächlich irreführend.
Hintergrund el Geschichte: Seinerzeit (antes etwa 18 Jahren con Profan² 6) wurde Profan² sigue gustando genutzt, en BASIC-Programas después de Windows a portieren. In el verschiedenen BASIC-Dialekten gab lo el Arrays veces Null-basierend y veces con 1 beginnend. Mit meiner Solución konnten beide Varianten simplemente übernommen voluntad. Wer una no null-basierenden Quellcode nutzte, en etwa una Schachbrett a programa kam con Declarar Feld%[8,8] de, auch si como el Felder con 0 como Index unbenutzt blieben. Wer de una null-basierendem BASIC kam, hatte auch con Declarar Feld%[7,7] no Problemas.
Außerdem mag auch el Pascal-Schreibweise, el en Arrayas siempre el (erste y) letzte Element y no el Größe angibt, mi damalige entscheidung beeinflusst haben.
Richtig es, dass el Ayuda manchmal algo irreführend es, si yo de Größe escribir, porque el eigentliche Größe es por el 0-Element sí en cada Dimension eins mehr.
Cambio kann Yo daran después de 18 Jahren wohl nichts mehr (außer al Ayuda-Texto natürlich) sin a Kompatibilitätsproblemen con bestehenden Quellcodes a kommen. (Denkbar wäre höchstens una Schalter, a Arrays de Programmierersicht 1-basierend a hacer, así en Feld%[8,8] entonces tatsächlich una Array el Größe 64 beginnend en Feld%[1,1] producido se.)
Saludo Roland
PS: Ende dieses Jahres entwickle Yo ya 25 Jahre a Profano. Yo voluntad alt! ;) |
|
|
| XProfan X3Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 01.02.2016 ▲ |
|
|
|
|
|
RudiB. | Sorry...Whileloop 3 y Repeat 2 Durchläufe... KompilierenMarcaSeparaciónConjunto("ErrorLevel", 2)
CLS
Declarar Liste$[2,2],Abgleich$,zähler%
Liste$[0,0]="2"
Liste$[0,1]="Test 1"
Liste$[0,2]="3.30"
Liste$[1,0]="5"
Liste$[1,1]="Test 2"
Liste$[1,2]="4.50"
Liste$[2,0]="3"
Liste$[2,1]="Test 1"
Liste$[2,2]="1.20"
Whileloop 3
Abgleich$=Liste$[&bucle-1,1]
imprimir &bucle-1
zähler%=1
Repeat
If Liste$[zähler%,1]<>""
If Liste$[zähler%,1]=Abgleich$
Imprimir "Treffer"
'traceon
Liste$[&bucle-1,0]=str$(Val(Liste$[&bucle-1,0])+Val(Liste$[zähler%,0]))
Liste$[&bucle-1,2]=str$(Val(Liste$[&bucle-1,2])+Val(Liste$[zähler%,2]))
Liste$[zähler%,0]="":Liste$[zähler%,1]="":Liste$[zähler%,2]=""
'traceoff
EndIf
Endif
Inc zähler%
Until zähler% >=2
Endwhile
whileloop 3
Imprimir &bucle-1,Liste$[&bucle-1,0],Liste$[&bucle-1,0],Liste$[&bucle-1,0]
EndWhile
waitinput
|
|
|
| Xprofan X4 Rudolf Beske / München
Hardware: NB Intel I9 - 16GByte RAM | 28.12.2015 ▲ |
|
|
|
|
RudiB. | hier todavía el Fehlermeldung....
|
|
|
| |
|
|
|
Jörg Sellmeyer | [OFFTOPIC]Wenn du deinen Code en Code-Tags packst, es él leichter lesbar.[/OFFTOPIC]
En me se ejecuta el Programa sin a murren por. |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 28.12.2015 ▲ |
|
|
|
|
RudiB. | Habs gerade con XProfan 11.2 getestet....como gehts auch..sin embargo en 9 + 10 Choque....versteh Yo no.....aber trotzdem Gracias fürs anschauen....Feliz en el Neue Jahr...a todos... |
|
|
| |
|
|
|
| @rudi: Declarar Liste$[2,2] Val(Liste$[&loop-1,2])
Zweite Dimension ha Indexe 0;1, pero no 2. |
|
|
| |
|
|
|
RudiB. | doch, doch....hast Usted wohl missverstanden.
Declarar Liste$[2,2] // el son 9 Elemente List$[0,0],List$[0,1],List$[0,2],List$[1,0]..........List$[2,1],List$[2,2] |
|
|
| |
|
|
|
| liste$[2,2] ha 2x2=4 Einträge:
Ayuda
En statischen Arrays folgt hinter el Sufijo en eckigen Klammern el Angabe el Größe.
Indexes= 0,0 1,0 0,1 1,1
Schau: KompilierenMarcaSeparación Index beginnt en 0. |
|
|
| |
|
|
|
RudiB. |
?? mostrar |
|
|
| |
|
|
|
| Fehler en SizeOf en Deinem Ejemplo, muss 4 en fuera-kommen.
Muss Roland fixen, habs en Bugs einsortiert: [...] |
|
|
| |
|
|
|
RudiB. |
entonces debería XProfan aber ya en Línea 8 maulen..... tut lo aber sólo si yo como hier Línea 15 einfüge.== el Element no existe. !!
Und al Ende meines listings voluntad el werte en efecto otra vez korrekt ausgelesen. (Whileloop) |
|
|
| |
|
|
|
| Fehlende Fehlermeldungen y falsches SizeOf-Ergebnis mejor no como Referenz uso.
declarar a$[2,2] definiert 4 Felder, no 9. (es en bastante allen Programmiersprachen así el Fall)
Si usted 9 Felder möchtest entonces [3,3].
So es lo auch en el XProfan-Ayuda. |
|
|
| |
|
|