|
Tutoriaux
- Base de données - Manipulation de données |
Vous serez amener à réaliser quelques opérations
de manipulations de données sur une table.
Ce tutorial présente ses principaux manipulations.
Pour passer en mode
édition, il faut appeler la méthode "Edit".
procedure
TForm1.Button1Click(Sender: TObject);
begin
Table1.Edit;
end;
|
|
Lorsque vous voulez
écrire pu modifier un champ, il faut obligatoirement passer en
mode édition.
Lire la valeur
d'un enregistrement |
Il existe
deux manières de lire la valeur d'un enregistrement.
Vous pouvez utiliser
la méthode par indice de champ.
procedure
TForm1.Button1Click(Sender: TObject);
Var St: string;
begin
St:=Table1.Fields[0].AsString;
end;
|
|
Dans notre exemple, St contiendra la valeur du premier enregistrement
du champ d'indice 0.
Nom
|
Prenom
|
Free
|
Delphipage
|
Avec cette table, "St"
vaudra "Free".
AsString représente
la valeur du champ sous forme de chaîne.
Il existe AsBoolean, AsCurrency, AsDateTime, AsFloat, AsInteger et AsVariant.
Une autre solution consiste à utiliser le nom du champ.
procedure
TForm1.Button1Click(Sender: TObject);
Var St: string;
begin
St:=Table1.FieldByName('Nom').AsString;
end;
|
|
"St" vaudra
également Free pour notre exemple.
Modifier la valeur
d'un enregistrement |
Pour modifier
la valeur d'un enregistrement, il faut se mettre en mode édition.
Voici la méthode par indice :
procedure
TForm1.Button1Click(Sender: TObject);
begin
Table1.Edit;
Table1.Fields[1].AsString:= 'Yoann';
end;
|
|
Voici la méthode
par nom :
procedure
TForm1.Button1Click(Sender: TObject);
begin
Table1.Edit;
Table1.FieldByName('Prenom').AsString:= 'Yoann';
end;
|
|
Voici ce que nous obtiendrons
avec notre table.
Annuler les dernières
modifications |
Pour annuler les
dernières modifications à un enregistrement, il suffit
d'utiliser "Cancel".
procedure
TForm1.Button1Click(Sender: TObject);
begin
Table1.Cancel;
end;
|
|
|