Программы   Загрузка Партнерство   О компании Контакты  
 
                    
  Карта Сайта   
   





Получить установочную директорию COM или WebService-DLL

Автор: http://www.swissdelphicenter.ch

uses
   ComServ, SysUtils;

 function GetDirectory: string;
 // This function returns the directory where the DLL (or ocx) is installed. 
// Also works in webservices 
// With DLL's you cannot use "Paramstr(0)" because this will give a false value 
begin
   Result := IncludeTrailingBackslash(ExtractFileDir(ComServer.ServerFileName));
 end;
           




Программы  |  Загрузка  |  Партнерство  |  О компании  |  Контакты

Copyright © LSD Software 2006 - 2011