Re: TZF - Network Program ... try/finally

Bob do you know where the error is called? and I assume the program halts?

I suspect that it does not make it out of the TRY segment
Roger
----- Original Message ----- 
  From: [email protected] 
  To: [email protected] 
  Sent: June 10, 2003 9:24 PM
  Subject: TZF - Network Program ... try/finally




  In developing a network program, I am trying to use
  a  "try/finally"  structure to allow the physical deletion
  of records (PACK).  I am getting a File Sharing error
  ( Error # 32 ) when I try to pack and there are two users
  in the system.  My Try/Finally looks like this:


      try   // this will create an exception if another user is using the system
        DM.DBF_Courts.Active:=False;
        DM.DBF_Courts.Exclusive:=True;
        DM.DBF_Courts.Active:=True;
        DM.DBF_Courts.Pack;
      finally   // but I thought this would "clear" the exception
        DM.DBF_Courts.Active:=False;
        DM.DBF_Courts.Exclusive:=False;
        DM.DBF_Courts.Open;
      end;


  Thanks,
  Bob Watson
  Atlanta, GA

==^================================================================
This email was sent to: [email protected]

EASY UNSUBSCRIBE click here: http://topica.com/u/?clvXPN.a5kvff.Z2NsZHQt
Or send an email to: [email protected]

TOPICA - Start your own email discussion group. FREE!
http://www.topica.com/partner/tag02/create/index2.html
==^================================================================