Login ProductsSalesSupportDownloadsAbout |
Home » Technical Support » Elevate Web Builder Technical Support » Support Forums » Elevate Web Builder General » View Thread |
Messages 1 to 2 of 2 total |
ShowModal problem |
Fri, Aug 28 2015 12:13 PM | Permanent Link |
Uli Becker | I'm just upgrading my "Cinedisk" project to the latest Build.
This code doesn't work any more: procedure TMainForm.btnSettingsClick(Sender: TObject); begin if not FormExists(DlgUserForm) then DlgUserForm := TDlgUserForm.create(self); DlgUserForm.Left := self.Left + self.Width - DlgUserForm.Width - 25; DlgUserForm.Top := self.Top + btnSettings.Top + 12; DlgUserForm.ShowModal; <---------------- Error end; The ErrorMessage says: "You cannot call ShowModal for the embedded form DlgUserForm". What does that mean? Thanks Uli |
Fri, Aug 28 2015 2:50 PM | Permanent Link |
Tim Young [Elevate Software] Elevate Software, Inc. timyoung@elevatesoft.com | Uli,
<< This code doesn't work any more: procedure TMainForm.btnSettingsClick(Sender: TObject); begin if not FormExists(DlgUserForm) then DlgUserForm := TDlgUserForm.create(self); DlgUserForm.Left := self.Left + self.Width - DlgUserForm.Width - 25; DlgUserForm.Top := self.Top + btnSettings.Top + 12; DlgUserForm.ShowModal; <---------------- Error end; >> Use this instead: procedure TMainForm.btnSettingsClick(Sender: TObject); begin if not FormExists(DlgUserForm) then DlgUserForm := TDlgUserForm.create(Application); ... I forgot to add this as a breaking change. I'll update the release notes to reflect this. Tim Young Elevate Software www.elevatesoft.com |
This web page was last updated on Friday, March 29, 2024 at 03:30 AM | Privacy PolicySite Map © 2024 Elevate Software, Inc. All Rights Reserved Questions or comments ? E-mail us at info@elevatesoft.com |