| |
| |
|
| - page 1 - |
|
RudiB. | Salut,
habe un kleines Problem le moi pas lösen peux, ou bien pas verstehe.
mon Interpreter stürzt mir chez folgendem Quellcode ab / hängt sich sur.....mais pourquoi car seulement.  quoi fais je là faux ??
Hat quelqu'un une concept et peux mir aider ?
Herunterladen |
|
| |
| |
| |
|
 |
« cette Beitrag wurde comme Solution gekennzeichnet. » |
|
RGH | oui, et es wurde de mir réellement seinerzeit so eigebaut:
qui Arrays sommes zéro-basierend et qui Angabe beim Dimensionieren gibt cela jeweils dernier Element à. qui Begriff Taille à einigen se mettre qui Aider ist ici réellement irreführend.
Hintergrund qui Geschichte: Seinerzeit (avant etwa 18 Jahren avec Profan² 6) wurde Profan² encore volontiers genutzt, um BASIC-Programme pour Windows trop portieren. dans den verschiedenen BASIC-Dialekten donnais es qui Arrays la fois zéro-basierend et la fois avec 1 beginnend. avec meiner Solution konnten beide Varianten simple übernommen volonté. qui une pas zéro-basierenden Quellcode nutzte, um etwa un Schachbrett trop programmieren kam avec Déclarer champ%[8,8] aus, aussi si là qui Felder avec 0 comme index inutilisé blieben. qui de einem zéro-basierendem BASIC kam, hatte aussi avec Déclarer champ%[7,7] aucun Probleme.
Aussi mag aussi qui Pascal-Schreibweise, qui chez Arrayas toujours cela (erste et) dernier Element et pas qui Taille angibt, mon damalige entscheidung beeinflusst avons.
Richtig ist, dass qui Aider quelquefois quelque chose irreführend ist, si je de Taille schreibe, car qui eigentliche Taille ist par cela 0-Element oui dans chacun Dimension une plus.
Changement peux je daran pour 18 Jahren wohl rien plus (sauf am Aider-Text naturellement) sans Kompatibilitätsproblemen avec bestehenden Quellcodes trop venons. (imaginable wäre au maximum un commutateur, à Arrays aus Programmierersicht 1-basierend trop faire, avec cela chez champ%[8,8] ensuite réellement un Array qui Taille 64 beginnend chez champ%[1,1] erzeugt wird.)
Salut
Roland
PS: Ende cet Jahres entwickle je déjà 25 Jahre à Profan. je werde vieux! ;) |
|
| |
| 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 et Repeat 2 Durchläufe...
KompilierenMarqueSéparationSet("ErrorLevel", 2)
CLS
Déclarer 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$[&loop-1,1]
imprimer &loop-1
zähler%=1
Repeat
Si liste$[zähler%,1]<>»
Si liste$[zähler%,1]=Abgleich$
Imprimer "Treffer"
'traceon
liste$[&loop-1,0]=str$(Val(liste$[&loop-1,0])+Val(liste$[zähler%,0]))
liste$[&loop-1,2]=str$(Val(liste$[&loop-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
Imprimer &loop-1,liste$[&loop-1,0],liste$[&loop-1,0],liste$[&loop-1,0]
Endwhile
waitinput
|
|
| |
| Xprofan X4
Rudolf Beske / München
Hardware: NB Intel I9 - 16GByte RAM | 28.12.2015 ▲ |
|
| |
|
|
RudiB. | ici encore qui Fehlermeldung....
 |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | [OFFTOPIC]si du deinen Code dans Code-Tags packst, ist il leichter lesbar.[/OFFTOPIC]
chez mir fonctionne cela Programme sans murren par. |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 28.12.2015 ▲ |
|
| |
|
|
RudiB. | | Tricolore justement avec XProfan 11.2 getestet....là gehts aussi..cependant chez 9 + 10 Absturz....versteh je pas.....mais quand même merci pour anschauen....Guten Glissement ins Neue l'an...à alle... |
|
| |
| |
| |
|
|
 | @rudi: Déclarer liste$[2,2]
Val(liste$[&loop-1,2])
Zweite Dimension hat Indexe 0;1, mais pas 2. |
|
| |
| |
| |
|
|
RudiB. | doch, doch....la hâte Du wohl missverstanden.
Déclarer liste$[2,2] // ce sont 9 Elemente
List$[0,0],List$[0,1],List$[0,2],List$[1,0]..........List$[2,1],List$[2,2] |
|
| |
| |
| |
|
|
| liste$[2,2] hat 2x2=4 Einträge:
Aider
chez statischen Arrays folgt derrière dem Postfix dans eckigen Klammern qui Angabe qui Taille.
Indexes= 0,0 1,0 0,1 1,1 
exposition:
KompilierenMarqueSéparation
index beginnt chez 0. |
|
| |
| |
| |
|
|
RudiB. | 
?? exposition |
|
| |
| |
| |
|
|
| faute dans SizeOf chez Deinem Beispiel, muss 4 chez raus-venons.
Muss Roland fixen, habs chez Bugs einsortiert: [...]  |
|
| |
| |
| |
|
|
RudiB. | 
ensuite devrait XProfan mais déjà dans la ligne 8 maulen..... tut es mais seulement si je comment ici la ligne 15 einfüge.== cela Element gibt es pas. !!
et am Ende meines listings volonté qui werte oui aussi wieder korrekt ausgelesen. (Whileloop) |
|
| |
| |
| |
|
|
| Fehlende Fehlermeldungen et falsches SizeOf-Ergebnis besser pas comme référence verwenden.
declare a$[2,2] défini 4 Felder, pas 9.
(ist dans assez allen Programmiersprachen so qui le cas)
si Du 9 Felder vouloir ensuite [3,3].
So steht es aussi dans qui XProfan-Aider. |
|
| |
| |
| |
|
(290)
Deutsch
English
Français
Español
Italia
