Discussion :

[stfanny31]

salut
je ss un peut perdu avec ma table je c'est pas comment la manipuler

je comprend pas quelle est la différance entre
.append
.edit
.post

en plus je c'est pas comment lui dir :

Code :

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

1
2
if  le champ 'num'=3 then variable :='nom"

j'ai oublier tt la syntax ,si vous pouvé m'aidé cela seré trés cool de vote par
on attand je ss vérment


merci bcp

[ero-sennin]

Salut,

Un petit F1 sur les mots que tu cites t'aurai permis de trouver facilement :

- Append : Ajoute un nouvel enregistrement vide àla fin de l'ensemble de données.
- Edit : Permet la modification des données de l'ensemble de données.
- Post : Ecrit un enregistrement modifiédans la base de données.

Pour ce qui est du reste,ca ressemblerait à ceci (non testé ) :

Code :

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

1
2
3
4
5
6
7
Table1.First;
  while not Table1.Eof do
  begin
    if Table1.FieldByName('MonChamps').AsString = 3 then
      variable:= 'nom'; 
    Table1.Next;
  end;

[stfanny31]

Salut,

merci ,j'ai bien lu le help delphi mais ,il y'a comment un chovrochement entre les diffinition

et pour votre code

Code :

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

1
2
3
4
5
6
7
Table1.First;
  while not Table1.Eof do
  begin
    if Table1.FieldByName('MonChamps').AsString 3 then
      variable:= 'nom'; 
    Table1.Next;
  end;

cela me marche pâs car la table n'est pas en mode edition
merci d'avoir esséyé

[SergioMaster]

Bien moins rapide que du SQL

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Table1.First;
  while not Table1.Eof do
  begin
    if Table1.FieldByName('MonChamps').AsString='3' 
     then begin
        Table1.edit;  // mise en mode edition de table1
        Table1.FieldbyName('variable').asString:= 'nom';  // une modification de valeur
        Table1.post; // validation de la modif
     end; 
    Table1.Next;
  end;

nota
Append // ajoute un enregistrement en fin de table
Insert // inserre un enregistrement dans la table
Edit // Met l'enregistrement en cours en mode Edition
Post // Valide les changements(modif/insertion/ajout) dans la table

et SVP un petit effort

[stfanny31]

Mr SergioMaster

votre code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Table1.First;
  while not Table1.Eof do
  begin
    if Table1.FieldByName('MonChamps').AsString='3' 
     then begin
        Table1.edit;  // mise en mode edition de table1
        Table1.FieldbyName('variable').asString:= 'nom';  // une modification de valeur
        Table1.post; // validation de la modif
     end; 
    Table1.Next;
  end;

est une vrais merveille
''c'est les chose les plus simple qui nous font le plus plaisir''

merci bcp

[stfanny31]

slt Mr SergioMaster
comment supprimer un enregistremnt et ne pas l'aisser un espace vide dans la table ??
j'ai utilser table1.delelte mais ,il reste un espace vide

[SergioMaster]

comment supprimer un enregistrement et ne pas laisser un espace vide dans la table ??

je ne comprend pas vraiment la notion d'espace vide . Je présume (ce que je n'aime pas faire) à la vue de tes différents posts que tu as une table avec des enregistrements numérotés , et que tu veux que les numéros se suivent même apres un delete ce qui oblige naturellement a tout renuméroter
alors là : vive le SQL et encore mieux les triggers d'une BDD digne de ce nom

pour paradox je ferais quelque chose du genre

Code :

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

1
2
3
4
5
 
Query1.SQL.Clear;
Query1.SQL.Add('UPDATE LATABLE SET NUM=NUM-1 WHERE NUM>:N');
Query1.ParamByName('N').asinteger:=numefface // le n° d'enregistrement effacé
Query1.ExecSQL;

[stfanny31]

Bonjour Mr SergioMaster;

je ne comprend pas vraiment la notion d'espace vide

j'ai une table avec des donné numéroté et j'ai 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
 
procedure form1.FormShow(Sender: TObject);
begin
     f1.TbleEta.FIRST;
       while not f1.TbleEta.EOF do
          begin
               {} table1.edit;
               {} combobox.Items.Add(f1.TbleEta.FindField('num').Asstring);
               {} table1.POST;
               {} table1.NEXT;
             end;
