OnShow does not fire on a previously closed form

WEB TMS WEB Core
1

WebCore 2.7.2.2.

Simple test app:
First form is showing. In a button click event I create a new form and show it using ShowModal. The current form gets a "Close". Both forms have OnShow events, that fire as expected.
So far all is correct.

Then, on the secondary form I call ShowModal on the reference I kept for the first form. That first form shows, but it does not call it's OnShow event that way.

I looks like the "OnShow" reference is nil here (it works fine when the forms are created and shown initially):

procedure TCustomForm.DoShow;
begin
  DoAutoFocus;
  if Assigned(OnShow) and not FShown then
  begin
    FShown := true;
    OnShow(Self);
  end;
end;

Is that by design or do I miss something here?
(I have a simple test project, if needed)

2

I could see this issue and applied a fix.
Next update will have this fix.

2 Likes
3

Thanks, Bruno, much appreciated!