Discussion :

[Papy214]

Bonjour

Je cherche le moyen d'empêcher TFDQuery d'afficher le message "Supprimer l'enregistrement ?" quand on veut supprimer l'enregistrement en cours.
Pourquoi ? Parce que j'ai mis mon propre message d'avertissement dans le OnBeforeDelete.

Est-ce possible de faire ça à votre avis ?

[ShaiLeTroll]

Ce n'est pas le TFQuery qui affiche le message mais souvent le TDBNavigator.ConfirmDelete

[Papy214]

Je n'avais pas vu cette cette propriété.
Ca règle le problème avec le DBNavigator.
Mais si je sélectionne une ligne sur la grille et que je fais Ctrl Suppr, il affiche le message que je ne veux pas. :-(

[SergioMaster]

Bonjour,

Idem que pour le DBNavigator le DBGrid à une propriété Options.dgConfirmDelete qui est à true par défaut

[Paul TOTH]

tu peux aussi jouer sur le FDQuery.BeforeDelete et utliser Abort() pour l'interdire le cas échéant

[Papy214]

tu peux aussi jouer sur le FDQuery.BeforeDelete et utliser Abort() pour l'interdire le cas échéant

J'ai fait ça mais ça ne change rien.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
procedure TDMOptions.FDQueryAutorProfBeforeDelete(DataSet: TDataSet);
begin
  if Confirme(Format('Êtes vous sûr de vouloir enlever l''autorisation "%s" du profil "%s"',
    [DMOptions.FDQueryAutorProf.FieldByName('Libelle').AsString, DMOptions.FDTableProfils.FieldByName('Libelle')
    .AsString])) then
    FDCnxOptions.ExecSQL('DELETE FROM AutorisationsProfile where ClefAutorisation = :ca and ClefProfile = :cp',
      [FDQueryAutorProfClefAutorisation.AsInteger, FDQueryAutorProfClefProfil.AsInteger]);
  FDQueryAutorProf.Refresh;
  Abort;
end;

[Papy214]

Bonjour,

Idem que pour le DBNavigator le DBGrid à une propriété Options.dgConfirmDelete qui est à true par défaut

Je l'avais ratée celle-ci aussi.
Décidément, fait pas bon vieillir
A ma décharge je cherchais plutôt un point central côté composant de données.

Merci

[SergioMaster]

Décidément, fait pas bon vieillir

je plussoie, surtout si tu y ajoutes une interruption involontaire assez longue causant un sevrage Delphi.
Ma retraite dans 3 mois désormais n'arrange pas la sauce