/home/amcintosh/.local/share/nautilus/scripts
Code: Select all
#!/bin/sh
wine '/home/amcintosh/project/bb7-rc1/blackbox-canonical/BlackBox.exe' -use "`winepath -w "$PWD"`" $* &
With that script you can run BlackBox from any project folder.
Code: Select all
#!/bin/sh
wine '/home/amcintosh/project/bb7-rc1/blackbox-canonical/BlackBox.exe' -use "`winepath -w "$PWD"`" $* &
Code: Select all
loc:=Files.dir.Locator("d:\dir\dir2");
Code: Select all
loc:=Files.dir.This("Obx\Mod");
Code: Select all
subloc:=loc.This("dir");
Code: Select all
StdCmds.OpenDoc("Obx\Mod\Views2")
Code: Select all
StdCmds.OpenDoc("D:\a.txt");
In my private HostFiles, I have exported three path variable: appPath(server),workPath(client),startPath;Josef Templ wrote:It is probably worth to consider the export of the startup directory from HostFiles in 1.7.1.
This would be a trivial change and it would not introduce any unwanted side effects
on Locators.
- Josef
I'd vote for that.Josef Templ wrote:It is probably worth to consider the export of the startup directory from HostFiles in 1.7.1.
Code: Select all
home := Files.dir.This ('')(HostFiles.Locator).path$
Code: Select all
PROCEDURE Server* (OUT home : ARRAY OF CHAR);
VAR
res, k : INTEGER;
BEGIN
res := WinApi.GetModuleFileNameW (0, home, LEN (home));
k := LEN (home$);
WHILE (k > 0) & (home [k] # '\')
& (home [k] # '/') & (home [k - 1] # ':') DO DEC (k) END;
home [k] := 0X
END Server
Isn't this added anyway when you look up a file?Robert wrote: The Tool has to be able to add <BlackBoxPath> to find the file.
One example: I know that the file isJosef Templ wrote:Robert, is the special feature of your lookup ...