03.02.2014, 21:16
Die Suchreihenfolge ist:
[ab3]Function.l ab3_GetIncludeLock{filename.s}
incLock.l = Lock_ (&filename,#ACCESS_READ) ; try bla.blub
ex.s = dos_GetExt{filename}
If incLock = False
filename = dos_SetExt{filename,"ab3"}
incLock = Lock_ (&filename,#ACCESS_READ) ; try bla.ab3
End If
If incLock = False
filename = dos_SetExt{filename,"ab2"}
incLock = Lock_ (&filename,#ACCESS_READ) ; try bla.ab2
End If
If incLock = False
filename = dos_SetExt{filename,"bb2"}
incLock = Lock_ (&filename,#ACCESS_READ) ; try bla.bb2
End If
If incLock = False
filename = dos_SetExt{filename,ex+".ab3"}
incLock = Lock_ (&filename,#ACCESS_READ) ; try bla.blub.ab3
End If
If incLock = False
filename = dos_SetExt{filename,"ab2"}
incLock = Lock_ (&filename,#ACCESS_READ) ; try bla.blub.ab2
End If
If incLock = False
filename = dos_SetExt{filename,"bb2"}
incLock = Lock_ (&filename,#ACCESS_READ) ; try bla.blub.bb2
End If
Function Return incLock
End Function[/ab3]
Ich fine das auch nicht schön. Aber Bernd wollte das so.
Eine idee wäre, beim XINCLUDE die extentions ganz wegzu lassen. also
[ab3]XINCLUDE "image"
XINCLUDE "error"
XINCLUDE "dos"[/ab3]
Grundsätzlich DARF aber nur eine Version installiert sein. Sonst kommt auch der HelpIndex durcheinander und findet alles doppelt. D.h. wenn du .ab3 eincheckst, lösche auf jedenfall gleichzeitig die .bb2.
[ab3]Function.l ab3_GetIncludeLock{filename.s}
incLock.l = Lock_ (&filename,#ACCESS_READ) ; try bla.blub
ex.s = dos_GetExt{filename}
If incLock = False
filename = dos_SetExt{filename,"ab3"}
incLock = Lock_ (&filename,#ACCESS_READ) ; try bla.ab3
End If
If incLock = False
filename = dos_SetExt{filename,"ab2"}
incLock = Lock_ (&filename,#ACCESS_READ) ; try bla.ab2
End If
If incLock = False
filename = dos_SetExt{filename,"bb2"}
incLock = Lock_ (&filename,#ACCESS_READ) ; try bla.bb2
End If
If incLock = False
filename = dos_SetExt{filename,ex+".ab3"}
incLock = Lock_ (&filename,#ACCESS_READ) ; try bla.blub.ab3
End If
If incLock = False
filename = dos_SetExt{filename,"ab2"}
incLock = Lock_ (&filename,#ACCESS_READ) ; try bla.blub.ab2
End If
If incLock = False
filename = dos_SetExt{filename,"bb2"}
incLock = Lock_ (&filename,#ACCESS_READ) ; try bla.blub.bb2
End If
Function Return incLock
End Function[/ab3]
Ich fine das auch nicht schön. Aber Bernd wollte das so.
Eine idee wäre, beim XINCLUDE die extentions ganz wegzu lassen. also
[ab3]XINCLUDE "image"
XINCLUDE "error"
XINCLUDE "dos"[/ab3]
Grundsätzlich DARF aber nur eine Version installiert sein. Sonst kommt auch der HelpIndex durcheinander und findet alles doppelt. D.h. wenn du .ab3 eincheckst, lösche auf jedenfall gleichzeitig die .bb2.