FindFmVisible property is missing

FAlvaradoFAlvarado US/Mexico
edited October 2017 in FastReport VCL 5
What happened with the the FindFmVisible property of frxPreview component?
In the last two versions (5.6.4 and 5.6.6) it's missing and I was receiving AV errors in old projects.
I had to manually delete it form the dfm file. The value was False, so it did no harm, I think...

Update:
It's worse than that:
I delete the property in the dfm file and the project opens without error.
Save the project and close it and when I reopen it the AV displays (see printscreen attached)

As the property is in the object explorer the IDE adds the property to the dfm file and the AV occurs the next time the project is opened.

This is a bug and I had to reinstall version 5.6.3

Best Regards
Francisco Alvarado

Comments

  • gpigpi
    edited 11:06AM
    It seems you still have some FR's files from previous version of FR in the system. Uninstall all instances of FR, remove all FR's files and folders (see system and hidden folders too) and then install FR 5.6.6 again
  • gpigpi
    edited 11:06AM
    Modify frxPreview.pas in the Source folder:
    procedure TfrxPreview.SetFindFmVisible(Value: Boolean);
    var
    NeedChange: Boolean;
    begin
    NeedChange := Value <> FSearchFrm.Visible;
    
    //FSearchFrm.trvFind.Items.Clear;
    if Value then
    TextToFind := '';
    if not (csDesigning in ComponentState) then
    FSearchFrm.Parent := Self;
    if FSearchFrm.trvFind <> nil then
    begin
    FSearchFrm.trvFind.Items.Clear;
    FSearchFrm.trvFind.OnChange := OnTrvFindChange;
    end;
    if FSearchFrm.btnFind <> nil then
    FSearchFrm.btnFind.OnClick:= OnFindClick;
    
    FSearchFrm.Visible := Value;
    
    FFindSplitter.Visible := Value;
    if not Value then
    TextFound := False;
    if Owner is TfrxPreviewForm then
    TfrxPreviewForm(Owner).FindB.Down := Value;
    if NeedChange then
    UpdatePages;
    end;
    
    procedure TfrxPreview.OnFindClick(Sender: TObject);
    var
    s: string;
    begin
    if Self.PreviewPages = nil then Exit; //add this line
    
    s := TextToFind;
    

    and recompile all FR's packages by recompile.exe
  • edited 11:06AM
    I have exactly the same problem. I get an acces violation when I toggle FindFMVisible or when I open the project.

    I am using C++ Builder Berlin and FastReport VCL Standard Vers 5.6.6
    I have with the Standard Edition no source code. How can I fix this problem?

    Regards
    Daniel Gex, Logex AG, Switzerland
  • PolomintPolomint Australia
    edited October 2017
    Daniel Gex wrote: »
    I have exactly the same problem.
    Daniel did you check out GPI's replies?

    FR installation process is flaky. It is always best to uninstall (and manually delete traces of) existing FR before installing updates.

    Hopefully that will be addressed in the next major release...
  • gpigpi
    edited 11:06AM
    Daniel Gex wrote: »
    I have with the Standard Edition no source code. How can I fix this problem?
    Use FR 5.6 - 5.6.3 or wait for next build of FR

Leave a Comment