Accueil > Manip’s > Delphi > ACCESS > ADO : Commandes de Naviguation
DELPHI, ACCESS
ADO : Commandes de Naviguation
samedi 25 décembre 2010, par
Les Commandes de navigation de la base se résument à la Barre :
DBNavigator
ONGLET | COMPOSANT |
---|
ContrôleBD | (2) DBNavigator |
Paramétrage
DataSource | DataSource1 |
---|
Voici dans l’ordre les instructions ADO correspondant à chacun des boutons :
Action | Commande |
---|
Premier | First |
Précédant | Prior |
Suivant | Next |
Dernier | Last |
Ajouter | Insert |
Supprimer | Delete |
Modifier | Edit |
Sauver | Post |
Annuler | Cancel |
Mettre à jour | Refresh |
Sont également fondamentaux à connaitre :
Marque de début de fichier | BOF |
Marque de Fin de fichier | EOF |
Et on peut rajouter le pointeur :
Aller à l’enregistrement N°xxx | MoveBy( integer ) |
Exemple de code d’ajout d’un enregistrement
procedure TForm1.Ajouter_OBJETExecute(Sender : TObject) ;
- var Objet : string ;
begin
- if not InputQuery (’Ajouter un objet’,’Descrition de l’’Objet’, objet ) then exit ;
- ADOTable_OBJETS.Insert ;
- ADOTable_OBJETS.FieldByName(’nom’).Value := Objet ;
- ADOTable_OBJETS.Post ;
- ShowMessage(objet + ’ ajouté’) ;
end ;
Exemple de Boucle de Balayage
ADOTable1.First
While not ADOTable1.EOF do begin
- Traitement () ;
- ADOTable1.Next ;
End ;
BIBLIO
- Delphi 6 (Student Edition) CampussPress [7-283]
Messages
1. ADO : Commandes de Naviguation , 16 février 2011, 16:58, par BlueGYN
Exemple
Copier une Table dans un mémo
With DataModule1.ADO_TABLE do begin
end ;