Hi,
1. To retrieve FireBird Folder (Server side) and others Special windows Folders (Common Application, program Files, system32, ...)
Can i use this classical function (uses shlObj)
In uniservermodule :
-------------------------------------------------
function GetSystemPath(Folder: Integer): string;
var
PIDL: PItemIDList;
Path: LPSTR;
AMalloc: IMalloc;
begin
Path := StrAlloc(MAX_PATH);
SHGetSpecialFolderLocation(Application.Handle, Folder, PIDL);
if SHGetPathFromIDList(PIDL, Path) then Result := Path;
SHGetMalloc(AMalloc);
AMalloc.Free(PIDL);
StrDispose(Path);
end;
Usage:
Showmessage(GetSystemPath(CSIDL_DESKTOPDIRECTORY));
----------------------------------------------------
2. Why should i use (server side) :
uniservermodule.startpath
Instead of
ExtractFilePath(Application.exeName)
What is the difference ?
3. To retrieve (client side) DeskTop directory, can i use
In MainModule :
GetSystemPath(CSIDL_DESKTOPDIRECTORY)) ?
Thx.