-
Connection MySQL Delphi
:oops: 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.
-
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)...
-
Salut,
Le serveur mysql ne donne aucune erreur. (dans MySQL Command line)
-
Erreur MSQL
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