بارك الله فيك
function appPathOriginal() -- returns the original EXE's path ONLY -- this is useful for compressed single-file apps run from a CD -- but, it also works with folder-based apps local cdPath = ""; local findMarker = "SFXSOURCE:"; local cmdArgs = ""; if (Table.Count(_CommandLineArgs) > 0) then for i = 1, Table.Count(_CommandLineArgs) do if (String.Find(_CommandLineArgs[i], findMarker) > 0) then cmdArgs = _CommandLineArgs[i]; break; end end end if (cmdArgs ~= "") then if (String.Find(cmdArgs, findMarker) == 1) then local fullPath = String.Replace(cmdArgs, findMarker, "", true); local tblFullPath = String.SplitPath(fullPath); cd_Path = tblFullPath.Drive .. tblFullPath.Folder; cd_Path = String.TrimRight(cd_Path, "\\"); end else cd_Path = _SourceFolder; end return cd_Path; end
تويت
sPath = appPathOriginal();
tSplitPath = String.SplitPath(sPath);
Dialog.Message("Notice", tSplitPath.Filename, MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
ss = Table.Concat(_CommandLineArgs, "", 1, TABLE_ALL), "SFXSOURCE:", "", false
sfx_path = String.Replace(ss, "SFXSOURCE:", "", false);
تعليق