Subject Re: [IBO] Catching an exception
Author Jason Wharton
It should remain in Edit state if it is an exception during the post.
I strongly discourage doing anything in the OnError event with SQL
components.

Jason Wharton
CPS - Mesa AZ
http://www.ibobjects.com

-- We may not have it all together --
-- But together we have it all --


----- Original Message -----
From: "Gerhardus Geldenhuis" <gerhardus@...>
To: <ibobjects@yahoogroups.com>
Sent: Thursday, September 19, 2002 7:56 AM
Subject: [IBO] Catching an exception


> Hi
> I have the following code to catch an exception:
>
> procedure TForm1.IBOQuery1Error(Sender: TObject; const ERRCODE: Integer;
> ErrorMessage, ErrorCodes: TStringList; const SQLCODE: Integer;
> SQLMessage, SQL: TStringList; var RaiseException: Boolean);
> begin
> if ERRCODE = 335544665 then
> begin
> showmessage('Jy kan nie dieselfde waarde twee keer intik nie');
> RaiseException:=False;
> // IBOQuery1.IB_Transaction.Activate
> // IBOQuery1.Edit;
> end;
> end;
>
> How do I put the query back in edit mode after I have displayed my own
error
> message.
>
> I have tried the two statements that is commented out and have looked for
> something but I couldn't' find anything.
>
> Groete
> Gerhardus