"soit bof ou eof est vrai ou l'enregistrement en cours a été supprimé .." erreur sur applyupdates qui contient une opération de suppression

Question

Je reçois cette erreur lors de la résolution d'opération de suppression de ClientDatset à TAdoDataset (qui lié à la table d'accès). J'utilise Delphi 2010.

Mon DataSetProvider entre TClientDataset et TADODataSet:

object dspTarifeler: TDataSetProvider 
    DataSet = DM.qryTarifeler  
    ResolveToDataSet = True 
    Options = [poPropogateChanges, poUseQuoteChar] 
end 

Une erreur se produit dans cette fonction qui est appelée par TDataSetResolver.EndUpdate();

procedure TCustomADODataSet.InternalGotoBookmark(Bookmark: Pointer); 
begin 
    Recordset.Bookmark := POleVariant(Bookmark)^; 
end; 

Answer 1

je devais contourner le fournisseur et appliquer l'opération de suppression manuellement. il conserve les erreurs en mode Debug, mais je peux vivre avec ça.

procedure Tfrm.dspTarifelerBeforeUpdateRecord(Sender: TObject; 
    SourceDS: TDataSet; DeltaDS: TCustomClientDataSet; UpdateKind: TUpdateKind; 
    var Applied: Boolean); 
begin 
    if updatekind = ukDelete then 
    begin 
    if dm.qryTarifeler.Locate('Prefix',DeltaDs['Prefix'],[]) then 
     dm.qryTarifeler.Delete; 
    applied := true; 
    end; 
end; 

Answer 2

J'ai rencontré le même problème avec TAdoDataset. N'a pas trouvé ce qui ne va pas avec, donc j'ai juste substitué la méthode dans try except block.

Essayez ceci:

TADODataset = class(ADODB.TADODataSet) 
    public 
    procedure InternalGotoBookmark(Bookmark: Pointer); override; 
    end; 

{ TADODataset } 

procedure TADODataset.InternalGotoBookmark(Bookmark: Pointer); 
begin 
    try 
    inherited InternalGotoBookmark(Bookmark); 
    except 

    end; 
end; 

Answer 3

Pour une cause inexplicable que je ne peux pas deviner, je crois que, après la suppression du paramètre de signet de InternalGotoBookmark va la position d'enregistrement supprimé ...

Ainsi, la solution Linas ferait la chose travail ...

Mais je suis d'accord avec les autres, en avalant l'exception est mauvais ....

Answer 4

Essayez de mettre

ResolveToDataSet = False