Lazarus - Login à une Base de Données Access protégée par mot de passe

 

Description :

Exemple d'une application créée avec Lazarus qui permet de se connecter à une base de données Microsoft Office Access protégée par un mot de passe de sécurité.

Exemple 1 : Débutant V1

Exemple simple, pour ça il faut définir manuellement le chemin vers la base de données "Materiels_Informatique.mdb" ou "Materiels_Informatique.accdb" dans les propriétés du composant ADOConnection1 comme suite :

- Pour base de données Access 2002-2003 (*.mdb) et 2007 (*.accdb)  :

with dm.ODBCConnection1 do

begin

Close;

LoginPrompt:=false;

KeepConnection:=true;

Driver:='Microsoft Access Driver (*.mdb, *.accdb)';

{dm.ODBCConnection1.Params : Paramètres de ODBCConnection1}

params.Clear;

Params.Add('DBQ='+ExtractFilePath(Application.ExeName)+'Materiels_Informatique.accdb'); //Chemin vers la base de données Access (.mdb ou .accdb)

Params.Add('Locale Identifier=1031');

Params.Add('PWD='+Edit_MotDePasse.Text); //Mot de passe de la base de données

end;{with dm.ODBCConnection1}

 

Voir: Lazarus - Comment connecter ODBCConnection1 à une base de données Microsoft Access protégée par un mot de passe de sécurité 

 

Dans l’unité « Project1 », la forme « F_login » doit être la forme qui se créer en premier, pour que lorsque on lance l’application c’est la forme « F_login » qui va s’afficher en premier et sera la forme principale du projet Lazarus, comme suite :

 

Exemple 2 : Débutant V2

 

Liens pour télécharger les codes sources des projets Lazarus :

Débutant V1 + V2 : Télécharger depuis (Google Drive)