| |
| |
|
Thomas
Zielinski | Grüßt you,
I Have a problem with LoadFile$ and wisely not further.
If one in folgendem example on "Laden" clicking and a File selecting, becomes integrally normal the way stored and the Size the File outputted. clicking one now again on "Laden" and dial these File from, so tells me my XProfan8 that it The File not find can. the exit but only on, if one The File with Assign opens.
CompileMarkSeparationDeclare 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
End
|
|
| |
| XProfan X4; Win10 x64
Der Kuchen ist eine lüge! | 07/22/08 ▲ |
|
| |
|
|
 | | XProfan8? because XProfan10 power there no Problems... |
|
| |
| |
| |
|
|
Paul
Glatz | | XProfan 10 free power no Problems |
|
| |
| |
| |
|
|
Michael
Dell | Hello Thomas,
setting time following MSB behind whom LoadFile() dialog.
CompileMarkSeparation%IOResult reports ex the second time Error 103 (File not opened). interestingly is the through these additional MSB with %IOResult- request no Error More gemeldet becomes.  |
|
| |
| Salu Michael...
Hab zwar krumme Fieß awer dofir e' ecklich Gsicht! | 07/22/08 ▲ |
|
| |
|
|
Michael
Dell | Nachtrag: the riddle Solution, set Close never without ReSet / ReWrite or OpenRW one!  |
|
| |
| Salu Michael...
Hab zwar krumme Fieß awer dofir e' ecklich Gsicht! | 07/22/08 ▲ |
|
| |
|
|
Michael
Dell | I frag me strain wieso follow up versions itself there not complain?  |
|
| |
| Salu Michael...
Hab zwar krumme Fieß awer dofir e' ecklich Gsicht! | 07/22/08 ▲ |
|
| |
|
|
Dietmar
Horn |
the exit but only on, if one The File with Assign opens.
@Thomas: with assign "öffnet" one no File, separate points the Filenames solely a Dateikennung To (#1, #2, ...). In Your code missing Irgendwas in direction reset, rewrite, append, etc.
be same ex 14.00 watch in the NATZ HY [...]  because of new XProfan-Schnupperkurs - can Yes time come round, if you buck on it having should. . this is certainly only time again klitzekleiner dropsmäßiger Schusselfehler Deinerseits in Your restlichen code ... 
Greeting
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: [...] | 07/22/08 ▲ |
|
| |
|
|
RGH | Michael Dell
I frag me strain wieso follow up versions itself there not complain?
I suspect time The following:
it'll of/ one Dateinummer with Assign #n,name$ one Dateiname allocated. Then The File, without that they apiece with OpenRW, Reset, Append or Rewrite opened watts with Close #n or. CloseRW #n closed. The attempt, a not opened File To close, lead naturally to a I/O-Error, the The Systemvariable %IOResult on mismatched 0 setting.
If now one Another I/O-commands follows, the möglicherweise even fehlerfrei functions, remaining The Variable in older XProfan-versions nevertheless staid. means there The beanstandete Error Message. %IOResult becomes through Reading reset, therefore is the trouble lane, once The Messagebox-row in the program is. one ought to means to each commands, the %IOResult settle could, %IOResult on a aufgetretenen Error there inquire.
In neueren XProfan-versions come I vergesslichen Programmierern against and set with suitable command %IOResult before back, so too then one to the commands gesetzes %IOResult on a Error in the last commands hinweist.
Greeting
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 | 07/22/08 ▲ |
|
| |
|
|
Thomas
Zielinski | somewhere stood something of Minimalbsp.!(which under P8 Nich goes) I use then one OpenRW and faith the there the dog bury lying. RGH has me but with CloseRW #n on a idea brought.
Greeting Thomas.
there supply one ordnungs according one small example and then is it To small.  |
|
| |
| XProfan X4; Win10 x64
Der Kuchen ist eine lüge! | 07/22/08 ▲ |
|
| |
|
|
Thomas
Zielinski |
time again klitzekleiner dropsmäßiger Schusselfehler
Jup!
Close through CloseRW ersetz and it klapt. Something like must one first said get. thanks then time!
Greeting Thomas |
|
| |
| XProfan X4; Win10 x64
Der Kuchen ist eine lüge! | 07/22/08 ▲ |
|
| |
|
|
| Thomas Zielinski
...there supply one ordnungs according one small example and then is it To small.
Tja! One Minimalbeispiel must Yes no "kleines Beispiel" his - separate is presumably sometimes even gigant!  |
|
| |
| |
| |
|
|
Michael
Dell | @Roland: everything clear! again what learnt.  |
|
| |
| Salu Michael...
Hab zwar krumme Fieß awer dofir e' ecklich Gsicht! | 07/23/08 ▲ |
|
| |
|
(497)
Deutsch
English
Français
Español
Italia