Michael,

> I have defined a field in CalculatedFields like:
>
> MyFloat Numeric(15,2)
>
>
> But how do I assign a value OnCalculateFields ?

as I wrote in my first answer:


procedure TMyForm.MyCursorCalculateField(Sender: TIB_Statement;
ARow: TIB_Row; AField: TIB_Column);
begin
if aField.Fieldname = 'MYFLOAT' then // is it the calcfield?
begin
FieldByName ( 'MYFLOAT' ).AsDouble :=
aRowByName ( 'RADIUS' ).AsDouble * 3.141592654;
// use a Value from a field within the current data row
end;
end;


Luc.