Discussion :

[gentilman_delphi]

Bon soir

J'ai une query de 2 tables paradox et un dbgrid qui affiche les resultats de la requette
la table1 est une table des annee
la table2 est une des articles
la requette affiche les resultats de table article dans une annees designees
et maintenant je veux ajouter des autres articles dans la table article

Comment faire
Merci

[freud]

Bonsoir,

Vous voulez dire inserer des articles par année ?

[gentilman_delphi]

Bonsoir,

Vous voulez dire inserer des articles par année ?

Non;la requette est filtré elle donne les articles suivant l'annee voulu

J'explique: j'ai un projet gestion des stocks
A chaque fin d'annee nous devons cloturer l'annee et demarrer une nouvelle annee dont les valeurs initiales de l'annee( 200x+1) sont les valeurs finale de l'annee (200x)

[freud]

oui mais si il s'agit tout simplement d'inserer un article par query alors

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
 
Var
Qry:TQuery;
Begin
 
Qry:= TQuery.Create(nil);
Qry.SessionName:='Default'; //ou si tu as un composant session Session1.SessionName;
Qry.DatabaseName:='alias',
Qry.SQL.Clear;
 
Qry.SQL.Add('Insert Into ARTICLE (CodeArticle,Designation,Pu,Annee) VALUES (:Code_article,:Libelle,:Prix,:Annee)');
 
Qry.ParamByName('Code_article').AsInteger:=Code_article;
Qry.ParamByName('Libelle').AsString:=Libelle;
Qry.ParamByName('Prix').AsCurrency:=Prix;
Qry.ParamByName('Annee').AsInteger:=Annee;
Qry.ExecSQL;
Qry.Free;
End;

[freud]

Code_article,Libelle,Prix,Annee sont des variables qui recoivent les valeurs des edits lors de la saisie et pour Annee ont peut faire :

Code :

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

1
2
 
Annee:=YearOf(Date);

Pour la fonction YearOf on inclus l'unité DateUtils

[gentilman_delphi]

Code_article,Libelle,Prix,Annee sont des variables qui recoivent les valeurs des edits lors de la saisie et pour Annee ont peut faire :

Code :

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

1
2
 
Annee:=YearOf(Date);

Pour la fonction YearOf on inclus l'unité DateUtils

C'est bon
Mais lors de l'affichage; il parrait que que query n'etait pas active;c'est a dire que le dbgrid de query est vide