end;

mais quant je supprime un enregistrement avec :

Code :

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

table1.DeleteIndex

a l'ouverture de ma forme mon combobox contiens des espace vide

ce que je vous demande ,est si il y'a une instruction que je dois placé aprés mon

Code :

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

table1.DeleteIndex

pour retiré cette enregistrement

merci bcp

[evarisnea]

pour supprimer un enregistrement c'est plutôt

Code :

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

Table1.Delete;

[SergioMaster]

+1 pour le Delete

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
procedure form1.FormShow(Sender: TObject);
begin
     f1.TbleEta.FIRST;
       while not f1.TbleEta.EOF do
          begin
               {} table1.edit;
               {} combobox.Items.Add(f1.TbleEta.FindField('num').Asstring);
               {} table1.POST;
               {} table1.NEXT;
             end;
end;

de plus dans ce code je ne vois pas l'utilité du Edit, ni du Post
puisque aucune donnée n'est modifiée . En effet selon ce code il s'agit juste de remplir un combobox

[stfanny31]

Mr:SergioMaster salut

...de plus dans ce code je ne vois pas l'utilité du Edit, ni du Post
puisque aucune donnée n'est modifiée

vous avez raison mais j'obtien tt le temps le message

la table n'est pas on mode edition

que j'ai pris l'abitude le toujour l'ouvrir avant

mais j'ai pas compri :

+1 pour le Delete

si vous pouvé etre plus explicite
merci bcp

[Aka Guymelef]

La méthode DeleteIndex permet de supprimer un index (ici avec un TTable, cela supprime l'index sur la table elle-même en base de donnée !). Ce qui n'est pas du tout ce que vous voulez faire. Il faut utiliser la méthode Delete du TTable pour supprimer un enregistrement, une fois que êtes positionné sur le bon enregistrement bien sûr.

[SergioMaster]

+1 pour le Delete

vaut simplement dire que je suis d'accord avec le post de Evarisnea à savoir qu'il faut utiliser DELETE pour supprimer un enregistrement et non DELETEINDEX qui supprime un index

Ensuite

Code :

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

1
2
3
4
5
6
7
8
9
10
 
procedure form1.FormShow(Sender: TObject);
begin
     f1.TbleEta.FIRST;
       while not f1.TbleEta.EOF do
          begin
               {} combobox.Items.Add(f1.TbleEta.FindField('num').Asstring);
                f1.TbleEta.Next;   
             end;
end;

serait le bon code , en effet le code que tu proposes fait un boucle "infinie" puisque si f1.TbleEta contient des enregistrements le "curseur" ne bougera pas.

Enfin pour ce qui est du message

la table n'est pas en mode Edition

Quelle table ? Table1 ou f1.TbleEta là est la question (Hamlet )

[stfanny31]

salut tt le monde
oups je suis désolé

Quelle table ? Table1 ou f1.TbleEta là est la question

on faite Table1 c'est f1.TbleEta et j'ai changé le code pour que vous puissiez me comprendre et j'ai pas tout changé d'aprés ce que je vois

mais moi je pencé a une instruction qui est le contraire de
.next (next avant)
je veu l'instruction pr rementé en arriére vous voyé

merci bcp

[evarisnea]

mais moi je pencé a une instruction qui est le contraire de
.next (next avant)
je veu l'instruction pr rementé en arriére vous voyé

Code :

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

1
2
3
4
Table1.First; //aller au tout premier enregistrement
Table1.Previous; //aller à l'enregistrement précédent
Table1.Next; //aller à l'enregistrement suivant
Table1.Last; //aller au dernier enregistrement

toutes les méthodes et propriétés, ainsi que leur signification/utilité se trouvent dans l'aide de delphi, pour peu que l'on s'y intéresse un peu.

[stfanny31]

cher evarisnea salut
merci pour votre aide

toutes les méthodes et propriétés, ainsi que leur signification/utilité se trouvent dans l'aide de delphi, pour peu que l'on s'y intéresse un peu.

je le fais mais,je trouvé un certain chovrochement dans les idé
et avec une explication simple

Table1.First; //aller au tout premier enregistrement

me dis de quelle coté je dois voir la chose
merci bcp