Multsoft.com Posted May 16, 2023 Posted May 16, 2023 When I embed a frame inside a form, the pull to refresh of the collectionView activates during scrolling, and if I just show the frame, the error disappears... I'm using a sample project to report this issue, thus using conventional code to embed the frame procedure TFormMain.ShowFrame(Sender: TObject); var FrameNumber: Integer; FrameClass: TfgFormClass; begin TfgAssert.IsClass(Sender, TfgButton); FrameNumber := TfgButton(Sender).Tag; // Remove previous active frame if FActiveFrame <> nil then begin FActiveFrame.Parent := nil; FreeAndNil(FActiveFrame); end; case FrameNumber of 1: FrameClass := TFrame1; else raise EfgAssertError.CreateFmt(SUnknownValue, ['FrameNumber']); end; // Embed new form as control into lContent layout^ FActiveFrame := FrameClass.Create(nil); FActiveFrame.BeginUpdate; try FActiveFrame.PositionMode := TfgPositionMode.Relative; FActiveFrame.Alignment.FlexGrow := 1; FActiveFrame.FullScreen := False; FActiveFrame.Parent := lContent; FActiveFrame.Show; finally FActiveFrame.EndUpdate; end; end; In button 2, I just call the show, and look at the difference, remembering that the pull to refresh is off, I created the collectionView again. procedure TFormMain.btnShowFrame2Tap(Sender: TObject); begin frame1 := Tframe1.Create(nil); frame1.Show; end; WhatsApp Video 2023-05-16 at 10.36.46.mp4 Obs: button 1 embeds the screen and button 2 calls the frame alone.
Alex O Posted May 16, 2023 Posted May 16, 2023 Кстати да, заметил такое же и при встраивании в форму формы, тоже срабатывает
Administrators Yaroslav Brovin Posted May 16, 2023 Administrators Posted May 16, 2023 Hello, Since you have demo sample, please attach this project. Thank you
Multsoft.com Posted May 16, 2023 Author Posted May 16, 2023 follows attached Formulário - Frames.rar 1
Administrators Yaroslav Brovin Posted May 16, 2023 Administrators Posted May 16, 2023 Fixed in 1.16.0.0. 1
Recommended Posts