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





Получить все установленные компоненты в IDE Delphi

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

{....}

 uses ToolsApi;

 {....}


 var
   a, i: Integer;
 begin
   with (BorlandIDEServices as IOTAPackageServices) do
   begin
     for a := 0 to GetPackageCount - 1 do
     begin
       for i := 0 to GetComponentCount(a) - 1 do
       begin
         {get each component name with GetComponentName(a, i);}
       end;
     end;
   end;
 end;
           




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

Copyright © LSD Software 2006 - 2011