requeteur delphi Access

Version imprimable

23/03/2007, 11h38
tomy29

requeteur delphi Access

Bonjour,

Existe-t-il des composants delphi qui permettent d'implémenter un requêteur graphique (un peu a la manière d'Access quand on veut créer une requete en mode graphique)?

Je voudrais permettre à l'utilisateur de choisir les tables, les champs qu'ils veut, peut etre quelques conditions where, des possibilités de Count, etc...

Il me semble qu'un tel composant existe mais je ne me rappelle plus de son nom.

Merci.
23/03/2007, 15h47
aliwassem

Citation:

Envoyé par tomy29

Bonjour,

Existe-t-il des composants delphi qui permettent d'implémenter un requêteur graphique (un peu a la manière d'Access quand on veut créer une requete en mode graphique)?

Je voudrais permettre à l'utilisateur de choisir les tables, les champs qu'ils veut, peut etre quelques conditions where, des possibilités de Count, etc...

Il me semble qu'un tel composant existe mais je ne me rappelle plus de son nom.

Merci.

Salut
Alors si vous utilisez TQuery...... vous pouvez utiliser le SQL builder avec le popmenu du TQuery il va vous aider un peu...........
23/03/2007, 20h31
philnext

Tu as ça : http://fast-report.com/upload/iblock...687c8f10b8.gif
C'est payant mais pas très cher.
24/03/2007, 06h58
Pascal Jankowski

En complément de la réponse de philnext, voici le lien ver le site officiel de query Builder.

J'utilise ce composant et je te le recommande.
28/03/2007, 16h33
tomy29

Citation:

Envoyé par Pascal Jankowski

En complément de la réponse de philnext, voici le lien ver le site officiel de query Builder.

J'utilise ce composant et je te le recommande.

Merci.
Comment fait on pour relier ce composant à une base? il n'y a aucune propriété Database ou quoique ce soit y ressemblant?

Bonjour,

Tu dois dans un tout premier temps définir ta façon d'accéder à ta base de données. Par exemple, si tu désires accéder à ta base via ADO, tu dois alors déposer sur ta TForm un composant TADOConnexion. Dès lors, tu pourras placer un composant TacADOMetadataProvider. Ce dernier composant dispose d'une propriété "Connection". Via l'inspecteur d'objet, tu lies cette propriété au TADOConnexion.

Place ensuite un composant visuel TacQueryBuilder sur ta TForm. Toujours dans l'inspecteur d'objet, repère alors la propriété "MetadataProvider" à laquelle tu renseigneras le nom du composant TacADOMetadataProvider.

Voir dans le source (unité acQBBase.pas) la propriété:
Code:

1 2 3 4 5 6 7 TacQueryBuilder = class(TWinControl, IacSyntaxProviderPropsChanged) ... published ... property MetadataProvider: TacBaseMetadataProvider read fMetadataProvider write SetMetadataProvider;
Tout cela aura pour effet de lier ton TacQueryBuilder à ta base de données.

Selon le type de connexion envisagé avec ton SGBD favori :

Citation:

Envoyé par QueryBuilder

- TacBDEMetadataProvider à lier avec un Tdatabase (BDE)
- TacQBdbExMataDataProvider à lier avec un TSQLDataSet (Dbexpress)
- TacQIBBexMatadataProvider à lier avec un TIBDatabase. (Interbase)

Pour compléter la mise en route du composant TacQueryBuilder, il faudra ensuite choisir un fournisseur de syntaxe.
Par exemple, si tu te connectes à SQLServer, tu déposes sur ta fiche un composant TacMSSQLSyntaxProvider. Te te rends ensuite dans l'inspecteur d'objet pour le composant TacQueryBuilder et tu recherches la propriété SyntaxProvider que tu relies au composant TacMSSQLSyntaxProvider.
Tu peux remarquer qu'il existe de nombreux fournisseurs de syntaxe dans cette suite de composants.

Voir dans le source (unité acQBBase.pas) la propriété:
Code:

1 2 3 4 5 6 7 TacQueryBuilder = class(TWinControl, IacSyntaxProviderPropsChanged) ... published ... property SyntaxProvider: TacBaseSyntaxProvider read fSyntaxProvider write SetSyntaxProvider;
Tu peux maintenant, de façon optionnelle, placer un composant TacSQLBuilderPlainText sur ta TForm afin de récupérer le script SQL de ta requête en cours de construction. Dès que tu places ce composant tu vas dans l'inspecteur d'objet puis tu recherches la propriété QueryBuilder que tu lies à ton TacQueryBuilder.
Ensuite il ne te reste qu'à coder l'événement OnSQLUpdated du composant TacSQLBuilderPlainText.

