Erste Schritte mit MySQL

[maximi]

Ich fange gerade an, mich mit Datenbanken auseinanderzusetzen. Genauer gesagt mit MySQL!!

Delphi-Quellcode:

unit Unit1;

interface

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

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure FormCreate(Sender: TObject);
    procedure Button1Click(Sender: TObject);
private
  FMysql: TMysqlClient;
  FResult: TMysqlResult;
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$I mysqlinc.inc}
{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
FMysql := TMysqlClient.create;

end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  // Eigenschaften setzen
  FMysql.Host := 'localhost';
  FMysql.port := 3306;
  FMysql.user :=' user1';
  FMysql.password := '1234';
  FMysql.UnixSocket := '';
  FMysql.Db := 'test'; // Datenbank auf dem Server
  FMysql.UseNamedPipe := false;
  FMysql.UseSSL := false;
  FMysql.Compress := true;
  FMysql.TrySockets := false;
  if FMysql.Connect then
    ShowMessage('Verbindung aufgebaut')
  else
    ShowMessage('Fehler beim Verbinden: '+FMysql.LastError);

end;

end.

Ich bekomme einfach nicht die Meldun, dass die Verbindung aufgebaut wurde. Der hängt sozusagen bei FMysql.Connect!!

Kann mir jemand helfen??

Max

*Edit: Mist im falschen forum!!!
Tschuldigung!!