Delphi и MySQL

[Demien]

Использую компоненты DirectMysqlObjects
В WinXP успешно подключался к БД MySQL(давно это правда было...)
Следующий код в Win8 не работает (точней работает, но к БД не подключается):

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, uMySqlVio, uMysqlCT, uMysqlClient, uMysqlHelpers, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Label6: TLabel;
    procedure Button1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
    procedure FormDestroy(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
  MySQLClient: TMySQLClient;
  MySQLResult: TMysqlResult;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
  if MySQLClient.Connect('localhost', '123', '', 'olmi', 3306, '', false, 0) then
    Label6.Caption:='Удачно подключено!'
  else
    Label6.Caption:='Подключение не удалось!';
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  MySQLClient := TMySQLClient.Create;
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
  MySQLClient.Free;
  if MySQLResult <> nil then
  MySQLResult.Free
end;

end.

Чего-то не того делаю, или все же в винде дело?

[eval]

И что пишет 'Подключение не удалось!'? параметры в Connect все правильные?

[Stilet]

А ты его от имени админа выполняешь?

[Demien]

Пишет 'Подключение не удалось!'. Параметры правильные.
Попробовал только-что откомпилированный ехе от имени админа запустить. Результат тот-же(

[Stilet]

У-у-у... Ну проверяй файерволлы, антивирусы...
Доступность мускула короче проверять нужно. Попробуй достучаться к нему через консоль.

[Demien]

Но через навикад я то с ним нормально работаю...

[eval]

а вообще это может сказать по какому поводу не подключается?

[Stilet]

Действительно. Есть ли само описание свойств TMySQLClient на предмет обработки исключений или кода ошибки?

[Demien]

А альтернатива DirectMysqlObjects есть?
При условии чтобы подключение(хост, порт, пользователя...) можно было программно редактировать.

[eval]

адо например