Recent

Author Topic: error while installing fibl  (Read 4312 times)

rbettini

  • Newbie
  • Posts: 3
error while installing fibl
« on: February 11, 2008, 10:19:00 pm »
Hi all,

I'm new using Lazarus. I'm using:
USE 10.3 / Acer 3100 - AMD Semprom
lazarus-0.9.24-0.x86_64.rpm
fpc-2.2.0-0.x86_64.rpm
fibl_071023.zip

I installed this fibl package in lazarus under windows and no problem but while installing it under linux I get this error:

/usr/lib64/lazarus/components/fibl/fibdataset.pas(2689,30) Error: Illegal type conversion: "TField" to "LongInt"

Code: [Select]

          SetModified(True);
        end;
      end;
    end;
  end;
  if not (State in [dsCalcFields, dsFilter, dsNewValue]) then
    DataEvent(deFieldChange, Longint(Field));    <<<<<<<<<< Line: 2689
end;


Does anyone experience this error/know how to solve it?

Thanks,
Rogerio

OnixJr

  • Full Member
  • ***
  • Posts: 172
    • http://www.brlazarus.kit.net
RE: error while installing fibl
« Reply #1 on: February 11, 2008, 10:57:52 pm »
Maybe this work:
DataEvent(deFieldChange, Field.AsLongInt);

Thanks!
Portal Lazarus Brasil - http://lazaruspascal.codigolivre.org.br/portal.php
Lazarus BOOK (in portuguese) - http://lazarus-book.blogspot.com
<hipernetjr@yahoo.com.br> - Curitiba/Brazil

rbettini

  • Newbie
  • Posts: 3
RE: error while installing fibl
« Reply #2 on: February 12, 2008, 10:20:45 pm »
Yes, it works.

Thanks a lot.

rbettini

  • Newbie
  • Posts: 3
error while installing fibl
« Reply #3 on: March 25, 2008, 12:03:30 am »
Hi all,

Actually that solution worked only to install the component . When I tried to add or edit a record an error occurred. As my system is x86_64,  I tried this new code which I thinks is the right one (it worked):


Code: [Select]

          WriteRecordCache(rdRecordNumber, Buff);  {*** Unit: fibdataset.pas Line: 2682 ***}
          SetModified(True);
        end;
      end;
    end;
  end;
  if not (State in [dsCalcFields, dsFilter, dsNewValue]) then
    {*** This is the changed code ***}
    {$ifdef CPU64}              
      DataEvent(deFieldChange, Int64(Field));
    {$else CPU64}
      DataEvent(deFieldChange, LongInt(Field));
    {$endif CPU64}

 

TinyPortal © 2005-2018