Append ou Insert quel est votre choix?

**souminet** · 03/03/2008, 09h52

Bonjour à tous

Voilà j'utilise pour insérer des enregistrements au sein d'une table DBASE IV le code suivant:

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
procedure TFSaisie.AjoutButton2Click(Sender: TObject);
begin
  if Typecombo.Text <> '' then
    begin
     datamodule3.TabMission.Open;
     datamodule3.TabMission.append;
     datamodule3.TabMission.Fieldvalues['MATRICULE']:=datamodule3.personnel.Fieldvalues['MATRICULE'];
     datamodule3.TabMission.Fieldvalues['NOM']:=datamodule3.personnel.Fieldvalues['NOM'];
     datamodule3.TabMission.Fieldvalues['PRENOM']:=datamodule3.personnel.Fieldvalues['PRENOM'];
     datamodule3.TabMission.Fieldvalues['FONCTION']:=datamodule3.personnel.Fieldvalues['FONCTION'];
     datamodule3.TabMission.Fieldvalues['DEPT']:=datamodule3.personnel.Fieldvalues['DEPT'];
     datamodule3.TabMission.Fieldvalues['DATE_DEB']:=StrToDate(DateMaskEdit.Text);
     datamodule3.TabMission.Fieldvalues['DATE_FIN']:=StrToDate(DateMaskEdit2.Text);
     datamodule3.TabMission.Fieldvalues['TYPE']:=TypeCombo.text;
     datamodule3.TabMission.post;
     end;
 
end;

Je me suis documentée sur les 2 procédures: Append et Insert et il semblerais que je ne sois pas obligée de commencer par :

Code :

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

datamodule3.TabMission.Open;

Je voudrais juste savoir si le fait de garder cette instruction ne risque pas de générer de mauvaises surprises, ou au contraire de l'enlever risquerais de faire débouler des erreurs du genre : ensemble fermé ou encore la table n'est pas en mode Insertion...
Merci +++

**ShaiLeTroll** · 03/03/2008, 10h07

Il faut toujours ouvrir la table avant une manipulation de lecture\écriture, voir le champ Active ...

Après, si tu fais un Open systèmatiquement, mieux vaut faire un close aussi, cela risque par contre d'être plus lent

en DBase ou Paradox, on ouvre les tables plus usités de l'application dans le OnCreate du DataModule, et on les ferme à sa destruction, ... je dis ça par c'est ce que j'ai vu, ce n'est pas le mieux (mais le plus pratique), si l'on veut faire du multi-utilisateur avec DBase, il vaut mieux ouvrir le minimum de temps que possible ...

**souminet** · 03/03/2008, 10h20

Oui, mais si je remplace les 2 instructions suivantes:

Code :

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

1
2
datamodule3.TabMission.Open;
datamodule3.TabMission.append;

Par celles ci:

Code :

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

1
2
datamodule3.TabMission.First;
datamodule3.TabMission.Insert;

Car en fin de compte j'aurais besoin que les enregistrements soient insérés au début de ma table, je vois que ça marche parfaitement sans pour autant ajouter une instruction pour l'ouverture de la table...

Est ce que cela risque de créer des problèmes à l'avenir , Dans le cas de : Multi-utilisateurs , ou encore des accès différents en écriture et en lecture à partir de 2 fiches simultanément ouvertes qui risquerait de générer des erreurs ???

Merci+++++

**ShaiLeTroll** · 03/03/2008, 17h29

tu devrais relire l'aide, chaque fonction a une utilité propre, consulte aussi les Tutoriels du Forum, et les Exemples fourni avec le CD de Delphi, ...

Open est un équivalent de Active := True, cela peut être mis via l'inspecteur d'Objet, comme je l'ai dit, Open est au moins appelé une fois dans l'application, avec son close qui va Avec
Append ou Insert ajoute tout deux un enregistrement, il est juste géré différement dans la table en fonction de l'index, personnellement, je n'utilise que Append (parce que c'est le 1er que l'on m'a appris depuis je n'ai pas changé)
D'ailleurs, il facile de voir la différence entre ces deux fonctions, lorsque l'on a une DBGrid, si l'on appuye sur Insert cela lance la fonction Insert, et lorsqu'on ajoute une ligne avec la touche fleche bas alors que l'on est sur la dernière ligne, cela lance Append ... mais essaye avec un TClientDataSet, tu verras que Insert ou Append ça fait pareil, pour les tables SQL cela ne change rien non plus, moi sous paradox n'ayant eu que des tables avec au moins un AutoInc comme clé primaire, je n'ai jamais non plus eu de différence ...
First c'est pour déplacer le curseur au début de la table

Sinon, pour DBase, il y a les composants Apollo, ils sont nettement plus performants que ceux du BDE avec un langage de requête particulier (le SQL via BDE étant bcp trop lent sur DBase), et cette lib, te posera bcp moins de problème pour du multi-utilisateur ...