Проверка подключения

 
0
 
Delphi, Kylix & Pascal
ava
Anakin | 29.03.2013, 09:39
Доброе Утро.
Пытаюсь сделать проверку на состояние MySql подключение к базе.
Суть такова в базе есть таблица  в которое есть поле serverstatus и если оно равно 1 то программе позволено подключатса а если стоит 0 то отключаем кнопку подключитса.
Для подключения к MySql базе я использую компоненты MyDac но суть не в этом.
Я пытаюсь создать не визуальный компнент TMyConnection проверить состояние сервера и в конце его разрушить


procedure TfrmMain.FormShow(Sender: TObject);
type
MyClass = class(TMyConnection)
begin
MyClass := TComponent.Create(Self);
try

finally
  MyClass.Free;
end;
end;

Но даже при неполном заполнении кода мне выдаёт ошибку на вот это дело MyClass = class(TMyConnection)

Кто может подсказать как правельно организовать это дело.

Никогда такое не делал и понятия если чесно не имею.
Подскажите пжлст.
За ранее Пасиб.
Kommentare (1)
ava
Frees | 29.03.2013, 08:49 #
а где у тебя класс TMyConnection ?
Registrieren Sie sich oder melden Sie sich an, um schreiben zu können.
Unternehmen des Tages
Вы также можете добавить свою фирму в каталог IT-фирм, и публиковать статьи, новости, вакансии и другую информацию от имени фирмы.
Подробнее
Mitwirkende
  Frees   Anakin
advanced
Absenden