Discussion :

[__sPiKe__]

Bonjour à tous,

J'ai 2 tables : Clients_tbl & Appels_tbl

J'aimerai comparer une valeur de ma table avec celle d'un TEdit :

Je récupère dans un TEdit l'id d'une personne de la table clients,

à partir de cette id je veux afficher les appels correspondant à celui-ci.

C'est à dire que l'id d'un personne est unique, mais je peux avoir plusieurs appels pour cette personne donc tous les appels auront l'id de la personne.

Et donc une fois que je récupère l'id de la personne je veux afficher tous les appels de cette personne dans un DBGrid.

Si quelqu'un a une idée merci bcp

[sat83]

Il suffit de modifier ta requête en ajoutant une clause "WHERE".

Par exmeple, en admettant que ton DBGrid soit relié à un composant TQuery appelé Query1, et que l'ID de la personne soit stockée dans Edit1:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Query1->Active = false ;
Query1->SQL->Clear() ;
Query1->SQL->Add( "SELECT * FROM Appels_tbl" ) ;
Query1->SQL->Add( "WHERE id_person = " + Edit1->Text ) ;
Query1->Active = true;

[__sPiKe__]

Arf ça marche pas, pourtant j'ai vérifié dans mon TEdit j'ai bien la bonne valeur de l'id mais ma condition ne marche pas à chaque fois il me prend toutes les valeurs de ma table Appels :s

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
  Debug->Clear() ;
  Debug->Lines->Add(Ed_Id->Text) ;
 
  Tbl_Appels->Open() ;
  QAppels->SQL->Clear() ;
  QAppels->SQL->Add("SELECT * FROM Appels_tbl") ;
  QAppels->SQL->Add("WHERE Appels_tbl.id ="+Ed_Id->Text) ;
  QAppels->Active = true  ;
  QAppels->Open() ;

[sat83]

QAppels->Active = true ;
QAppels->Open() ;

Ces deux lignes font la même chose, tu peut virer soit l'une, soit l'autre.

A mon avis ton DBGrid est relié à ta TTable Tbl_Appels, et pas à ton TQuery QAppels.

Vérifie bien celà! (Vérifie la propriété DataSource de ton DBGrid. Le composant TDatasource indiqué doit pointé sur QAppels, et pas sur Tbl_Appels)

[__sPiKe__]

Voilà ce que j'ai :

MaSession(TSession) -> avs_dB(TDataBase) -> Appels_Tbl(TTable) -> DS_Appels(TDataSource) <- QAppels(TQuery)

Paramètres :

avs_dB :
- AliasName : avs_alias
- DataBaseName : avs_db
- SessionName : MaSession

Appels_Tbl :
- Active :True
- DataBaseName : avs_db
- SessionName : MaSession
- TableName : appels_tbl

DS_Appels :
- AutoEdit : False
- DataSet : Tbl_Appels

QAppels :
- DataBaseName : avs_db
- DataSource : DS_Appels
- SessionName : MaSession
- SQL : J'ai rien mis..

DBAppels(DBGrid) :
- DataSource : DS_Appels

Dans cette configuration je ne peux pas choisir QAppels dans le DataSource pour mon DBAppels(DBGrid).

[cedni]

Salut
Peut etre mais pas sur

QAppels->SQL->Add("WHERE Appels_tbl.id ="+Ed_Id->Text.c_str() ) ;

[__sPiKe__]

Hum ..

[BCC32 Erreur] FenPrinc.cpp(267): E2085 Addition de pointeur incorrecte

[cedni]

QAppels->SQL->Add("WHERE Appels_tbl.id ="+Ed_Id->Text.c_str() ) ;


donne

QAppels->SQL->Add("WHERE Appels_tbl.id =" ) ;
QAppels->SQL->Add(Ed_Id->Text.c_str() ) ;

et / ou

La valeur ne doit pas etre envoyée avec des guillements vers sql ?
Ne pas oublier de les echapper

[__sPiKe__]

Je vais tester ça, mais je doute que sa marche, je dois avoir un problème autre part car je vois vraiment pas pourquoi il m'affiche tout le temps toute la table :/


Edit: Je viens de voir qu'en faite il m'affiche toujours TOUTE la table, on dirait qu'il fait un SELECT * et puis c'est tout :/
Trop bizarre..

[sat83]

avs_dB :
- AliasName : avs_alias
- DataBaseName : avs_db
- SessionName : MaSession

Appels_Tbl :
- Active :True
- DataBaseName : avs_db
- SessionName : MaSession
- TableName : appels_tbl

DS_Appels :
- AutoEdit : False
- DataSet : QAppels

QAppels :
- DataBaseName : avs_db
- DataSource : /
- SessionName : MaSession
- SQL : J'ai rien mis..

DBAppels(DBGrid) :
- DataSource : DS_Appels

Et pour Appels_Tbl tu n'en a pas besoin (sauf il t'est utile a autre chose dans ton programme).

La valeur ne doit pas etre envoyée avec des guillements vers sql ?
Ne pas oublier de les echapper

Ca depend du SGBD, mais en général pour les champs de type entier il n'y a pas besoin de guillemets.
Si le problème venait de la requête, il aurait droit à une belle exception SQL...
Or là l'erreur vient simplement du faite que son DBGrid affiche Appels_Tbl et non pas QAppels.

[__sPiKe__]

DS_Appels :
- AutoEdit : False
- DataSet : QAppels

QAppels :
- DataBaseName : avs_db
- DataSource : /
- SessionName : MaSession
- SQL : J'ai rien mis..

Problème résolue !

C'était ça en effet ! Merci


EDIT : Pour pouvoir voyager dans un DBGrid avec les fonctions First, Next, Prior et Last faut-il obligatoirement afficher la table entière ou juste par une requête TQuery ?
Car lorsque j'utilise la requête pour voir toute la table mon curseur sur le DBGrid ne bouge plus alors qu'il effectue bien les opérations Next, Prior...

[sat83]

Pour pouvoir voyager dans un DBGrid avec les fonctions First, Next, Prior et Last faut-il obligatoirement afficher la table entière ou juste par une requête TQuery ?
Car lorsque j'utilise la requête pour voir toute la table mon curseur sur le DBGrid ne bouge plus alors qu'il effectue bien les opérations Next, Prior...

Je ne comprend pas trop ta question.
First, Next, Prior ou Last fonctionnent avec un TQuery (TTable et TQuery ont le même ancêtre TDataSet).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
QAppels->First() ;
QAppels->Next() ;
QAppels->Prior() ;
QAppels->Last() ;

En effectuant une de ces actions tu verra la sélection de ton DBGrid changer. (Encore une fois bien évidemment uniquement si ton DBGrid est relié à ton TQuery!)

[__sPiKe__]

Ah ok j'ai tout compris je pense !

En fait mon Last, Next .. ne marchait plus car ils pointés sur ma table est non ma requête !

Voilà tout est réglé !

Merci bien