Discussion :

[chh2008]

Bonjour,

Deux utilisateurs qui travaillent simultanément sur la même base de donnée (Firebird, composant ibtable) et font des modifications sur la même table.
Seulement les modifications de l'un n'apparaissent pas en temps réel chez l'autre (Dans DBGRID) et pour les afficher il est obligé de fermer puis ouvrir la table.
Comment réaliser ce genre de mécanisme pour une mise à jour en tem réel ?

Merci d'avance

[dehorter olivier]

Sous Firebird, il faut placer dans les PS ou mieux les TRIGGER (after UPDATE ou INSERT ou DELETE) une fonction POST_EVENT

Code :

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

POST_EVENT :Evenement

qui indique au programme pilote ce qui c'est passé dans la base.

Ensuite, il faut récupérer cet événement et procéder à ce que tu souhaites (un rafraichissement). Pour DbGrid et les composants liés je ne sais pas, moi j'utilise les composants de IBDA pour lesquels il y a un composants spécifiques "EVENTS" (IBCAlerter) avec un événement OnEVENT que l'on programme comme suit :

IF Quel_Evenement = 'cas 1' THEN
Faire_cela...
ELSE
Faire_ceci

la variable Quel_Evenement contient ce que Firebird a envoyé dans le POST_EVENTc.a.d. Evenement

[ShaiLeTroll]

C'est vrai système d'Alerte d'Interbase qu'a hérité FireBird est vraiment pratique pour cela !
Je n'ai pas vu d'équivalent du TIBEvents ailleurs ni dans ADO ni dans dans DBExpress... un comble, leur propre couche de composant ne fourni pas tout le support complet dans leur propre SGBD

Est-ce que d'autres SGBD "Gratuit\OpenSource" possède un tel système ?
à part Oracle ou SQLServer évidemment (vu leur prix ! ) et son service broker mais sans .NET faut le pondre soit même en WMI ou acheter l'excellent CoreLab\Devart SDAC contenant évidemment TMSServiceBroker)
Qui propose aussi IBDAC et ODAC

Sur une application que j'ai maintenu à peine 4 mois (qui fonctionnait sur SQL Server, Oracle et IB), sur chaque page, il y avait un système de feu tricolore, rouge indiquant que le données ont changés, orange qu'il utilisateur avait commencé une modification (et cela verrouillait le bouton "Modifier")
en cliquant sur le feu rouge, on pouvait rafraichir les données (il y avait une option pour le rendre automatique mais cela perturbait certains utilisateurs)

EDIT :
Pense que si tu as beaucoup de clients, les notifications ont un coût et en plus chaque Refresh du DBGrid en ajoute encore un !
Evite de rafraîchir des listings de millier de ligne ainsi !
La seule fois où j'ai vu les notifications utilisés cela n'était QUE des les fenêtres de Détail pour éviter l'état de Conciliation lorsque des utilisateurs modifient une même fiche

[chh2008]

je suis d'accord avec toi ShaiLeTroll au sujet du rarfechissemet
Possible d'avoir un exemple concret (Trigger + mani du composant)
je n'arrive pas à piger

[dehorter olivier]

Ce type de composant existe aussi avec le UIB (free )

principe de fonctionnement (donc code à adapter )
Dans FIREBIRD

Code :

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

1
2
3
4
5
6
CREATE OR ALTER TRIGGER B_PP_BU0 FOR B_PP
ACTIVE AFTER UPDATE POSITION 0
AS
BEGIN
   POST_EVENT 'Modif Table 1';
END

dans DELPHI
Il faut enregistrer puis activer les messages envoyés par FIREBIRD

Code pascal :

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

1
2
3
4
5
6
7
            EventsFB.Stop;
            // Ajoute les nouveaux element
            EventsFB.Events.Add('Modif Table 1');
            EventsFB.Events.Add('Modif Table 2');
            EventsFB.Events.Add('Ajout Table 1');
 
            EventsFB.Start;

puis indiquer l'opération à effectuer à l'envoi de l'événement dans la base

Code :

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

1
2
3
4
5
6
7
8
9
10
PROCEDURE TfData.EventsFBEvent(Sender: TObject; EventName: STRING; EventCount: Integer);
BEGIN
    IF EventName = 'Modif Table 1' THEN
        // Raffraichir table 1 après modif
   ELSE
       IF EventName = 'Modif Table 2' THEN
          // Raffraichir table 2 après modif
      ELSE
          // Raffraichir table 1 après Ajout
END;

voila le principe pour les composants IBDAC (ce doit être similaire pour les autres, j'imagine)

[chh2008]

Merci