Discussion :

[phochka]

Bonjour,
Comment peut-on récuperer lorsqu'on clique sur la cellule la valeur d'un DBGrid et l'utiliser dans un SQL?
je m'explique:
Mon DBGrid affiche C=la clé unique, N=Nom.
J'ai vu un truc dans la FAQ que pour récupérer cette valeur, il faut faire:
Edit1.Text := DBGrid1.Columns[0].Field.AsString;

Je veux récupérer la valeur de C et l'utiliser dans un Query Q1 tel que:
Q1.SQL.Add('Select C from table');
Delphi m'indique que C n'a pas de valeur par défaut.
quelqu'un peut-il m'aider?
Merci

[MD Software]

J'ai pas tout compris.
C'est ça que tu veux faire ?

Code :

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

Q1.SQL.Add('Select '+DBGrid1.Columns[0].Field.AsString+' from table');

[SubZero2]

Si ce que tu veux c'est recuperer la valeur du champs "C" de ta premiere requete pour l'utiliser dans une autre ??

Tu doit pouvoir faire :

Code :

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

DBGrid.DataSource.DataSet.FieldByName('C').AsString;

[LadyWasky]

D'abord, j'ai l'impression que tu n'as pas utilisé ta valeur au bon endroit dans ton sql.
Le format d'un SELECT c'est :

SELECT <Nom des champ que tu souhaite récupérer> FROM <Nom de la table> WHERE <Condition>

ou, si tu veux tous les champs de ta table :

SELECT * FROM <Nom de la table> WHERE <Condition>

C'est sans doute après le WHERE que tu dois avoir besoin de C :

SELECT champ1,champ2,champ3 FROM TaTable WHERE (champ1=Valeur_de_C)

Un exemple,
Dans l'évènement OnCellClick de ton DBGrid, tu fais

Code :

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

1
2
3
4
5
6
7
8
9
10
 
procedure TForm1.DBGrid1CellClick(Column: TColumn);
var C:string;
begin
  C:=DBGrid1.Columns[0].Field.AsString; 
 
  if Q1.Active then Q1.Close; // sinon on ne peu pas faire ce qui suit...
  Q1.SQL.Text:='Select champ1,champ2,champ3 FROM TaTable WHERE (champ1='+C+')';
  Q1.Open;
end;

Pardon si je me suis trompé...