Web forum is in read-only mode. Login as active registered customer for write access
  Forum Search   New Posts New Posts

O801

 Post Reply Post Reply
Author
Salmenius Jaakko View Drop Down
New Member
New Member
Avatar

Joined: 12 Nov 2017
Posts: 5
Post Options Post Options   Quote Salmenius Jaakko Quote  Post ReplyReply Direct Link To This Post Topic: O801
    Posted: 15 Nov 2017 at 6:41pm
If I have non const string parameter like shown in the following sample FI reports an O801 issue.
FI does not seem to see that the parameter is modified in the local funtion.

function TNetCodeProperties.RgbStringToValue(value: String): TColor;

  procedure SkipNoneNumbers;
  begin
    while (value <> '') and not TUnicodeString.IsDigit(value[1]) do
      Delete(value, 1, 1);
  end;

begin
  ...
  SkipNoneNumbers;
  ...
end;

Back to Top
 Post Reply Post Reply

Forum Jump Forum Permissions View Drop Down