Discussion :

[Toncard]

Bonjour,

Je créer une application concernant la gestion de devis, pour se faire j'ai une stringgrid où je rempli mes infos en choisissant dans une liste de produit.
Ma seule question est que j'aimerai savoir comment on enregistre dans une base de données les valeurs contenues dans un tableau.Je voudrais pouvoir réutiliser ces informations pour consulter les devis enregistrer.
Je sais que c'est une question relativement peu compliquée, mais j'ai totalement oublié la syntaxe.

merci

[ero-sennin]

Salut,

Pour enregistrer tes infos dans la bdd, il te faut un TQuery (ou équivalent).

Ensuite, tu fais comme ceci:

Code :

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

1
2
3
4
5
Query1.SQL.Clear;
Query1.SQL.Add('Insert into maTable(colonne1,colonne2) values (:valeur1,:valeur2)');
Query1.ParamByName('valeur1').AsInteger:=TaValeur1;//AsInteger => entier
Query1.ParamByName('valeur2').AsString:=TaValeur2;//AsString => Chaine
Query1.ExecSQL;

Les :valeur1 et :valeur2 sont des paramètres que tu définis juste après avec ParamByName...

J'espère que cela t'aidera pour commencer!

[Toncard]

Je ne peut pas utiliser de TQuery(c'est une application pour mes études et il est interdit (pas du gout des professeurs)d'utiliser le TQuery lol, bien que je trouve ca plus pratique mais bon).
Je pensai plutot a des array[,,????] je sais plus trop comment c'est!Il n'y a pas moyen de récupérer des informations comme ca?

[ero-sennin]

Personnellement, je ne vois pas trop comment faire puisque dans n'importe quel cas, tu dois avoir un accès à ta BDD pour y mettre tes informations.

Pour ma part, je ne peux t'aider d'avantage ... j'utilise principalement ce composant dès que je veux me connecter à une BDD

Bon courage, en espérant que quelqu'un s'y connaisse beaucoup mieux que moi

[banban54]

bonjour

un exemple pour du Paradox

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
 
    with TTable.Create(nil) do try
      DatabaseName := 'TaDatabase';
      TableType := ttDefault;
      TableName := 'TableName.DB' ;
      open;
      edit;          //
      for i := 1 to StrGrid1.RowCount -1 do begin // chaque Ligne
          append;
          for j :=  1erCol to DernCol do
            if StrGrid1.Cells[j,i] <> '' then  // chaque colonne
              fields[j+1].Value := StrGrid1.Cells[j,i];  
          post;
      end;
      close;
    finally
      Free;
    end;

après à vous d'adapter en fonction du type de données et de la BD

à plus

[MelkInarian]

Si tu cherches bien dans ce site, tu trouveras comment enregistrer un TStringGrid dans un fichiers CSV, c'est un peu archaïque comme "BDD" mais c'est faisable!

[Rayek]

Je ne peut pas utiliser de TQuery(c'est une application pour mes études et il est interdit (pas du gout des professeurs)d'utiliser le TQuery lol, bien que je trouve ca plus pratique mais bon).
Je pensai plutot a des array[,,????] je sais plus trop comment c'est!Il n'y a pas moyen de récupérer des informations comme ca?

Change de prof ou change d'école, car de nos jours ne pas utiliser les TxxxQuery avec les bases de données, c'est même pas la peine de penser faire de grosses applications.

Peux tu utiliser au moins un TxxxTable ou c'est interdit aussi par les profs ?
Si tu peux la solution banban54 est je pense la meilleure à mettre en place pour toi si tu n'as pas une table imposée.

Ca me fait penser à un patron d'une société où j'avais fait un stage (y a 9 ans) qui me disait que le SQL c'etait mort et que ca vallait rien ...