[Windows] Connexion MySql 5.1

Version imprimable

Bonjour,

J'ai fais une petite appli sour Ubuntu qui connecte Mysql5.0
Elle fonctionne.

Je veux compiler cette appli sous Windows.
J'ai installé la dernière version de Lazarus sous Windows (mon portable) qui me permet de finir cette appli.
Car sur mon portable et pour la finir, j'ai installé la dernière version de Easyphp qui contient Mysql 5.1.

Mais cette appli n'arrive pas à se connecter ?
Pas plus d'info sur le message d'erreur ; de memoire: "Raised error in EInOutError" à la ligne .open
Code:

1 2 3 4 5 6 7 8 MySQLConnection1: TMySQL50Connection; MySQL50Connection1.HostName := HostEdit.Text; MySQL50Connection1.UserName := UserEdit.Text; MySQL50Connection1.Password := PasswdEdit.Text; MySQL50Connection1.DatabaseName := 'mysql'; MySQL50Connection1.Open;
Une idée ?

29/02/2008, 15h49
gibbe

Bonjour,
as-tu pensé à mettre dans ton projet ou dans un répertoire de recherche windows la librairie libmysql.dll (ou peut-être libmysql50.dll, je ne sais plus)?
03/03/2008, 07h45
panjas51

j'ai cherché, mais je n'ai pas trouvé comment ajouter cete dl dans Lazarus.
Elle est bien présente dans easyPhp,
Comment faire le lien?
03/03/2008, 13h05
M.Dlb

Je ne sais pas comment ça fonctionne, mais essaye de copier cette librairie dans le même répertoire que l'exécutable lazarus ?
04/03/2008, 09h28
gibbe

Sur mon poste elle est présente dans c:\windows\system32
04/03/2008, 12h58
panjas51

j'ai essayé le la mettre dans le repertoire d'appli, mais je vais essayer dans System 32.

Je vous tiens au courant.

Merci
04/03/2008, 12h59
panjas51

Citation:

Envoyé par gibbe

Bonjour,
as-tu pensé à mettre dans ton projet ou dans un répertoire de recherche windows la librairie libmysql.dll (ou peut-être libmysql50.dll, je ne sais plus)?

Je n'ai que la dll libmysql.dll
Je viens de lire quelque part, qu'il faut peut être renommer cette dll en l'appellant libmysql50.dll

Je vais essayer avec les Deux..
04/03/2008, 16h48
panjas51

Ca ne marche pas....

Même après un reboot PC

Ton code semble étrange. As-tu posé l'objet connexion sur la fiche?

Lazarus cherche bien la dll du nom de libmysql.dll. Par contre vérifies qu'il s'agit bien de la version 5.0 (la mienne fait 1436 ko) et mets la dans le répertoire de ton projet. Attention il existe aussi libmysqld.dll, à ne pas confondre!
Voila le code d'une unité qui comporte trois boutons connecter,deconnecter,sortir:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
 
unit Unit1; 
 
{$mode objfpc}{$H+}
 
interface
 
uses
  Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, StdCtrls,
  mysql50conn;
 
type
 
  { TForm1 }
 
  TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    Button3: TButton;
    MySQL50Connection1: TMySQL50Connection;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
  private
    { private declarations }
  public
    { public declarations }
  end; 
 
var
  Form1: TForm1; 
 
implementation
 
{ TForm1 }
 
procedure TForm1.Button1Click(Sender: TObject);
begin
  application.terminate;
end;
 
procedure TForm1.Button2Click(Sender: TObject);
begin
  MySQL50Connection1.HostName := HostEdit.Text;
  MySQL50Connection1.UserName := UserEdit.Text;
  MySQL50Connection1.Password := PasswdEdit.Text;
  MySQL50Connection1.DatabaseName := 'mysql';
  MySQL50Connection1.connected:=true;
  if MySQL50Connection1.connected then
    showmessage('La base mysql est connectée')
    else
    showmessage('La connexion a échoué!');
end;
 
procedure TForm1.Button3Click(Sender: TObject);
begin
  MySQL50Connection1.connected:=false;
  if MySQL50Connection1.connected then
    showmessage('La deconnexion a échoué!')
    else
    showmessage('La base mysql est déconnectée');
end;
 
initialization
  {$I unit1.lrs}
 
end.

Bonne chance.

05/03/2008, 20h13
panjas51

1) Merci du bout de code..

2), ca foncgtionne effectivement , mais avec bien du mal..
Reboot Pc, Reboot Easyphp.
Création d'un nouveau projet...

Enfin, ca marche.
Merci à tous.:yaisse2: