ARow

3.6.Dg


procedure TDatMaq03.MaqProdCalculateField(Sender: TIB_Statement;
ARow: TIB_Row; AField: TIB_Column);
begin
inherited;
if AField.FieldName = 'DESCRICAO' then begin
if EstCad.Params[0].AsString <> ARow.ByName('Produto').AsString then begin
EstCad.Params[0].AsString := ARow.ByName('Produto').AsString;
if not (EstCad.Active) then EstCad.Open;
end;
AField.AsString := EstCad.FieldByName('Descricao').AsString;
end;
end;

PHA

----- Original Message -----
From: Jason Wharton
To: IBObjects@yahoogroups.com
Sent: Friday, May 25, 2001 4:06 PM
Subject: Re: [IBO] Event CalculatedFields


Are you using ARow in the event handler or FieldByName()?

Be sure to use ARow.ByName() instead.

What version of IBO are you using?

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


----- Original Message -----
From: "Paulo Henrique Albanez" <pha@...>
To: <IBObjects@yahoogroups.com>
Sent: Friday, May 25, 2001 12:06 PM
Subject: [IBO] Event CalculatedFields


> Because the event CalculatedFields is called several times when metodo
Post is run, and because that occurs before the event AfterPost and not
after, I am having problems for cause of this.
>
> PHA
>
>
> [Non-text portions of this message have been removed]
>
>
>
>
> Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
>
>


Yahoo! Groups Sponsor



Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.



[Non-text portions of this message have been removed]