| |
| |
|
 | El Expediente texto.txt möchte Yo byteweise auslesen y luego debería el Daten como unten como Textdatei producido o gesetzt voluntad.
Yo möchte de el Bytedatei Datazeilen redactar.
Als erstes el Longitud y luego el Werte.
Mit Entrada möchte Yo como erstes abfragen :
1. Name el Expediente el eingelesen se
2. Datazeilenanfang
1000 DATA 22
1010 DATA 169,32,133,250,169,3,133,251,160,0,
1020 DATA 177,250,168,177,250,32,237,253,136,208,
1030 DATA 248,96,
|
|
| |
| |
| |
|
|
 | Jetzt hast Usted uns erklärt qué Usted möchtest, es como una Cuestión versteckt?
Usted necesidad blockRead  (input va auch) y el Función ord , el Rest sehe Yo como einfache Bucle el Usted sicher hinbekommst. |
|
| |
| |
| |
|
|
| |
| |
| |
| |
|
|
| Puedo Usted por desgracia, no sagen, por qué append en diesem Fall el Expediente no producido.
Ist imho no korrekt vom XProfan. |
|
| |
| |
| |
|
|
| Wenn Yo el texto.dat a mano selber erzeuge, voluntad el Daten reingeschrieben.
¿Por qué macht el Xprofan 11.2 no el Expediente texto.dat ?
mfg |
|
| |
| |
| |
|
|
RGH | ¡Hola,
una Expediente es con Rewrite# producido y geöffnet o. gelöscht y geöffnet, si ellos ya disponible es. Mit Append# se una bestehende Expediente para Anhängen weiterer Daten geöffnet. Steht auch así en el Ayuda.
Außerdem debería Nach Append# y Rewrite# grundsätzlich %IOResult abgefragt voluntad!
Saludo
Roland |
|
| |
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 08.05.2009 ▲ |
|
| |
|
|
| Hm, bin Yo ahora verwöhnt oder verdadero el no siempre así? Imho debería Append doch una no vorhandene Expediente erzeugen. 
Aber nun bien, si en XProfan no así es, entonces ists sólo (no) así .  |
|
| |
| |
| |
|
|
| Jup, danke.
Auf Rewrite wäre Yo no gekommen.
mfg |
|
| |
| |
| |
|
|
| Como erfrage Yo LOF, welches sí en Profano no son?
mfg |
|
| |
| |
| |
|
|
| |
| |
| |
| |
|
|
| Cuando tengo un Namen eingebe el Falsch es como Entrada para Einlesen, debería el Programa eigentlich darse por concluido o después de waitkey springen. Tut lo pero no, pero va más, wo Yo, el Ausgabenamen eingeben kann.
Woran liegt el?
mfg
KompilierenMarcaSeparacióndeclare a%, data_laenge%, data_anfang%,datei_laenge%,name_in$,name_out$
Window 20,20-400,400
Print Dateiname_in : ;
input name_in$
Assign #1,name_in$
OpenRW #1
If %IOResult
Print Datei kann nicht geöffnet werden.
else
Print Dateiname_out: ;
input name_out$
datei_laenge% = GetFileSize(#1)
Assign #2,name_out$
Rewrite #2
data_anfang%=1000
print #2,str$(data_anfang%); DATA ;datei_laenge%
data_laenge%=0
data_anfang%=data_anfang%+10
print #2,str$(data_anfang%); DATA ;
WhileLoop datei_laenge%
if data_laenge% < 10
a%=GetByte(#1)
print #2,str$(a%);,;
else
data_laenge%=0
data_anfang%=data_anfang%+10
print #2
print #2,str$(data_anfang%); DATA ;
a%=GetByte(#1)
print #2,str$(a%);,;
endif
data_laenge%=data_laenge%+1
EndWhile
Close #1
Close #2
endif
waitkey
./../funktionsreferenzen/XProfan/end/'>end
|
|
| |
| |
| |
|
|
Paul
Glatz | | Usted musst el Programa auch sagen dass lo Beenden se! |
|
| |
| |
| |
|
(455)
Deutsch
English
Français
Español
Italia