BlueGEEK Journal

Accueil > Manip’s > Delphi > ACCESS > ADO : Commandes de Naviguation

DELPHI, ACCESS

ADO : Commandes de Naviguation

samedi 25 décembre 2010, par bluegyn_spip

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

  1. Delphi 6 (Student Edition) CampussPress [7-283]

Messages