Connecter Delphi avec SQL Server

6 Avr

Hello les amis! aujourd’hui je vais commencer à faire des posts sur Delphi, oui j’ai bien dit Delphi, je sais que c’est le langage utilisé par les dinosaures pour coder, mais vu qu’il est toujours utilisé en Algérie, surtout en TS ( Technicien supérieur ), je me suis dit que cela serait bien de partager mon savoir faire, surtout que moi même j’ai galéré pour trouver des informations utiles, spécialement tout ce qui concerne Delphi + SQL Server

Nous allons commencer aujourd’hui par une simple application qui fait simplement qu’afficher les données relatives à une table Clients, pour une première fois je vais expliquer étape par étape comment réaliser cela, c’est à dire de la création de la base de données sur SQL Server jusqu’à relier Delphi à SQL Server

Création de la base de données

Tout d’abord sur SQL Server aller au niveau de Nouvelle requête

Après vous allez avoir la possibilité d’insérer votre code

Maintenant nous pouvons enfin créer notre base de données

Sélectionner le code puis cliquez sur Exécuter ou sinon vous pouvez appuyer sur la touche F5

L’étape suivante et de cliquer sur la liste déroulante ou il y a master et de sélectionner le nom de la base de données que vous avez créer, par exemple dans notre cas ici c’est MY_BDD

Après la sélection, vous exécuter le code suivant afin de créer la table client + l’insertion des données

Si tout s’est déroulé correctement, normalement maintenant nous sommes prêt à aller vers l’application Delphi

Connectez Delphi à SQL Server

De mon côté j’utilise Delphi XE7 en Anglais, normalement cela ne devrait pas vous poser de problème, ce n’est pas difficile à comprendre, malgré que je vous recommande fortement d’utilisé l’IDE en anglais, cela vous serez vraiment utile dans votre recherche le cas où vous auriez une erreur.

Bref revenons à nos moutons, vous faîtes File -> New -> VCL Forms Application – Delphi

Vous allez normalement avoir le même résultat que moi

 

Bien maintenant nous allons faire en sorte de permettre à Delphi de se connecter à SQL Server.

Tout d’abord, en bas à droite, recherchez les éléments suivants :

ADOConnection, ADOTable, DataSource et copiez au niveau de votre Form ( c’est du Drag and Drop ), vous allez avoir le résultat suivant :

Cliquez sur ADOConnection1 et allez sur ConnectionString et cliquez sur les trois petits points

Sélectionnez la deuxième option et cliquez sur Build

Sélectionnez la dernière option, c’est à dire SQL Server Native Client 11.0

Delphi SQL Server connexion

Vous allez avoir cela :

Delphi SQL Server connexion

Comment faire pour avoir le nom du serveur ?

C’est très simple, allez au niveau de SQL Server, puis à l’explorateur d’objets

SQL Server Explorateur d'objets

Sélectionnez le premier élement et vous faîtes Clique droite -> Propriétés 

Vous copiez le nom au niveau de Delphi comme je l’ai fait, et vous sélectionnez notre base de données MY_BDD

 

Super, maintenant nous allons relier notre ADOTable1 avec notre ADOConnection1, pour cela il faut aller au niveau de l’inspecteur d’objet de notre ADOTable et de sélectionner Connection et de sélectionner ADOConnection1

Même chose pour notre DataSource1, vous allez sur DataSet et vous sélectionner ADOTable1

Delphi XE7 Object Inspector

 

Depuis la Tool Palette qui se trouve en bas à droite, vous insérez dans votre Form DBNavigator & DBGrid et au niveau de leurs propriétés, je parle de DataSource, vous sélectionnez  DataSource1

Delphi XE7 Application   Delphi XE7 Application

A ce stage là, il y a quelques réglages à faire pour que tout fonctionne correctement et qui sont les suivants :

  • Au niveau de ADOConnection1 mettez la propriété LoginPrompt a false
  • Sur ADOTable1 au niveau de TableName, sélectionnez Clients et pour la propriété Active mettez la à true

Normalement si vous avez tout juste, vous allez obtenir ce résultat

Delphi XE7 Application

Maintenant cliquez sur l’icône verte pour lancer l’application et admirez le résultat

Delphi Application

Vous pouvez même ajouter/modifier/supprimez des clients, c’est trop cool non ?

Delphi Application

 

Bref voilà pour cette fois, j’ai essayé de mettre le plus de détails possible afin que vous puissiez arriver au même résultat que moi, je doute que je vais garder ce genre de format de post, peut-être que faire des vidéos est plus approprié ? dites-moi ce que vous en penser par le biais des commentaires ou en utilisant ceci ! à la prochaine !

11 Replies to “Connecter Delphi avec SQL Server

  1. Pingback: Créer une jointure sur deux tables avec Delphi - Technicien Supérieur

  2. Bonjour Tous le Monde,

    J’ai développer une application avec delphi7 et sql server 2008 qui se communiquent par in fichier INI. tous marchent très bien.

    ini files:
    [Parametre de Connection]
    provider=SQLOLEDB.1
    Integrated Security=SSPI
    Trusted_Connection=Yes
    Initial catalog=SQL_UMC
    Data Source=10.15.60.2\SQLEXPRESS

    le problème que j’ai changer de machine, j’ai installer SQL server 2008 je me connecte a la BDD sans problème avec sql server management studio. j’ai cree tous le connexion.

    Mais quand j’execute mon programme delphi il m’affiche une erreur
    ‘[DBNetLib][ConnectionOpen] Ce serveur n’existe pas ou accès refusé’

    je clique sur Ok il me refait le même message et la 2 eme fois quand je clique sur ok il se connecter le plus normalement du monde.

    pouvez vous m’aider s’il vous plait pour savoir comment remédier a cette erreur.

    Merci d’avance.

    cordialement

    • Franchement sur ce coup la, aucune idée car j’utilise toujours ConnectionString pour faire la liason.

      Mais quel est l’intêrét de passer par le fichier INI alors qu’avec ConnectionString cela fonctionne bien ?

Laisser un commentaire

Votre adresse e-mail ne sera pas publiée. Les champs obligatoires sont indiqués avec *