Comment se positionner sur l'enregistrement inséré? [Résolu]

cs_mina24 21 Messages postés mercredi 11 novembre 2009Date d'inscription 8 février 2012 Dernière intervention - 2 févr. 2012 à 13:55 - Dernière réponse : cs_mina24 21 Messages postés mercredi 11 novembre 2009Date d'inscription 8 février 2012 Dernière intervention
- 6 févr. 2012 à 13:30
Bonjour,
j'utilise delphi et firebird pour créer mon application et j'ai une fiche pour ajouter/éditer des enregistrements seulement mon problème est le suivant:
Après insertion d'un nouvel enregistrement et directement après validation(en faisant post) je vois un autre enregistrement et non pas l'enregistrement inséré...
merci pour votre aide!
Afficher la suite 

Votre réponse

3 réponses

Meilleure réponse
cs_MAURICIO 2233 Messages postés mardi 10 décembre 2002Date d'inscription 15 décembre 2014 Dernière intervention - 3 févr. 2012 à 10:26
3
Merci
Salut,

tu peux faire un .locate dans la table ...

A+


Composants Cindy pour Delphi
Faites une donation.

Merci cs_MAURICIO 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 93 internautes ce mois-ci

Commenter la réponse de cs_MAURICIO
cs_cantador 4996 Messages postés dimanche 26 février 2006Date d'inscription 27 mars 2018 Dernière intervention - 5 févr. 2012 à 13:50
0
Merci
Bonjour,

Le mieux est encore d'utiliser les bookmarks

cantador
Commenter la réponse de cs_cantador
cs_mina24 21 Messages postés mercredi 11 novembre 2009Date d'inscription 8 février 2012 Dernière intervention - 6 févr. 2012 à 13:30
0
Merci
Merci pour vos réponses en faite j'ai utilisé le LOCATE et ça marche bien
Mais pour Bookmark ça ne fonctionne pas sur un nouvel enregistrement . Quand j'utilise cette procédure après insertion elle me renvoi vers un autre enregistrement :
est ce que cette procédure est juste! dans ce cas comment utiliser un Bookmark sur un nouvel enregistrement ( j'utilise le FIREBIRD comme SGBD).


procedure TDataM.rafraichir_donnees(table:TMDOTable);
var bmk:TBookmark;
begin
  with table do begin
    active:= true;
    try
       try
        bmk:=GetBookmark;
        Transaction.Commit;
       except
        Showmessage ('Une transaction en cours. Réessayer une fois de plus.');
        Transaction.Rollback;
       end;
       DisableControls;
       table.close;
       table.open;
    finally
 
       GotoBookmark(bmk);
       FreeBookmark(bmk);
       EnableControls;
    end;
  end;
end;

Merci!
Commenter la réponse de cs_mina24

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.