Código Delphi [-] begin with TSecondFrm.Create(nil) do begin if (ShowModal() = mrCancel) then begin Self.Close(); end; end; end;
begin with TSecondFrm.Create(nil) do begin if (ShowModal() = mrCancel) then begin Self.Close(); end; end; end;