| |
| |
|
Thomas
Zielinski | Grüßt euch,
je hab un Problem avec LoadFile$ et weis pas plus.
si on dans folgendem Beispiel sur "Laden" klickt et une Dossier auswählt, wird entier normal qui Pfad gespeichert et qui Taille qui Dossier ausgegeben. Klickt on eh bien nochmal sur "Laden" et wählt cet Dossier aus, so erzählt mir mon XProfan8 dass es qui Dossier pas trouver peux. cela tritt mais seulement sur, si on qui Dossier avec Assign ouvrez.
KompilierenMarqueSéparationDeclare but&,e%,file$
cls
but& = Create("Button",%HWnd,"Laden",0,0,100,25)
e%=0
WhileNot e%=1
WaitInput
If GetFocus(but&)
file$ = LoadFile$("Laden:","Bitmaps|*.bmp")
MessageBox(STR$(FileSize(file$)),"INFO",4096)Bei zweitem aufruf wird hier der fehler angezeigt
Datei nicht gefunden.
Assign #1, file$aber nur wenn die 2 Zeilen hier stehen
Hier die ueblichen dateiarbeiten
Close #1
EndIf
Wend
Fin
|
|
| |
| XProfan X4; Win10 x64
Der Kuchen ist eine lüge! | 22.07.2008 ▲ |
|
| |
|
|
 | | XProfan8? Weil XProfan10 pouvoir là aucun Probleme... |
|
| |
| |
| |
|
|
Paul
Glatz | | XProfan 10 free pouvoir aucun probleme |
|
| |
| |
| |
|
|
Michael
Dell | allô Thomas,
mets la fois folgende MSB derrière den LoadFile() Dialog.
KompilierenMarqueSéparation%IOResult meldet ab dem zweiten la fois faute 103 (Dossier pas ouvert). intéressant ist cela par cet zusätzliche MSB avec %IOResult- Abfrage ne...aucune faute plus gemeldet wird.  |
|
| |
| Salu Michael...
Hab zwar krumme Fieß awer dofir e' ecklich Gsicht! | 22.07.2008 ▲ |
|
| |
|
|
Michael
Dell | Nachtrag: Des Rätsels Solution, mets Fermer nie sans ReSet / Réécriture ou bien OpenRW un!  |
|
| |
| Salu Michael...
Hab zwar krumme Fieß awer dofir e' ecklich Gsicht! | 22.07.2008 ▲ |
|
| |
|
|
Michael
Dell | je frag mich grad wieso nachfolgende Versionen sich là pas beschweren?  |
|
| |
| Salu Michael...
Hab zwar krumme Fieß awer dofir e' ecklich Gsicht! | 22.07.2008 ▲ |
|
| |
|
|
Dietmar
Horn |
cela tritt mais seulement sur, si on qui Dossier avec Assign ouvrez.
@Thomas: avec assign "öffnet" on aucun Dossier, mais weist dem Dateinamen lediglich une Dateikennung trop (#1, #2, ...). dans Deinem Code fehlt Irgendwas dans direction reset, rewrite, append, usw.
suis juste ab 14.00 montre im NATZ HY [...]  à cause de neuem XProfan-Schnupperkurs - peux oui la fois vorbeischauen, si Du Bock sur elle avons devrait. . c'est bestimmt seulement la fois wieder un klitzekleiner dropsmäßiger Schusselfehler Deinerseits dans Deinem restlichen Code ... 
Salut
Dietmar |
|
| |
| Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V. [...] Windows 95 bis Windows 7 Profan² 6.6 bis XProfan X2 mit XPSE Das große XProfan-Lehrbuch: [...] | 22.07.2008 ▲ |
|
| |
|
|
RGH | Michael Dell
je frag mich grad wieso nachfolgende Versionen sich là pas beschweren?
je vermute la fois Folgendes:
Es wird einer Dateinummer avec Assign #n,nom$ un Dateiname zugewiesen. ensuite wird qui Dossier, sans dass vous je avec OpenRW, Reset, Append ou bien Rewrite ouvert wurde avec Fermer #n bzw. CloseRW #n geschlossen. qui Versuch, une pas geöffnete Dossier trop schließen, führt naturellement trop einem I/O-faute, qui qui Systemvariable %IOResult sur ungleich 0 mets.
si eh bien un weiterer I/O-Befehl folgt, qui möglicherweise sogar correct funktioniert, bleibt qui Variable dans älteren XProfan-Versionen quand même gesetzt. alors gibt es qui beanstandete Fehlermeldung. %IOResult wird par Lecture zurückgesetzt, c'est pourquoi ist cela Problem weg, sobald qui Messagebox-la ligne im Programme ist. on sollte alors pour chaque Befehl, qui %IOResult mettons pourrait, %IOResult sur une aufgetretenen faute hin abfragen.
dans neueren XProfan-Versionen viens je vergesslichen Programmierern entgegen et mets chez entsprechenden Befehlen %IOResult auparavant zurück, sodass aussi ensuite un pour dem Befehl gesetzes %IOResult sur une faute im letzten Befehl hinweist.
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 | 22.07.2008 ▲ |
|
| |
|
|
Thomas
Zielinski | Irgendwo stand la fois quoi de Minimalbsp.!(Welches sous P8 nich allez) je verwende ensuite un OpenRW et glaube cela là qui le chien begraben liegt. RGH hat mich mais avec CloseRW #n sur une concept gebracht.
Salut Thomas.
là liefert on ordnungs gemäß un kleines Beispiel et ensuite ist es trop petite.  |
|
| |
| XProfan X4; Win10 x64
Der Kuchen ist eine lüge! | 22.07.2008 ▲ |
|
| |
|
|
Thomas
Zielinski |
la fois wieder un klitzekleiner dropsmäßiger Schusselfehler
Jup!
Fermer par CloseRW ersetz et es klapt. Quelque chose comme muss on erstmal dit bekommen. merci ensuite la fois!
Salut Thomas |
|
| |
| XProfan X4; Win10 x64
Der Kuchen ist eine lüge! | 22.07.2008 ▲ |
|
| |
|
|
| Thomas Zielinski
...là liefert on ordnungs gemäß un kleines Beispiel et ensuite ist es trop petite.
Tja! un Minimalbeispiel muss oui ne...aucune "kleines Beispiel" son - mais ist probablement quelquefois sogar riesig!  |
|
| |
| |
| |
|
|
Michael
Dell | @Roland: Alles bien sûr! Wieder quoi gelernt.  |
|
| |
| Salu Michael...
Hab zwar krumme Fieß awer dofir e' ecklich Gsicht! | 23.07.2008 ▲ |
|
| |
|
(1.111)
Deutsch
English
Français
Español
Italia