par exemple si ta Tform dispose d'un composant TMemo:
Code:

1 2 3 4 5 6 7 8 9 10 11 procedure TForm1.acSQLBuilderPlainTextSQLUpdated( Sender: TObject); begin memo1.Lines.BeginUpdate try memo1.Text := acSQLBuilderPlainText1.SQL; finally memo1.Lines.EndUpdate end; end;
Je te conseille d'utiliser non pas un TMemo, mais plutot un composant Synedit. Ce composant te permet de mettre en place la coloration syntaxique ainsi que la fonction de complétion de texte. Cela te donnera un éditeur de script SQL très pro. ;)

Pour finir, je te conseille d'ajouter une fonction qui permet de faire du reverse ingeniering, c'est à dire reconstruire visuellement ta requête à partir d'un script SQL.
Code:

1 2 3 4 5 6 7 8 9 10 procedure TForm1.reverse(Sender: TObject); begin acQueryBuilder1.BeginUpdate; try acQueryBuilder1.SQL := SynEdit1.Text; //ou Memo1.Text finally acQueryBuilder1.EndUpdate; end; end;
En espérant te permettre de démarrer avec la suite de composants QueryBuilder.
Cordialement

29/03/2007, 11h26
tomy29

Merci pour ces infos.
J'ai installé la version Demo téléchargeable sur leur site, mais dans la palette de composants je n'ai pas decomposant TacADOMetadataProvider. Juste des composants de type TMSSQLQueryBuilder(TMySQLQueryBuilder, TDbiQueryBuilder, TSQLQueryBuilder, etc. etc.), et il n'y a pas de propriété Connection pour ce composant.
Il n'y a aucun composant Provider.
29/03/2007, 13h13
Pascal Jankowski

On ne parle pas des mêmes composants:

Tu les a chargé à partir de ce site ? Ce sont les SQL Manager qui n'ont rien à voir avec la suite de composants d'active query builder.

Effectivement, l'utilisation n'est pas du tout celle expliquée ci-dessus.

Par contre tu peux tenter de la mettre en oeuvre en installant la version démo d'active query builder que tu peux trouver à cet endroit.

Par contre la version de démo est limitée de la façon suivante

Cordialement
29/03/2007, 14h29
tomy29

Merci,

bon ben comme ca c'est résolu, ca marche pas avec Access en démo. Ca va etre pratique pour dire a ma MOA si c'est un bon produit.
29/03/2007, 15h09
Rayek

Citation:

Envoyé par tomy29

Merci,

bon ben comme ca c'est résolu, ca marche pas avec Access en démo. Ca va etre pratique pour dire a ma MOA si c'est un bon produit.

Bien sur que si ca focntionne avec ACCESS en mode démo, c'est juste que ca ne fonctionne qu'avec le SQL standard (SQL92) et pas avec le SQL étendue de chaque type de base de données
29/03/2007, 17h05
tomy29

Ah ok, Merci.

Donc la version Demo n'a rien a voir avec Delphi alors. C'est une application a part entière. On ne peut pas l'implémenter dans une appli Delphi.

Juste une question : je suppose que la version Demo n'est pas limité dans le temps? Ses limites concernent juste les fonctionnalités.
30/03/2007, 09h16
Rayek

Lis ce que le site explique.
Je vais pas essayer de comprendre le fonctionnement de composants qui ne me servent pas à ta place :aie: :mrgreen:

Citation:
Envoyé par Pascal Jankowski
Bonjour,

Tu dois dans un tout premier temps définir ta façon d'accéder à ta base de données. Par exemple, si tu désires accéder à ta base via ADO, tu dois alors déposer sur ta TForm un composant TADOConnexion. Dès lors, tu pourras placer un composant TacADOMetadataProvider. Ce dernier composant dispose d'une propriété "Connection". Via l'inspecteur d'objet, tu lies cette propriété au TADOConnexion.

Place ensuite un composant visuel TacQueryBuilder sur ta TForm. Toujours dans l'inspecteur d'objet, repère alors la propriété "MetadataProvider" à laquelle tu renseigneras le nom du composant TacADOMetadataProvider.

Voir dans le source (unité acQBBase.pas) la propriété:
Code:

