Discussion :

[info_sara]

bonjour,
regardez le code suivant

Code :

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

1
2
3
4
5
while not DBGrid1.Datasource.dataset.EOF do
begin
  Somme := Somme + 1;
  DBGrid1.datasource.dataset.Next();
end;

dans ma table il y a un champ 'justification' elle peut contenir 2 choses soit justifier ou non justifier
je veux ajouter un condition que la somme ne peut pas calculer que si la justification est non justifier
j'ai pas pus faire ce condition

[freud]

Salut,

En supposant que votre champ est un boolean, normalement c'est le cas...
et que justification =1 et non justification=0

Code :

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

1
2
3
4
5
6
7
 
while not DBGrid1.Datasource.dataset.EOF do
begin
  if Not DBGrid1.Datasource.dataset.FieldByName('justification').AsBoolean Then
  Somme := Somme + 1;
  DBGrid1.datasource.dataset.Next();
end;

Mais le faire depuis la table auquel est lié le dbgrid c'est mieux :

Code :

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

1
2
3
4
5
6
7
 
while not Table1.EOF do
begin
  if Not Table1.FieldByName('justification').AsBoolean Then
  Somme := Somme + 1;
  Table1.Next;
end;