| |
| |
|
 | qui Dossier text.txt voudrais je byteweise auslesen et ensuite devoir qui données comment unten comme Textdatei hergestellt bzw gesetzt volonté.
je voudrais aus qui Bytedatei Datazeilen erstellen.
comme erstes qui Longueur et ensuite qui Werte.
avec Contribution voudrais je comme erstes abfragen :
1. nom qui Dossier qui lire wird
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,
|
|
| |
| |
| |
|
|
 | maintenant la hâte Du uns erklärt quoi Du vouloir, ist là une Frage versteckt?
Du brauchst blockRead  (input allez aussi) et qui Funktion ord , den reste vois je comme simple Boucle qui Du sûrement hinbekommst. |
|
| |
| |
| |
|
|
| |
| |
| |
| |
|
|
| je peux Dir malheureusement pas dire, weshalb append dans diesem le cas qui Dossier pas erzeugt.
Ist imho pas korrekt vom XProfan. |
|
| |
| |
| |
|
|
| si je qui text.dat de main selber erzeuge, volonté qui données reingeschrieben.
pourquoi pouvoir cela Xprofan 11.2 pas qui Dossier text.dat ?
mfg |
|
| |
| |
| |
|
|
RGH | Salut,
une Dossier wird avec Rewrite# erzeugt et ouvert bzw. gelöscht et ouvert, si vous déjà vorhanden ist. avec Append# wird une bestehende Dossier zum Anhängen weiterer données ouvert. Steht aussi so dans qui Aider.
Aussi sollte Pour Append# et Rewrite# grundsätzlich %IOResult abgefragt volonté!
Salut
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, suis je maintenant verwöhnt ou bien véritable cela pas toujours so? Imho devrait Append doch une pas vorhandene Dossier erzeugen. 
mais eh bien bien, si es dans XProfan pas so ist, ensuite ists arrêt (pas) so .  |
|
| |
| |
| |
|
|
| Jup, merci.
sur Rewrite wäre je pas gekommen.
mfg |
|
| |
| |
| |
|
|
| comment erfrage je LOF, welches oui dans Profan pas gibt?
mfg |
|
| |
| |
| |
|
|
| |
| |
| |
| |
|
|
| si je une Namen eingebe qui faux ist comme Contribution zum Einlesen, devrait cela Programme eigentlich finissez volonté bzw pour waitkey springen. Tut es mais pas, mais allez plus, wohin Je l' Ausgabenamen eingeben peux.
Woran liegt cela?
mfg
KompilierenMarqueSéparationdeclare 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 | | Du musst dem Programme aussi dire dass es finissons soll! |
|
| |
| |
| |
|
(454)
Deutsch
English
Français
Español
Italia