[Delphi/MYSQL] Erreur d'initialisation

Marsh Posté le 06-05-2003 à 13:47:34

Voilà ce que j'ai comme message. Le plus drole, c'est que quand je rentre ce code d'initialisation dans un projet vide, j'ai aucun message d'erreur de ce genre.

var
mySQLConnection : PMYSQL;

procedure TForm1.FormCreate(Sender: TObject);
begin
mySQLConnection := mysql_init(nil ); // Erreur ici
TabCacher;
Accomptes.Visible:=True;
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
mysql_close(mySQLConnection);
end;

J'utilise cette API : http://www.fichtner.net/delphi/mysql/

Une solution ?

Message édité par Slide le 06-05-2003 à 13:47:54

Reply

Marsh Posté le 06-05-2003 à 13:47:34

Reply

Marsh Posté le 06-05-2003 à 14:11:05

Meme ceci ne marche pas !!!

Code :

program Project1;
uses
Forms, mysql in 'mysql.pas',
Unit1 in 'Unit1.pas' {Form1};
{$R *.res}
var mySQLConnection : PMYSQL;
begin
Application.Initialize;
mySQLConnection := mysql_init(nil ); // meme message derreur
Application.CreateForm(TForm1, Form1);
Application.Run;
end.

Reply

Marsh Posté le 06-05-2003 à 14:33:27

ARf, non, c'est moi... j'ai oublié de copier le DLL, je pensais l'avoir mi lol.

Reply

Marsh Posté le 06-05-2003 à 14:41:50

je vois que tu utilise aussi le site de michel
tu a donc du télécharger l'exemple de yannick, si c'est celui ci que tu utilise sache que chez moi il marche tres bien, il faut juste placer le fichier mysql.pas dans le répertoire librairie (Lib) de Delphi.X. et de mettre le fichier libmySQL.dll dans le meme répetoire que le projet.

si je suivit à côté de plaque dsl !
par contre pour ma par en utilisant le module SQLConnection1 je n'arriva pas à tester ma connexion !
vous avez une idée :??: peut - être une solution !
PS : j'utilise une IP dynamique que pointe chez un hebergeur gratuit (no-ip.com) cella fonctionne, mais vu que je n'ai pas une ip dynamique cella pose probleme quand elle change et mon programme plante !

---------------
Tout à commencé par un rêve...

Reply

Marsh Posté le 06-05-2003 à 19:01:31

SteF_DOBERMANN a écrit :

je vois que tu utilise aussi le site de michel

Oui, mais j'etais juste en train de poster le meme post sur le forum de phidels.

SteF_DOBERMANN a écrit :

tu a donc du télécharger l'exemple de yannick, si c'est celui ci que tu utilise sache que chez moi il marche tres bien, il faut juste placer le fichier mysql.pas dans le répertoire librairie (Lib) de Delphi.X. et de mettre le fichier libmySQL.dll dans le meme répetoire que le projet.

Je l'ai download, mais il est trop lourd a comprendre pour un premier abord, donc j'ai direct deleté

SteF_DOBERMANN a écrit :

si je suivit à côté de plaque dsl !
par contre pour ma par en utilisant le module SQLConnection1 je n'arriva pas à tester ma connexion !
vous avez une idée :??: peut - être une solution !
PS : j'utilise une IP dynamique que pointe chez un hebergeur gratuit (no-ip.com) cella fonctionne, mais vu que je n'ai pas une ip dynamique cella pose probleme quand elle change et mon programme plante !

SQLConnection c'est un composant non ? Perso, l'api que l'on a sité tout les 2 marche suffisament bien tu sais

Si sa peut taidé (Car j'ai pas compris ce que tu demandais)

Code :

var mySQLConnection : PMYSQL;
implementation
procedure InitiallisationMYSQL; begin mySQLConnection := mysql_init(nil ); end;
function ConnectionMYSQL(adresseip,utilisateur,passe,bdd:string):boolean;
begin
if mysql_real_connect(mySQLConnection, PAnsiChar(adresseip), PAnsiChar(utilisateur), PAnsiChar(passe), PAnsiChar(bdd), 0, nil , 0) <> nil then begin
result := true;
end else begin
result := false;
end;
end;
procedure FermetureMYSQL; begin mysql_close(mySQLConnection); end;

Reply

Marsh Posté le 06-05-2003 à 19:44:14

j'ai trouvé, c'étais encore plus simple
http://forum.hardware.fr/forum2.ph [...] subcat=391

---------------
Tout à commencé par un rêve...

Reply

[Delphi/MYSQL] Erreur d'initialisation

Sujets relatifs:

Leave a Replay