From CompNet.RU!news-service Fri Oct 18 17:48:53 1996
Received: by bor.compnet.ru (UUPC/@ v5.09gamma, 14Mar93);
          Fri, 18 Oct 1996 17:48:53 +0300
Received: from zgrad.compnet.ru by relay.CompNet.RU (8.6.12/CompNet/1.0) with SMTP; Fri, 18 Oct 1996 16:36:52 +0300
Received: by zgrad.compnet.ru id AA23843
  (5.65c8zs3/IDA-1.4.4); Fri, 18 Oct 1996 17:37:49 +0400
To: subscribers@compnet.ru
Newsgroups: relcom.fido.su.dbms
From: Oleg Kukartsev <ok@bor.compnet.ru>
Subject: [News] ࠢ  Interbase Event Alerter
X-Return-Path: bor!bor.compnet.ru!ok
Reply-To: ok@bor.compnet.ru
Organization: Epsylon Technologies
Distribution: su
Date: Fri, 18 Oct 96 13:01:06 GMT
Message-Id: <AAI-tPoiG4@bor.compnet.ru>
Sender: news-service@CompNet.RU
Precedence: junk
Lines: 124
Status: RO

   ,
   ,
᪠    . () 

> > >          Delphi 2.0 C/S  Interbase 4.0  NT 4.0 Server.
> > >     (~2 Mb) . 室  ணࠬ ࠡ뢠
> > >   event's,  뫠  ਣ஢   ᪮쪨
> > >   ⠡.  ⪥   १ IBEventAlerter 
> > >   ⠡쭠 ࠡ. ਬ   2-3 ࠧ,   4-
>
> >  ,    ᠬ ஢  ࠭,   뢠
> > Oleg Kukartsev
>
>  ᮢᥬ   -    IBEventAlerter.  砥 
> 70% 祪. 祬 -  .  ᬥ 設, - 㧭 :-)
> Dima Kuzmenko

 ᨣ 㦥  ⠫! த  ,  ᯮ짮
 㤠...
 ਬ  Delphi 2.0 ࠡ⠥  ...
 ।  Delphi 1.0 ⫨筮 ࠡ⠥...
 IMHO ⠥      祬:

1.   ⠭ Alerter (IscQueEvents) GDS32 ᮧ 
   ᨢ襣  ⮪ (  ).

2.   ᮡ ⮪  ᮧ   ⮪ (  )
  [CloseHandle( CreateThread( nil, 8192, @HandleEvent, ptr, 0, ThreadID));]
                ^^^^^^^^^^^^              ^^^^^^^^^^^
     ⮪   㤥 믮  楤 OnEventAlert

procedure ...HandleEvent;
  ...
  FOnEventAlert( self, Events[Events.Count-i-1], status[i], CancelAlerts);
  ...
end;

2. ६ ࠡ ⮪   ந   ᮡ⨩ InterBase,
    ⮣ ⨯,    'ࠡ뢠' ⮪ ,
   ⠪  㣨 ⨯.
    ⮪  ᮧ   ⮪ ', ''  ..), .. 
       㢠 楤 OnEventAlert 
    믮  ⮪!

     ᮢᥬ ᫮, ᫨  ࠢ쭮 ᯮ
   ᪨ ६,  ६ +  ⮪ 
    ࠧ稥  var  threadvar (. Help  Delphi 2.0)

3. ᫨  楤 ( 믮 ⮪ ) ⠥
      ࢥ, ਬ, 믮 Table.Refresh
    ⥪ ᨨ (Session),    ४ ()
    믮 㣨 ᮢ, 믮塞  ⥪ ⮩ 
   ᨨ (IMHO),    ᮮ饭 ⨯ '  
     '  ..

3.    ᮧ ⤥   ᢮ ᮢ
     砫 楤 OnEventAlert  뢠   .
       ஡ :)

      㣨 ⥬. ()  ..

3.     , ᫨  ᮧ ⥫
    ⮪ ,   ᫠ ᮮ饭 ࢨ筮 ⮪,
       ()  ࠡ⪥ ⮣ ᮮ饭 ()
       .

    , ࠢ,  ஡ '㯯஢'  ᮮ饭:

    筠 ஡   ࠡ⪥ ᮮ饭 ࠩ஬
    ,  㫨   5, ࠩ  稫  ⮪ ᮮ饭
     ,    ணࠬ 諮 ⮫쪮 .  뫮 ᤥ 
    ।饭 ९ । ᮮ饭  ⨬樨.

     襬 砥   - 宦,   뢠 
     ᯥ  100 ࠧ, ᭮,  㦭   1 ࠧ
      100,    101- ࠧ!!!
      ॡ  ᯥ樠쭠 ࠡ⪠ 
    ⭮ ᮮ饭 (㠫 室).

      砥,  ⠪ 室    㪠, 㦭 
     뢠  ⮬.

3.  ⠪  , ᫨  ᨭ஭஢ ⮪,
    ᯮ짮 ᢮ 䫠  ⥬ ᥬ  . ।⢠ Win32
    ⮡ ⠢   㣨,
      孮   祭   :(

4.  襭 ணࠬ, ᯮ饩 ᨣ, 室
    ।쭮 ⥫. ᫨ ⠢ ' ' ⮪  
    㤥 믮  ⠬,   㦥 .
     㢥७,   ந室  ⠪,    ⨯ ⮣:

   IMHO  ⮪   GDS32,  襭  GDS32
   㦠 (?)    믮 ⮪ 
    GPF.

    ᠬ ,  ࠡ⠥  ⫠稪 td32
   (訥 ४樨 Delphi32- !!!)  ⠭ 
   OnFormDestroy  ᬠਢ ⮪,  ,  ⮪ 
    ''!!!
   (窠 ⠭, ⢥ ࠡ⠫  ࢨ筮 ⮪).
    ⮨  믮    ( CPU),
    ⮪     ''!!!
       㭨⮦    (?) 
   ᫨    窠 ⠭
     뫠  믮 ᫥ 㧪 GDS32,
    ⮪  㦥 ''   ᢮ .

    GPF  ᥣ  NT   ᥣ  95  ⢨
    16 ࠩ஢ (ਬ 㪮 )

       (Borland  Microsoft),
      !
   ⮪  㦭 !!!

5. ᫨  ⠫      ਧ!
     ਭ ⨥  ⠭ 'ࠡ⠭ 
   ' IBEventAlerter!!!

Oleg Kukartsev
Demo Center Client-Server Technology.          dima@bor.compnet.ru
Delphi Support Team                       095-913-5608  095-459-1333




