Apply the fix to FMX_Types_FPC_Impl.inc
Posted: Thu Jun 14, 2012 7:58 am
I try to Apply the fix to FMX_Types_FPC_Impl.inc.
I have changed the file on my windows and mac
but it still don't use the fix.
I have also tried to add an error in the code to see if it is used, it isn't
How can I force the compiler to use the fix on the mac?
Do I miss something?
Jørgen
I get the same error as in
viewtopic.php?f=17&t=13316
I tried to do this
http://qc.embarcadero.com/wc/qcmain.aspx?d=103976
but I don't think my changes is used by the compiler.
Must I do something else than modify the file?
Can the modified file be located in the project folder?
Correcting these functions in the FMX_Types_FPC_Impl.inc file from "\Embarcadero\RAD Studio\9.0\source\fmi" should be enough:
Code: Select all
function TRectF.GetBottomRight: TPointF;
begin
//Result := TPointF.Create(Bottom, Right); //Act
Result := TPointF.Create(Right, Bottom); //Exp
end;
Code: Select all
function TRectF.GetTopLeft: TPointF;
begin
//Result := TPointF.Create(Top, Left); //Act
Result := TPointF.Create(Left,Top); //Exp
end;
I have changed the file on my windows and mac
but it still don't use the fix.
I have also tried to add an error in the code to see if it is used, it isn't
How can I force the compiler to use the fix on the mac?
Do I miss something?
Jørgen
I get the same error as in
viewtopic.php?f=17&t=13316
I tried to do this
http://qc.embarcadero.com/wc/qcmain.aspx?d=103976
but I don't think my changes is used by the compiler.
Must I do something else than modify the file?
Can the modified file be located in the project folder?
Correcting these functions in the FMX_Types_FPC_Impl.inc file from "\Embarcadero\RAD Studio\9.0\source\fmi" should be enough:
Code: Select all
function TRectF.GetBottomRight: TPointF;
begin
//Result := TPointF.Create(Bottom, Right); //Act
Result := TPointF.Create(Right, Bottom); //Exp
end;
Code: Select all
function TRectF.GetTopLeft: TPointF;
begin
//Result := TPointF.Create(Top, Left); //Act
Result := TPointF.Create(Left,Top); //Exp
end;