Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.



Вопросы
  Компонент HotKey
   Категория: Компоненты
  Показать удаленные записи в DBase
   Категория: Базы данных
  Что значит Paramstr
   Категория: Приложение
  Шифрование текста по паролю
   Категория: Текст и строки
  Undo в memo
   Категория: Компоненты
  Получить список запущенных приложений
   Категория: Приложение
  Как удалить не пустой каталог
   Категория: Файловая система
  Замена подстроки в строке
   Категория: Текст и строки

Delphi - База Знаний: Узнать установлена ли BDE

  << Вернуться к Содержанию  

uses Bde;
  
function BDEInstalled: Boolean;
begin
  Result := (dbiInit(nil) = 0)
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  if BDEInstalled then
    ShowMessage('BDE установлен.')
  else
    ShowMessage('BDE не установлен.')
end;
  << Вернуться к Содержанию