Verbindungsfehler zu mysql datenbank

[wfs12]

Guten tag ich benutze folgenden code um mich zu einer Mysql datenbank bei db4free.net zu verbinden:

Delphi-Quellcode:

procedure TForm1.startconnection(db,host, user, pass: PChar);
begin
  _myCon:= mysql_init(nil);
  if _myCon = nil then begin
    MessageDlg('Nicht genug freier Speicher, um Verbindungsdeskriptor zu initialisieren',mterror,[mbOk],0);
    Exit;
  end;
  if mysql_real_connect(_myCon, host, user, pass, db, 3306, nil, 0) = nil then begin
    Messagedlg('Die Verbindung konnte leider nicht hergestellt werden. Ursache: ' + mysql_error(_myCon),mterror,[mbOk],0);
    if Form2.Showing=false then
     Form2.Showmodal;
    Exit;
  end;
  MessageDlg('Die Verbindung wurde erfolgreich hergestellt',mtinformation,[mbOK],0);
  connectbtn.Caption:='Trennen';
  if Form2.Showing=true then
    Form2.Close;
end;

Ich kann mich auch super mit dieser verbinden nur wenn ich das programm jemandem aders schicke erhält dieser eine zugriffsverletzung während des verbindens. Hab aber bei der datenbank extra alle ips zugelassen wo könnte de fehler liegen?