
FinishDirectory()
- Psychophanta
- Always Here
- Posts: 5153
- Joined: Wed Jun 11, 2003 9:33 pm
- Location: Anare
- Contact:
FinishDirectory()
Rename FinishDirectory() function as FreeDirectory() for syntactic coherence, please 

We had this thread before, TS-Soft already requested that!
PB 4.30
Code: Select all
onErrorGoto(?Fred)
- Psychophanta
- Always Here
- Posts: 5153
- Joined: Wed Jun 11, 2003 9:33 pm
- Location: Anare
- Contact:
Fred wrote:In PB, each word has it's balanced opposite:
Load/Create -> Free
Add -> Remove
Open -> Close
Examine -> Finish
Start -> Stop
Code: Select all
CreateFile(0, "c:\_test.txt")
CloseFile(0)

- Psychophanta
- Always Here
- Posts: 5153
- Joined: Wed Jun 11, 2003 9:33 pm
- Location: Anare
- Contact:
- Psychophanta
- Always Here
- Posts: 5153
- Joined: Wed Jun 11, 2003 9:33 pm
- Location: Anare
- Contact:
Well, you got the exception. Basically, if i would add this command now, it would be OpenFile() with a flag. History, historyTrond wrote:Fred wrote:In PB, each word has it's balanced opposite:
Load/Create -> Free
Add -> Remove
Open -> Close
Examine -> Finish
Start -> StopCode: Select all
CreateFile(0, "c:\_test.txt") CloseFile(0)

You can do that now easily Fred,
just use PB4's macros to emulate the other file open calls

just use PB4's macros to emulate the other file open calls

Code: Select all
#PB_File_Open=0
#PB_File_Create=1
#PB_File_Read=2
;OpenFile(#File,FileName$,Flags.l=#PB_File_Open)
Macro ReadFile(file,filename)
OpenFile(file,filename,#PB_File_Read)
EndMacro
Macro CreateFile(file,filename)
OpenFile(file,filename,#PB_File_Create)
EndMacro