1 2 3 4 5 6 7 TacQueryBuilder = class(TWinControl, IacSyntaxProviderPropsChanged) ... published ... property MetadataProvider: TacBaseMetadataProvider read fMetadataProvider write SetMetadataProvider;
Tout cela aura pour effet de lier ton TacQueryBuilder à ta base de données.

Selon le type de connexion envisagé avec ton SGBD favori :

Pour compléter la mise en route du composant TacQueryBuilder, il faudra ensuite choisir un fournisseur de syntaxe.
Par exemple, si tu te connectes à SQLServer, tu déposes sur ta fiche un composant TacMSSQLSyntaxProvider. Te te rends ensuite dans l'inspecteur d'objet pour le composant TacQueryBuilder et tu recherches la propriété SyntaxProvider que tu relies au composant TacMSSQLSyntaxProvider.
Tu peux remarquer qu'il existe de nombreux fournisseurs de syntaxe dans cette suite de composants.

Voir dans le source (unité acQBBase.pas) la propriété:
Code:

1 2 3 4 5 6 7 TacQueryBuilder = class(TWinControl, IacSyntaxProviderPropsChanged) ... published ... property SyntaxProvider: TacBaseSyntaxProvider read fSyntaxProvider write SetSyntaxProvider;
Tu peux maintenant, de façon optionnelle, placer un composant TacSQLBuilderPlainText sur ta TForm afin de récupérer le script SQL de ta requête en cours de construction. Dès que tu places ce composant tu vas dans l'inspecteur d'objet puis tu recherches la propriété QueryBuilder que tu lies à ton TacQueryBuilder.
Ensuite il ne te reste qu'à coder l'événement OnSQLUpdated du composant TacSQLBuilderPlainText.

par exemple si ta Tform dispose d'un composant TMemo:
Code:

1 2 3 4 5 6 7 8 9 10 11 procedure TForm1.acSQLBuilderPlainTextSQLUpdated( Sender: TObject); begin memo1.Lines.BeginUpdate try memo1.Text := acSQLBuilderPlainText1.SQL; finally memo1.Lines.EndUpdate end; end;
Je te conseille d'utiliser non pas un TMemo, mais plutot un composant Synedit. Ce composant te permet de mettre en place la coloration syntaxique ainsi que la fonction de complétion de texte. Cela te donnera un éditeur de script SQL très pro. ;)

Pour finir, je te conseille d'ajouter une fonction qui permet de faire du reverse ingeniering, c'est à dire reconstruire visuellement ta requête à partir d'un script SQL.
Code:

1 2 3 4 5 6 7 8 9 10 procedure TForm1.reverse(Sender: TObject); begin acQueryBuilder1.BeginUpdate; try acQueryBuilder1.SQL := SynEdit1.Text; //ou Memo1.Text finally acQueryBuilder1.EndUpdate; end; end;
En espérant te permettre de démarrer avec la suite de composants QueryBuilder.
Cordialement
J'ai téléchargé la version Demo VCL de Query Builder. Mais quand je veux ouvrir leur projet demo il me manque TacADOMetadataProvider , je n'arrive pas à le trouver. Peux tu me renseigner sur ce point là?
Merci.

30/03/2007, 16h25
Pascal Jankowski

http://www.activequerybuilder.com/fe....html?show=vcl

Tu comprendras pourquoi.

Citation:

Envoyé par "Tomy29"

Ca va etre pratique pour dire a ma MOA si c'est un bon produit.

Par contre tu peux tenter une connexion via BDE avec la version d'évaluation des composants et comme cela tu pourras déterminer si ces composants te conviennent et ainsi acquérir ou non la version complète?

Pour info:

Citation:

Envoyé par Pascal Jankowski

- TacBDEMetadataProvider à lier avec un Tdatabase (BDE)

Cordialement
02/04/2007, 10h00
tomy29

Merci.

Le problème c'est que je n'ai pas de TacBDEMetadataProvider pour tenter une connection BDE. Je n'ai aucune metadaprovider dans la version Demo a part :TacEventMetadataProvider.

Donc j'ai peur que pour pouvoir tester Querybuilder sous delphi, il faut l'acheter.
13/04/2007, 16h58
davos56

Bonjour bonjour!!
Je viens mettre mon grain de sel!
Petite question :J'utilise une connexion ODBC pour gerer mes connexions a mes bases de données.

Ce composant est il compatible? Quelqu'un aurais t il des sources disponibles ou il utilise ce composant?

merci!