Connection MySQL Delphi [Résolu]

[MABB]

Salut,

J'ai suivi le tutorial de Maximilian sur les nouveautés de mysql 5.0.
Mais je n'arrive pas sous delphi à me connecter. Voilà mon source :

var MyHost,MyUser,MyPass,MydbName:string;
begin
Conn := mysql_init(nil);
MyHost:='localhost';
MyUser:='root';
MyPass:='Socrate';
MydbName:='ligue1';
if mysql_real_connect(Conn, pChar(MyHost), pChar(MyUser),
pChar(MyPass),pchar(Mydbname),0,nil, 0) = nil then
ShowMessage('Erreur');

J'ai configurer MySQL ODBC 3.51 Driver avec les paramètres suivants :
DSN : MyODBC ; Description ; Server : localhost ; User :
root ; Password : Socrate ; database : ligue1. L'appuis sur
Test m'a confirmé la conncetion.

Je ne comprend pas que delphi me renvoit le message erreur.

J'utilise Delphi 4 Standart avec l'unit mysql. Est-ce compatiblie ?
Est-ce possible d'utiliser les composants TSQLConnection avec Delphi 4 ?

Merci pour une solution ou un conseil.

[Maximilian]

Salut,

Il nous faudrait l'erreur de connexion renvoyée par le serveur MySQL (et non le message d'erreur que tu affiches toi-même en Delphi)...

[MABB]

Salut,

Le serveur mysql ne donne aucune erreur. (dans MySQL Command line)

[zorville]

Exemple pour récuperer les erreurs

Uses Mysql dans le repertoire de l'appli
DLL mysql 5 : libmysql.dll - 1.272 Ko -


var
Form1: TForm1;
myErrorCode : Cardinal;
myErrorMsg : AnsiString;
mySQLConnection : PMYSQL;

procedure TForm1.Button1Click(Sender: TObject);
Var user,host,pwd:string;
portip:integer;
begin
user:='xxxx';
pwd:='xxxx';
host:='192.124.100.20';
portip:=3306;
mySQLConnection := mysql_init(nil);
mysql_options(mysqlconnection,MYSQL_OPT_COMPRESS,nil);
yErrorCode := mysql_errno(mySQLConnection);
myErrorMsg := mysql_error(mySQLConnection);
if mysql_real_connect(mysqlconnection, pchar(host), pchar(user),pchar(pwd),nil, portip, nil, 0) = nil then
begin
label1.caption:='La connexion a echouee';
myErrorCode := mysql_errno(mySQLConnection);
myErrorMsg := mysql_error(mySQLConnection);
showmessage(inttostr(myErrorCode)+ myErrorMsg);

End
End

Je commence en Mysql et j'utilise Delphi 7 sans Odbc

Bonne reception