Data_module.pas(20,25) Error: identificateur TMySQL50Connection non trouvé
Bonjour,
Comme on dit souvent tout est dans le titre ....
Donc j'ai maintenant un datamodule en plus dans mon appli.
Il convient donc de réaffecter mes composants et modifier mon code en conséquence...
Pour les composants pas de problème le dbgrid accepte la nouvelle architecture les DBText et DBEdit pareillement.
Par contre pour le code il faut que je rajoute le préfixe de la "form DataModule" à savoir d_m
Avant
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
| ///////////////////////////////////////////
// Initialisation du SGBD
///////////////////////////////////////////
procedure Tf_princ.FormShow(Sender: TObject);
begin
try
bd_SPF.connected:=True;
except
showmessage('Problème de serveur MySQL');
End;
If bd_SPF.connected
Then v_connected:=bd_SPF.connected
Else v_connected:=False;
end; |
Après
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
| ///////////////////////////////////////////
// Initialisation du SGBD
///////////////////////////////////////////
procedure Tf_princ.FormShow(Sender: TObject);
begin
try
d_m.bd_SPF.connected:=True;
except
showmessage('Problème de serveur MySQL');
End;
If bd_SPF.connected
Then v_connected:=bd_SPF.connected
Else v_connected:=False;
end; |
Impossible d'utiliser mon sql50connection ... tout est active:=False
Peut pas avancer sans mon sql50connection !!!!
BUG Répertorié : http://62.166.198.202/view.php?id=8952
Comment faire pour le contourner ???
Eric