Código Delphi [-] path:= ExtractFilePath(Application.ExeName)+'lib\';
path:= ExtractFilePath(Application.ExeName)+'lib\';
Código Delphi [-] path:= GetCurrentDir+'lib\';
path:= GetCurrentDir+'lib\';