Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Сети > Проверка подключения

Автор: Anakin 29.3.2013, 08: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)

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

Никогда такое не делал и понятия если чесно не имею.
Подскажите пжлст.
За ранее Пасиб.

Автор: Frees 29.3.2013, 08:49

а где у тебя класс TMyConnection ?